(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 11.2' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[   1219212,      24502]
NotebookOptionsPosition[   1210812,      24369]
NotebookOutlinePosition[   1211183,      24385]
CellTagsIndexPosition[   1211140,      24382]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "The", " ", "above", " ", "equations", " ", "give", " ", "an", " ", 
   "exponential", " ", "that", " ", "is", " ", "not", " ", "really", " ", 
   "the", " ", "form", " ", "that", " ", "we", " ", "have", " ", "in", " ", 
   "the", " ", "equations"}], "*)"}]], "Input",
 CellChangeTimes->{{3.781081399561977*^9, 
  3.781081415056817*^9}},ExpressionUUID->"4dea62b0-7482-4d39-b0d9-\
9de01536aa29"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{
    RowBox[{"NotebookDirectory", "[", "]"}], "<>", " ", 
    "\"\<Run Results\>\""}], " ", "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"select", " ", "=", " ", 
   RowBox[{"{", "30", "}"}]}], 
  RowBox[{"(*", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"1", " ", "+", " ", 
      RowBox[{"5", " ", "mm"}]}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"mm", ",", " ", "0", ",", " ", "10"}], "}"}]}], "]"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"parameters", "=", 
    RowBox[{
     RowBox[{"Import", "[", "\"\<fit_cubic_params.npy\>\"", "]"}], "[", 
     RowBox[{"[", "select", "]"}], "]"}]}], ";"}], 
  RowBox[{"(*", " ", 
   RowBox[{
    RowBox[{"Import", "[", "\"\<fit_tip_quartic_params.npy\>\"", "]"}], ";"}],
    "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"topDimensions", " ", "=", 
     RowBox[{
      RowBox[{"Import", "[", "\"\<dimensions_topB.csv\>\"", "]"}], "[", 
      RowBox[{"[", "select", "]"}], "]"}]}], ";"}], ";"}], " ", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"Import", "[", "\"\<dimensions_tip.csv\>\"", "]"}], ";"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"names", " ", "=", " ", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"(*", "0", "*)"}], 
       RowBox[{
       "\"\<G.FuliginosaA\>\"", ",", "\"\<G.FuliginosaB\>\"", ",", 
        "\"\<G.FuliginosaC\>\"", ",", "\"\<G.FuliginosaD\>\"", ",", 
        "\"\<G.FuliginosaE\>\"", ",", "\"\<G.FuliginosaF\>\"", ",", 
        RowBox[{"(*", "6", "*)"}], "\"\<G.FortisA\>\"", ",", 
        "\"\<G.FortisB\>\"", ",", " ", "\"\<G.FortisC\>\"", ",", " ", 
        "\"\<G.FortisD\>\"", ",", " ", "\"\<G.FortisE\>\"", ",", 
        RowBox[{"(*", "11", "*)"}], "\"\<G.MagnirostrisA\>\"", ",", 
        "\"\<G.MagnirostrisB\>\"", ",", "\"\<G.MagnirostrisC\>\"", ",", 
        "\"\<G.MagnirostrisD\>\"", ",", "\"\<G.MagnirostrisE\>\"", ",", 
        RowBox[{"(*", "16", "*)"}], "\"\<G.ConirostrisA\>\"", ",", 
        "\"\<G.ConirostrisB\>\"", ",", "\"\<G.ConirostrisC\>\"", ",", 
        "\"\<G.ConirostrisD\>\"", ",", "\"\<G.ConirostrisE\>\"", ",", 
        "\"\<G.ConirostrisF\>\"", ",", "\"\<G.ConirostrisG\>\"", ",", 
        RowBox[{"(*", "23", "*)"}], "\"\<G.ScandensA\>\"", ",", 
        "\"\<G.ScandensB\>\"", ",", 
        RowBox[{"(*", "25", "*)"}], "\"\<G.SeptentrionalistA\>\"", ",", 
        "\"\<G.SeptentrionalistB\>\"", ",", 
        RowBox[{"(*", "27", "*)"}], "\"\<G.DifficilisA\>\"", ",", 
        "\"\<G.DifficilisB\>\"", ",", 
        RowBox[{"(*", "29", "*)"}], "\"\<C.PallidusA\>\"", ",", 
        "\"\<C.PallidusB\>\"", ",", "\"\<C.PallidusC\>\"", ",", 
        "\"\<C.PallidusD\>\"", ",", 
        RowBox[{"(*", "33", "*)"}], "\"\<C.ParvulusA\>\"", ",", 
        "\"\<C.ParvulusB\>\"", ",", "\"\<C.ParvulusC\>\"", ",", 
        "\"\<C.ParvulusD\>\"", ",", "\"\<C.ParvulusE\>\"", ",", 
        RowBox[{"(*", "38", "*)"}], "\"\<C.PsittaculaA\>\"", ",", 
        "\"\<C.PsittaculaB\>\"", ",", "\"\<C.PsittaculaC\>\"", ",", 
        "\"\<C.PsittaculaD\>\"", " ", ",", 
        RowBox[{"(*", "42", "*)"}], "\"\<P2.InornataA\>\"", ",", 
        "\"\<P2.InornataB\>\"", ",", 
        RowBox[{"(*", "44", "*)"}], "\"\<C2.OlivaceaA\>\"", ",", 
        "\"\<C2.OlivaceaB\>\"", ",", "\"\<C2.OlivaceaC\>\"", ",", 
        RowBox[{"(*", "47", "*)"}], "\"\<C2.FuscaA\>\"", ",", 
        "\"\<C2.FuscaB\>\"", ",", 
        RowBox[{"(*", "49", "*)"}], "\"\<P.CrassirostrisA\>\"", ",", 
        "\"\<P.CrassirostrisB\>\"", ",", "\"\<P.CrassirostrisC\>\"", ",", 
        "\"\<P.CrassirostrisD\>\"", ",", "\"\<P.CrassirostrisE\>\"", ",", 
        RowBox[{"(*", "54", "*)"}], " ", "\"\<T.BicolorA\>\"", ",", " ", 
        "\"\<T.BicolorB\>\"", ",", " ", "\"\<T.BicolorC\>\"", ",", " ", 
        "\"\<T.BicolorD\>\"", ",", " ", "\"\<T.BicolorE\>\""}], 
       RowBox[{"(*", "59", "*)"}], "}"}], "[", 
      RowBox[{"[", "select", "]"}], "]"}]}], ";"}], 
   RowBox[{"(*", 
    RowBox[{"[", 
     RowBox[{"[", 
      RowBox[{"{", 
       RowBox[{"14", ",", "30"}], "}"}], "]"}], "]"}], "*)"}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"representers", " ", "=", " ", 
     RowBox[{"{", 
      RowBox[{
      "1", ",", " ", "7", ",", "12", ",", "17", ",", "24", ",", "26", ",", 
       "28", ",", "30", ",", " ", "34", ",", "39", ",", "43", ",", "45", ",", 
       "48", ",", "50", ",", "55"}], "}"}]}], ";", "\[IndentingNewLine]", 
    RowBox[{"geoRepresenters", " ", "=", "  ", 
     RowBox[{"{", 
      RowBox[{
      "1", ",", " ", "7", ",", "12", ",", "17", ",", "24", ",", "26", ",", 
       "28"}], "}"}]}], ";"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"numBeaks", " ", "=", " ", 
   RowBox[{"names", "//", "Length"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"colorScheme", " ", "=", " ", "\"\<Rainbow\>\""}], ";"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"===", "===", "===", "===", "==="}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"numFitParams", " ", "=", " ", "10"}], ";"}], 
  "\n"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"beakHeight", "[", 
    RowBox[{"x_", ",", " ", "y_", ",", " ", "beakNum_"}], "]"}], " ", ":=", 
   " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"1", ",", " ", "x", ",", " ", "y", ",", " ", 
      SuperscriptBox["x", "2"], " ", ",", " ", 
      RowBox[{"x", " ", "y"}], ",", " ", 
      SuperscriptBox["y", "2"], ",", " ", 
      SuperscriptBox["x", "3"], ",", " ", 
      RowBox[{
       SuperscriptBox["x", "2"], " ", "y"}], ",", " ", 
      RowBox[{"x", " ", 
       SuperscriptBox["y", "2"]}], ",", " ", 
      SuperscriptBox["y", "3"]}], 
     RowBox[{"(*", 
      RowBox[{",", " ", 
       SuperscriptBox["x", "4"], ",", " ", 
       RowBox[{
        SuperscriptBox["x", "3"], " ", "y"}], ",", 
       RowBox[{
        SuperscriptBox["x", "2"], " ", 
        SuperscriptBox["y", "2"]}], ",", " ", 
       RowBox[{"x", " ", 
        SuperscriptBox["y", "3"]}], ",", " ", 
       SuperscriptBox["y", "4"]}], "*)"}], "}"}], ".", 
    RowBox[{
     RowBox[{"parameters", "[", 
      RowBox[{"[", "beakNum", "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{";;", "numFitParams"}], "]"}], "]"}]}]}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"beakHeight2", "[", 
     RowBox[{"x_", ",", " ", "y_", ",", " ", "beakNum_"}], "]"}], " ", ":=", 
    " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"1", ",", " ", "x", ",", " ", "y", ",", " ", 
       SuperscriptBox["x", "2"], " ", ",", " ", 
       RowBox[{"x", " ", "y"}], ",", " ", 
       SuperscriptBox["y", "2"], ",", " ", 
       SuperscriptBox["x", "3"], ",", " ", 
       RowBox[{
        SuperscriptBox["x", "2"], " ", "y"}], ",", " ", 
       RowBox[{"x", " ", 
        SuperscriptBox["y", "2"]}], ",", " ", 
       SuperscriptBox["y", "3"]}], 
      RowBox[{"(*", 
       RowBox[{",", " ", 
        SuperscriptBox["x", "4"], ",", " ", 
        RowBox[{
         SuperscriptBox["x", "3"], " ", "y"}], ",", 
        RowBox[{
         SuperscriptBox["x", "2"], " ", 
         SuperscriptBox["y", "2"]}], ",", " ", 
        RowBox[{"x", " ", 
         SuperscriptBox["y", "3"]}], ",", " ", 
        SuperscriptBox["y", "4"]}], "*)"}], "}"}], ".", 
     RowBox[{
      RowBox[{"parameters2", "[", 
       RowBox[{"[", "beakNum", "]"}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{";;", "numFitParams2"}], "]"}], "]"}]}]}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "Determing", " ", "the", " ", "end", " ", "points", " ", "of", " ", "the",
      " ", "beaks"}], ",", " ", 
    RowBox[{"or", " ", "containing", " ", "box"}]}], "*)"}]}], "\n", 
 RowBox[{
  RowBox[{
   RowBox[{"minX", "[", "beakNum_", "]"}], " ", ":=", " ", 
   RowBox[{
    RowBox[{"parameters", "[", 
     RowBox[{"[", "beakNum", "]"}], "]"}], "[", 
    RowBox[{"[", 
     RowBox[{"numFitParams", " ", "+", " ", "1"}], "]"}], "]"}]}], ";", " ", 
  RowBox[{
   RowBox[{"maxX", "[", "beakNum_", "]"}], "  ", ":=", " ", 
   RowBox[{
    RowBox[{"parameters", "[", 
     RowBox[{"[", "beakNum", "]"}], "]"}], "[", 
    RowBox[{"[", 
     RowBox[{"numFitParams", " ", "+", " ", "2"}], "]"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"minY", "[", "beakNum_", "]"}], " ", ":=", " ", 
   RowBox[{
    RowBox[{"parameters", "[", 
     RowBox[{"[", "beakNum", "]"}], "]"}], "[", 
    RowBox[{"[", 
     RowBox[{"numFitParams", " ", "+", " ", "3"}], "]"}], "]"}]}], ";", " ", 
  RowBox[{
   RowBox[{"maxY", "[", "beakNum_", "]"}], "  ", ":=", " ", 
   RowBox[{
    RowBox[{"parameters", "[", 
     RowBox[{"[", "beakNum", "]"}], "]"}], "[", 
    RowBox[{"[", 
     RowBox[{"numFitParams", " ", "+", " ", "4"}], "]"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"minZ", "[", "beakNum_", "]"}], " ", ":=", " ", 
   RowBox[{
    RowBox[{"parameters", "[", 
     RowBox[{"[", "beakNum", "]"}], "]"}], "[", 
    RowBox[{"[", 
     RowBox[{"numFitParams", " ", "+", " ", "5"}], "]"}], "]"}]}], ";", " ", 
  RowBox[{
   RowBox[{"maxZ", "[", "beakNum_", "]"}], "  ", ":=", " ", 
   RowBox[{
    RowBox[{"parameters", "[", 
     RowBox[{"[", "beakNum", "]"}], "]"}], "[", 
    RowBox[{"[", 
     RowBox[{"numFitParams", " ", "+", " ", "6"}], "]"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"rule", "[", 
    RowBox[{"x_", ",", " ", "beakNum_"}], "]"}], " ", ":=", " ", 
   RowBox[{"y", "\[Rule]", "0"}]}], 
  RowBox[{"(*", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"Select", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"Solve", "[", 
          RowBox[{
           RowBox[{
            RowBox[{"D", "[", 
             RowBox[{
              RowBox[{"beakHeight", "[", 
               RowBox[{"x", ",", " ", "y", ",", " ", "beakNum"}], "]"}], ",", 
              " ", "y"}], "]"}], "\[Equal]", "0"}], ",", " ", "y"}], "]"}], 
         "[", 
         RowBox[{"[", 
          RowBox[{";;", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
        RowBox[{
         RowBox[{
          RowBox[{"Abs", "[", "#", "]"}], "<", "2"}], "&"}]}], "]"}], ")"}], 
     "[", 
     RowBox[{"[", "1", "]"}], "]"}], ")"}], "*)"}], ";"}], "\n", 
 RowBox[{
  RowBox[{"curvature", "[", 
   RowBox[{"x_", ",", " ", "beakNum_"}], "]"}], ":=", 
  RowBox[{
   RowBox[{
    RowBox[{"-", "0.5"}], 
    RowBox[{"(", 
     RowBox[{"D", "[", 
      RowBox[{
       RowBox[{"beakHeight", "[", 
        RowBox[{"x", ",", " ", "y", ",", " ", "beakNum"}], "]"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"y", ",", "2"}], "}"}]}], "]"}], ")"}]}], "/.", 
   RowBox[{"rule", "[", 
    RowBox[{"x", ",", " ", "beakNum"}], "]"}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"derCurvature", "[", 
    RowBox[{"x_", ",", " ", "beakNum_"}], "]"}], ":=", 
   RowBox[{
    RowBox[{
     RowBox[{"-", "0.5"}], 
     RowBox[{"D", "[", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{
           RowBox[{"beakHeight", "[", 
            RowBox[{"u", ",", " ", "y", ",", " ", "beakNum"}], "]"}], ",", 
           " ", 
           RowBox[{"{", 
            RowBox[{"y", ",", "2"}], "}"}]}], "]"}], "/.", 
         RowBox[{"rule", "[", 
          RowBox[{"u", ",", " ", "beakNum"}], "]"}]}], ")"}], ",", "u"}], 
      "]"}]}], "/.", 
    RowBox[{"u", "\[Rule]", "x"}]}]}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"curs", " ", "=", " ", 
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{"curvature", "[", 
        RowBox[{"0", ",", " ", "beakNum"}], "]"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"beakNum", ",", "1", ",", "numBeaks"}], "}"}]}], "]"}]}], 
    ";"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "===", "===", "===", "===", "===", "===", "===", "===", "===", "===", "===",
     "===", "===", "===", "===", "===", "===", "===", "==="}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"n", "=", " ", "100"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"yArray", "[", "beakNum_", "]"}], ":=", 
  RowBox[{"Array", "[", 
   RowBox[{
    RowBox[{"#", "&"}], ",", "n", ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"minY", "[", "beakNum", "]"}], ",", 
      RowBox[{"maxY", "[", "beakNum", "]"}]}], "}"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"transverseData", "[", 
   RowBox[{"x_", ",", " ", "beakNum_"}], "]"}], ":=", " ", 
  RowBox[{"Table", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       RowBox[{"yArray", "[", "beakNum", "]"}], "[", 
       RowBox[{"[", "i", "]"}], "]"}], ",", " ", 
      RowBox[{"beakHeight", "[", 
       RowBox[{"x", ",", " ", 
        RowBox[{
         RowBox[{"yArray", "[", "beakNum", "]"}], "[", 
         RowBox[{"[", "i", "]"}], "]"}], ",", " ", "beakNum"}], "]"}]}], 
     "}"}], ",", " ", 
    RowBox[{"{", 
     RowBox[{"i", ",", "1", ",", " ", "100"}], "}"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"transFit", "[", 
    RowBox[{"x_", ",", "y_", ",", " ", "beakNum_"}], "]"}], ":=", 
   RowBox[{
    RowBox[{"Fit", "[", 
     RowBox[{
      RowBox[{"transverseData", "[", 
       RowBox[{"x", ",", " ", "beakNum"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"1", ",", " ", "u", ",", " ", 
        SuperscriptBox["u", "2"]}], "}"}], ",", " ", "u"}], "]"}], "/.", 
    RowBox[{"u", "\[Rule]", "y"}]}]}], " ", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "===", "===", "===", "===", "===", "===", "===", "===", "===", "===", "===",
     "===", "===", "===", "===", "===", "===", "===", "==="}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "===", "===", "===", "===", "===", "===", "===", "===", "===", "===", "===",
     "===", "===", "===", "===", "===", "===", "===", "==="}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "Trying", " ", "to", " ", "show", " ", "where", " ", "the", " ", "beak", 
     " ", "maximum", " ", "is"}], ",", " ", 
    RowBox[{
     RowBox[{
     "it", " ", "is", " ", "not", " ", "presicly", " ", "at", " ", "y"}], "=",
      "0"}]}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"c", "[", 
   RowBox[{"x_", ",", " ", "beakNum_"}], "]"}], ":=", " ", 
  RowBox[{"transFit", "[", 
   RowBox[{"x", ",", "0", ",", "beakNum"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"b", "[", 
   RowBox[{"x_", ",", " ", "beakNum_"}], "]"}], ":=", " ", 
  RowBox[{
   RowBox[{"D", "[", 
    RowBox[{
     RowBox[{"transFit", "[", 
      RowBox[{"x", ",", "u", ",", "beakNum"}], "]"}], ",", " ", "u"}], "]"}], 
   " ", "/.", " ", 
   RowBox[{"u", "\[Rule]", "0"}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"a", "[", 
   RowBox[{"x_", ",", " ", "beakNum_"}], "]"}], ":=", "  ", 
  FractionBox[
   RowBox[{
    RowBox[{"D", "[", 
     RowBox[{
      RowBox[{"transFit", "[", 
       RowBox[{"x", ",", "u", ",", "beakNum"}], "]"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"u", ",", "2"}], "}"}]}], "]"}], " ", "/.", " ", 
    RowBox[{"u", "\[Rule]", "0"}]}], "2"]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"yMax", "[", 
    RowBox[{"x_", ",", " ", "beakNum_"}], "]"}], ":=", "  ", 
   RowBox[{"-", " ", 
    FractionBox[
     RowBox[{"b", "[", 
      RowBox[{"x", ",", " ", "beakNum"}], "]"}], 
     RowBox[{"2", " ", 
      RowBox[{"a", "[", 
       RowBox[{"x", ",", " ", "beakNum"}], "]"}]}]]}]}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "===", "===", "===", "===", "===", "===", "===", "===", "===", "===", "===",
     "===", "===", "===", "===", "===", "===", "===", "==="}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "===", "===", "===", "===", "===", "===", "===", "===", "===", "===", "===",
     "===", "===", "===", "===", "===", "===", "===", "==="}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"fitSagCurv", "[", "beakNum_", "]"}], " ", ":=", " ", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{"n", "=", " ", "100"}], ";", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"midSag1", "[", "x_", " ", "]"}], " ", "=", " ", 
     RowBox[{"beakHeight", "[", 
      RowBox[{"x", ",", 
       RowBox[{"yMax", "[", 
        RowBox[{"x", ",", " ", "beakNum"}], "]"}], ",", "beakNum"}], "]"}]}], 
    ";", "\[IndentingNewLine]", 
    RowBox[{"xArray", "=", 
     RowBox[{"Array", "[", 
      RowBox[{
       RowBox[{"#", "&"}], ",", "n", ",", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"minX", "[", "beakNum", "]"}], ",", 
         RowBox[{"maxX", "[", "beakNum", "]"}]}], "}"}]}], "]"}]}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{"sagData", "=", " ", 
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"xArray", "[", 
          RowBox[{"[", "i", "]"}], "]"}], ",", " ", 
         RowBox[{"midSag1", "[", 
          RowBox[{"xArray", "[", 
           RowBox[{"[", "i", "]"}], "]"}], "]"}]}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"i", ",", "1", ",", " ", "100"}], "}"}]}], "]"}]}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"fitSag", "[", "x_", "]"}], ":=", 
     RowBox[{
      RowBox[{"Fit", "[", 
       RowBox[{"sagData", ",", 
        RowBox[{"{", 
         RowBox[{"1", ",", " ", "u", ",", " ", 
          SuperscriptBox["u", "2"]}], "}"}], ",", " ", "u"}], "]"}], "/.", 
      RowBox[{"u", "\[Rule]", "x"}]}]}], " ", ";", "\[IndentingNewLine]", 
    RowBox[{"Return", "[", 
     RowBox[{
      RowBox[{"-", "0.5"}], " ", 
      RowBox[{"D", "[", 
       RowBox[{
        RowBox[{"fitSag", "[", "x", "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"x", ",", "2"}], "}"}]}], "]"}]}], "]"}]}], 
   ")"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"sagCurs", " ", "=", " ", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"fitSagCurv", "[", "beakNum", "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"beakNum", ",", "1", ",", "numBeaks"}], "}"}]}], "]"}]}], 
   ";"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "===", "===", "===", "===", "===", "===", "===", "===", "===", "===", "===",
     "===", "===", "===", "===", "===", "===", "===", "===", "===", "==="}], 
   "*)"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"curs", " ", ":=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"curvature", "[", " ", 
      RowBox[{
       RowBox[{"minX", "[", "beakNum", "]"}], ",", " ", "beakNum"}], "]"}], 
     ",", " ", 
     RowBox[{"{", 
      RowBox[{"beakNum", ",", "1", ",", "numBeaks"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ders", "  ", "=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"Abs", "[", 
      RowBox[{"derCurvature", "[", 
       RowBox[{"0", ",", " ", "beakNum"}], "]"}], "]"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"beakNum", ",", "1", ",", "numBeaks"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"sagCurs", "=", " ", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"fitSagCurv", "[", "beakNum", "]"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"beakNum", ",", "1", ",", "numBeaks"}], "}"}]}], "]"}]}], 
   ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"Len", " ", "=", " ", 
    RowBox[{"topDimensions", "[", 
     RowBox[{"[", 
      RowBox[{";;", ",", "1"}], "]"}], "]"}]}], ";", " ", 
   RowBox[{"Wid", " ", "=", " ", 
    RowBox[{"topDimensions", "[", 
     RowBox[{"[", 
      RowBox[{";;", ",", "2"}], "]"}], "]"}]}], ";", " ", 
   RowBox[{"Dep", " ", "=", " ", 
    RowBox[{"topDimensions", "[", 
     RowBox[{"[", 
      RowBox[{";;", ",", "3"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ncurs", " ", "=", " ", 
   RowBox[{"curs", " ", 
    FractionBox[
     SuperscriptBox["Wid", "2"], 
     RowBox[{" ", "Dep"}]]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"nders", " ", "=", " ", 
   RowBox[{"ders", " ", 
    FractionBox[
     SuperscriptBox["Wid", "2"], "Dep"], "Len"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"nsagCurs", "=", " ", 
   RowBox[{"sagCurs", 
    FractionBox[
     SuperscriptBox["Len", "2"], "Dep"]}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.7674392563671703`*^9, 3.767439277978262*^9}, {
   3.782199053400692*^9, 3.7821990540005293`*^9}, {3.7821992495372877`*^9, 
   3.782199284798437*^9}, 3.7821993262000294`*^9, {3.7821995535122104`*^9, 
   3.7821995653385267`*^9}, {3.782199598869815*^9, 3.7821996303208933`*^9}, 
   3.782199948972231*^9, {3.782200106207756*^9, 3.7822001619796476`*^9}, {
   3.7822019999647055`*^9, 3.782202040086132*^9}, {3.782202934637698*^9, 
   3.782202944248049*^9}, {3.7822089419865127`*^9, 3.782208957405797*^9}, {
   3.782208988957661*^9, 3.7822089905590057`*^9}, 3.782213208730784*^9, {
   3.7822133550558553`*^9, 3.782213380986842*^9}, {3.7822134253683863`*^9, 
   3.782213445159075*^9}, {3.7822135100513763`*^9, 3.7822135121013823`*^9}, {
   3.7822136444295387`*^9, 3.7822136565687146`*^9}, {3.782213896335086*^9, 
   3.782213900025198*^9}, {3.782214137573577*^9, 3.782214178444991*^9}, {
   3.782214293869006*^9, 3.782214316329893*^9}, {3.782214354851346*^9, 
   3.7822143590813675`*^9}, {3.7822147754214964`*^9, 
   3.7822147986664753`*^9}, {3.782214897708394*^9, 3.782214937578516*^9}, {
   3.7822222331892242`*^9, 3.782222243815826*^9}, {3.782222282464943*^9, 
   3.7822223251538267`*^9}, {3.782222408068987*^9, 3.782222412179172*^9}, {
   3.7822228630051575`*^9, 3.782222874872036*^9}, 3.7822229514534597`*^9, {
   3.7822242161140714`*^9, 3.782224229877039*^9}, {3.782224273954792*^9, 
   3.7822243340489655`*^9}, {3.7822244161344852`*^9, 
   3.7822244190294847`*^9}, {3.7822245200856037`*^9, 
   3.7822245222156115`*^9}, {3.7822356816464396`*^9, 3.782235773395348*^9}, 
   3.7822358059519167`*^9, {3.782235921701243*^9, 3.782235923830904*^9}, {
   3.782236431233148*^9, 3.782236433904249*^9}, {3.7822366889309683`*^9, 
   3.782236706560809*^9}, {3.782236753746069*^9, 3.7822367583082113`*^9}, {
   3.7822368248851776`*^9, 3.7822368267411113`*^9}, {3.7822881257422304`*^9, 
   3.7822881541249943`*^9}, {3.782288464289651*^9, 3.7822884652425566`*^9}, {
   3.7822887210525217`*^9, 3.7822887303511505`*^9}, {3.782290078510761*^9, 
   3.782290090561883*^9}, {3.782296056549779*^9, 3.782296106453903*^9}, {
   3.7822961366235805`*^9, 3.7822962012143846`*^9}, {3.782296239532135*^9, 
   3.7822962406256275`*^9}, {3.782296289115715*^9, 3.782296316177085*^9}, {
   3.7825840600683084`*^9, 3.782584076153823*^9}, {3.7831581997345557`*^9, 
   3.7831582088764663`*^9}, {3.783158276369729*^9, 3.783158278058962*^9}, {
   3.7831595266975994`*^9, 3.783159555375616*^9}, 3.783850832581456*^9, 
   3.783850916399356*^9, {3.783860607002857*^9, 3.7838606147734365`*^9}, {
   3.794471878627804*^9, 3.79447190664793*^9}, {3.7944726106654096`*^9, 
   3.794472619489828*^9}, {3.794472740316942*^9, 3.794472740393737*^9}, 
   3.794472814292285*^9, {3.794472874363834*^9, 3.794472874442594*^9}, 
   3.7944729100843687`*^9, {3.7944729826604023`*^9, 3.7944729829705973`*^9}, 
   3.794473039660103*^9, 3.7944730879181223`*^9, {3.794473131341121*^9, 
   3.7944731315216436`*^9}, 3.7944731798684177`*^9, {3.794473211565714*^9, 
   3.7944732120095277`*^9}, 3.7944732586768184`*^9, {3.795333916734455*^9, 
   3.79533391691494*^9}, {3.7953343495028696`*^9, 3.7953343507790155`*^9}, {
   3.795334442093317*^9, 3.7953344425301247`*^9}, 3.7953345835724263`*^9, {
   3.797784493928443*^9, 3.797784567224389*^9}},
 CellLabel->"In[1]:=",ExpressionUUID->"783f9359-f753-4322-a56c-b680545facc4"],

Cell[BoxData[
 RowBox[{"{", "30", "}"}]], "Output",
 CellChangeTimes->{
  3.795333990104285*^9, {3.795334341661675*^9, 3.795334351501574*^9}, {
   3.795334415921237*^9, 3.7953344431684475`*^9}, 3.795334584545615*^9, 
   3.79594522123497*^9, 3.796119997636377*^9, 3.7963902930117364`*^9, 
   3.7977843937341146`*^9, {3.797784544308617*^9, 3.79778456802123*^9}, 
   3.7978454958332567`*^9, 3.8139145932413483`*^9},
 CellLabel->"Out[3]=",ExpressionUUID->"be63d392-d26f-4be2-90ee-a1bd4541a1f3"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"Suppose", " ", "\[Lambda]", " ", "is", " ", 
   FractionBox[
    RowBox[{"L", "-", "x"}], "L"], " ", "and", " ", "work", " ", "backwards", 
   " ", "from", " ", "equations", " ", "to", " ", "solve", " ", "for", " ", 
   RowBox[{"f", "[", "\[Lambda]", "]"}], " ", "and", " ", 
   RowBox[{"g", "[", "\[Lambda]", "]"}]}], "*)"}]], "Input",
 FontSize->24,ExpressionUUID->"4d20b53d-e84b-437c-bc9a-97a5e8c0cfb0"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"evluating", " ", "for", " ", "particular", " ", "beaks"}], "*)"}],
   "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"beakNum", " ", "=", "1"}], ";", " ", 
    RowBox[{"names", "[", 
     RowBox[{"[", "beakNum", "]"}], "]"}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"section", "[", "\[Lambda]_", "]"}], ":=", " ", 
     RowBox[{"Import", "[", 
      RowBox[{"\"\<section_\>\"", " ", "<>", " ", 
       RowBox[{"ToString", "[", "\[Lambda]", "]"}], " ", "<>", " ", 
       "\"\<.csv\>\""}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"D0", " ", "=", " ", 
     RowBox[{"Dep", "[", 
      RowBox[{"[", "beakNum", "]"}], "]"}]}], ";", " ", 
    RowBox[{"L0", "=", "  ", 
     RowBox[{"Len", "[", 
      RowBox[{"[", "beakNum", "]"}], "]"}]}], ";", " ", 
    RowBox[{"W0", "=", " ", 
     RowBox[{"Wid", "[", 
      RowBox[{"[", "beakNum", "]"}], "]"}]}], ";", " ", 
    RowBox[{"k0tilde", " ", "=", " ", 
     RowBox[{"ncurs", "[", 
      RowBox[{"[", "beakNum", "]"}], "]"}]}], ";", " ", 
    RowBox[{"Stilde", " ", "=", 
     RowBox[{"nders", "[", 
      RowBox[{"[", "beakNum", "]"}], "]"}]}], ";", " ", 
    RowBox[{"kx", " ", "=", " ", 
     RowBox[{"nsagCurs", "[", 
      RowBox[{"[", "beakNum", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"d", "[", "\[Lambda]_", "]"}], " ", "=", " ", 
     RowBox[{
      RowBox[{"D0", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{
          RowBox[{"(", 
           RowBox[{"1", "-", " ", "\[Lambda]"}], ")"}], 
          RowBox[{"(", 
           RowBox[{"1", " ", "+", " ", "kx"}], ")"}]}], " ", "-", " ", 
         RowBox[{"kx", " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"1", " ", "-", " ", "\[Lambda]"}], ")"}], "2"]}]}], 
        ")"}]}], "//", "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"W", "[", "\[Lambda]_", "]"}], " ", "=", " ", 
     RowBox[{
      RowBox[{"W0", " ", 
       RowBox[{"Sqrt", "[", " ", 
        FractionBox[
         RowBox[{" ", 
          RowBox[{"4", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"d", "[", "\[Lambda]", "]"}], "/", "D0"}], ")"}]}]}], 
         RowBox[{"k0tilde", " ", "-", " ", 
          RowBox[{"Stilde", " ", 
           RowBox[{"(", 
            RowBox[{"1", " ", "-", " ", "\[Lambda]"}], ")"}], " "}]}]], 
        "]"}]}], "//", "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"sectionalForm", "[", 
      RowBox[{"y_", ",", "\[Lambda]_"}], "]"}], " ", "=", " ", 
     RowBox[{"{", 
      RowBox[{"y", ",", " ", 
       RowBox[{
        RowBox[{"d", "[", "\[Lambda]", "]"}], " ", 
        RowBox[{"(", 
         RowBox[{"1", " ", "-", " ", 
          RowBox[{"4", " ", 
           FractionBox[
            SuperscriptBox["y", "2"], 
            SuperscriptBox[
             RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]]}]}], ")"}]}]}], 
      "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"sectionFormPlot", "[", "\[Lambda]_", "]"}], ":=", " ", 
    RowBox[{"ParametricPlot", "[", 
     RowBox[{
      RowBox[{"sectionalForm", "[", 
       RowBox[{"y", ",", "\[Lambda]"}], "]"}], " ", ",", " ", 
      RowBox[{"{", 
       RowBox[{"y", ",", " ", 
        FractionBox[
         RowBox[{"-", 
          RowBox[{"W", "[", "\[Lambda]", "]"}]}], "2"], ",", " ", 
        FractionBox[
         RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]}], "}"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Thickness", "[", "0.007", "]"}], ",", " ", "Red"}], "}"}]}],
       ",", " ", 
      RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"sectionFormPlotD", "[", "\[Lambda]_", "]"}], ":=", " ", 
    RowBox[{"ParametricPlot", "[", 
     RowBox[{
      RowBox[{"sectionalForm", "[", 
       RowBox[{"y", ",", "\[Lambda]"}], "]"}], " ", ",", " ", 
      RowBox[{"{", 
       RowBox[{"y", ",", " ", 
        FractionBox[
         RowBox[{"-", 
          RowBox[{"W", "[", "\[Lambda]", "]"}]}], "2"], ",", " ", 
        FractionBox[
         RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]}], "}"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Thickness", "[", "0.007", "]"}], ",", " ", "Red", ",", " ", 
         "Dashed"}], "}"}]}], ",", " ", 
      RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}]}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"sectionPointPlot", "[", "\[Lambda]_", "]"}], ":=", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"sec", " ", "=", " ", 
        RowBox[{"section", "[", "\[Lambda]", "]"}]}], ";", 
       "\[IndentingNewLine]", 
       RowBox[{"Graphics", "[", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Blue", ",", " ", 
           RowBox[{"Point", "[", 
            RowBox[{"section", "[", "\[Lambda]", "]"}], "]"}]}], "}"}], ",", 
         " ", 
         RowBox[{"Epilog", "\[Rule]", 
          RowBox[{"sectionFormplot", "[", "\[Lambda]", "]"}]}]}], "]"}]}], 
      ")"}]}], "\[IndentingNewLine]", "*)"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"normal", "[", 
      RowBox[{"y_", ",", " ", "\[Lambda]_"}], "]"}], " ", "=", " ", 
     RowBox[{"{", 
      RowBox[{
       FractionBox[
        RowBox[{"8", " ", "y", " ", 
         RowBox[{"d", "[", "\[Lambda]", "]"}]}], 
        SuperscriptBox[
         RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]], ",", "1"}], "}"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"fNormal", "[", 
      RowBox[{"y_", ",", " ", "\[Lambda]_"}], "]"}], " ", "=", 
     RowBox[{
      RowBox[{
       RowBox[{"FrenetSerretSystem", "[", 
        RowBox[{
         RowBox[{"sectionalForm", "[", 
          RowBox[{"y", ",", " ", "\[Lambda]"}], "]"}], ",", "y"}], "]"}], "[", 
       RowBox[{"[", 
        RowBox[{"2", ",", "2"}], "]"}], "]"}], "//", "FullSimplify"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"signedCurvature", "[", 
      RowBox[{"y_", ",", "\[Lambda]_"}], "]"}], "=", " ", 
     RowBox[{"-", 
      RowBox[{
       RowBox[{"FrenetSerretSystem", "[", 
        RowBox[{
         RowBox[{"sectionalForm", "[", 
          RowBox[{"y", ",", " ", "\[Lambda]"}], "]"}], ",", "y"}], "]"}], "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "1"}], "]"}], "]"}]}]}], ";"}], 
   RowBox[{"(*", " ", 
    RowBox[{"8", " ", 
     SqrtBox[
      FractionBox[
       RowBox[{
        SuperscriptBox[
         RowBox[{"d", "[", "\[Lambda]", "]"}], "2"], " ", 
        SuperscriptBox[
         RowBox[{"W", "[", "\[Lambda]", "]"}], "8"]}], 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          RowBox[{"64", " ", 
           SuperscriptBox["y", "2"], " ", 
           SuperscriptBox[
            RowBox[{"d", "[", "\[Lambda]", "]"}], "2"]}], "+", 
          SuperscriptBox[
           RowBox[{"W", "[", "\[Lambda]", "]"}], "4"]}], ")"}], "3"]]]}], 
    "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"c0", "[", "\[Lambda]_", "]"}], ":=", " ", 
    FractionBox[
     RowBox[{
      RowBox[{"4", " ", 
       SuperscriptBox[
        RowBox[{"W", "[", "\[Lambda]", "]"}], 
        RowBox[{"1", "/", "3"}]], " ", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          RowBox[{"d", "[", "\[Lambda]", "]"}], " ", 
          RowBox[{"W", "[", "\[Lambda]", "]"}]}], ")"}], 
        RowBox[{"2", "/", "3"}]], " ", 
       RowBox[{
        SuperscriptBox["d", "\[Prime]",
         MultilineFunction->None], "[", "\[Lambda]", "]"}]}], "-", 
      RowBox[{"8", " ", 
       SuperscriptBox[
        RowBox[{"d", "[", "\[Lambda]", "]"}], 
        RowBox[{"5", "/", "3"}]], " ", 
       RowBox[{
        SuperscriptBox["W", "\[Prime]",
         MultilineFunction->None], "[", "\[Lambda]", "]"}]}]}], 
     RowBox[{"32", " ", 
      SuperscriptBox[
       RowBox[{"d", "[", "\[Lambda]", "]"}], 
       RowBox[{"7", "/", "3"}]], " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["1", 
         RowBox[{"W", "[", "\[Lambda]", "]"}]], ")"}], 
       RowBox[{"1", "/", "3"}]], " "}]]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"c1", "[", "\[Lambda]_", "]"}], ":=", 
    FractionBox[
     RowBox[{" ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"-", "16"}], " ", 
         SuperscriptBox[
          RowBox[{"d", "[", "\[Lambda]", "]"}], "2"], " ", 
         SuperscriptBox[
          RowBox[{"W", "[", "\[Lambda]", "]"}], 
          RowBox[{"1", "/", "3"}]], " ", 
         RowBox[{
          SuperscriptBox["d", "\[Prime]",
           MultilineFunction->None], "[", "\[Lambda]", "]"}]}], "-", 
        RowBox[{
         SuperscriptBox[
          RowBox[{"W", "[", "\[Lambda]", "]"}], 
          RowBox[{"7", "/", "3"}]], " ", 
         RowBox[{
          SuperscriptBox["d", "\[Prime]",
           MultilineFunction->None], "[", "\[Lambda]", "]"}]}], "+", 
        RowBox[{"2", " ", 
         RowBox[{"d", "[", "\[Lambda]", "]"}], " ", 
         SuperscriptBox[
          RowBox[{"W", "[", "\[Lambda]", "]"}], 
          RowBox[{"4", "/", "3"}]], " ", 
         RowBox[{
          SuperscriptBox["W", "\[Prime]",
           MultilineFunction->None], "[", "\[Lambda]", "]"}]}]}], ")"}]}], 
     RowBox[{"32", " ", 
      SuperscriptBox[
       RowBox[{"d", "[", "\[Lambda]", "]"}], 
       RowBox[{"7", "/", "3"}]], " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["1", 
         RowBox[{"W", "[", "\[Lambda]", "]"}]], ")"}], 
       RowBox[{"1", "/", "3"}]]}]]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"displacement", "[", 
      RowBox[{"\[Lambda]_", ",", "d\[Lambda]_"}], "]"}], "[", "y_", "]"}], ":=",
     "  ", 
    RowBox[{
     RowBox[{"-", " ", "d\[Lambda]"}], 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"c0", "[", "\[Lambda]", "]"}], " ", 
        SuperscriptBox[
         RowBox[{"signedCurvature", "[", 
          RowBox[{"y", ",", " ", "\[Lambda]"}], "]"}], 
         RowBox[{
          RowBox[{"-", "1"}], "/", "3"}]]}], " ", "+", " ", 
       RowBox[{
        RowBox[{"c1", "[", "\[Lambda]", "]"}], " ", 
        SuperscriptBox[
         RowBox[{"signedCurvature", "[", 
          RowBox[{"y", ",", " ", "\[Lambda]"}], "]"}], 
         RowBox[{"1", "/", "3"}]]}]}], ")"}], 
     RowBox[{"fNormal", "[", 
      RowBox[{"y", ",", " ", "\[Lambda]"}], "]"}]}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"CSFdisplacement", "[", 
      RowBox[{"\[Lambda]_", ",", "d\[Lambda]_"}], "]"}], "[", "y_", "]"}], ":=",
     "  ", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"d", "[", "\[Lambda]", "]"}], " ", "-", 
       RowBox[{"d", "[", 
        RowBox[{"\[Lambda]", " ", "+", " ", "d\[Lambda]"}], "]"}]}], " ", 
      ")"}], "  ", 
     RowBox[{"signedCurvature", "[", 
      RowBox[{"y", ",", " ", "\[Lambda]"}], "]"}], " ", 
     RowBox[{"fNormal", "[", 
      RowBox[{"y", ",", " ", "\[Lambda]"}], "]"}]}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"strainRate", "[", 
     RowBox[{"y_", ",", "\[Lambda]_"}], "]"}], ":=", " ", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"(", " ", 
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{
           RowBox[{"sectionalForm", "[", 
            RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], ",", " ", "u"}], 
          "]"}], ".", 
         RowBox[{"D", "[", 
          RowBox[{
           RowBox[{
            RowBox[{"displacement", "[", 
             RowBox[{"\[Lambda]", ",", "1"}], "]"}], "[", "u", "]"}], ",", 
           " ", "u"}], "]"}]}], ")"}], "/", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{
           RowBox[{"sectionalForm", "[", 
            RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], ",", " ", "u"}], 
          "]"}], ".", 
         RowBox[{"D", "[", 
          RowBox[{
           RowBox[{"sectionalForm", "[", 
            RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], ",", " ", "u"}], 
          "]"}]}], ")"}]}], ")"}], " ", "/.", 
     RowBox[{"u", "\[Rule]", " ", "y"}]}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"CSFstrainRate", "[", 
     RowBox[{"y_", ",", "\[Lambda]_"}], "]"}], ":=", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"(", " ", 
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{
           RowBox[{"sectionalForm", "[", 
            RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], ",", " ", "u"}], 
          "]"}], ".", 
         RowBox[{"D", "[", 
          RowBox[{
           RowBox[{
            RowBox[{"CSFdisplacement", "[", 
             RowBox[{"\[Lambda]", ",", "1"}], "]"}], "[", "u", "]"}], ",", 
           " ", "u"}], "]"}]}], ")"}], "/", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{
           RowBox[{"sectionalForm", "[", 
            RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], ",", " ", "u"}], 
          "]"}], ".", 
         RowBox[{"D", "[", 
          RowBox[{
           RowBox[{"sectionalForm", "[", 
            RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], ",", " ", "u"}], 
          "]"}]}], ")"}]}], ")"}], " ", "/.", 
     RowBox[{"u", "\[Rule]", " ", "y"}]}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"arrow", "[", 
      RowBox[{"\[Lambda]_", ",", "d\[Lambda]_"}], "]"}], "[", "y_", "]"}], ":=",
     " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"sectionalForm", "[", 
       RowBox[{"y", ",", "\[Lambda]"}], "]"}], " ", ",", " ", 
      RowBox[{
       RowBox[{"sectionalForm", "[", 
        RowBox[{"y", ",", "\[Lambda]"}], "]"}], "  ", "+", " ", 
       RowBox[{
        RowBox[{"displacement", "[", 
         RowBox[{"\[Lambda]", ",", "d\[Lambda]"}], "]"}], "[", "y", "]"}]}]}],
      "}"}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"CSFarrow", "[", 
      RowBox[{"\[Lambda]_", ",", "d\[Lambda]_"}], "]"}], "[", "y_", "]"}], ":=",
     " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"sectionalForm", "[", 
       RowBox[{"y", ",", "\[Lambda]"}], "]"}], " ", ",", " ", 
      RowBox[{
       RowBox[{"sectionalForm", "[", 
        RowBox[{"y", ",", "\[Lambda]"}], "]"}], "  ", "+", " ", 
       RowBox[{
        RowBox[{"CSFdisplacement", "[", 
         RowBox[{"\[Lambda]", ",", "d\[Lambda]"}], "]"}], "[", "y", "]"}]}]}],
      "}"}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"yvalues", "[", "\[Lambda]_", "]"}], " ", "=", " ", 
     RowBox[{"Table", "[", 
      RowBox[{"y", ",", " ", 
       RowBox[{"{", 
        RowBox[{"y", ",", 
         FractionBox[
          RowBox[{
           RowBox[{"-", "0.9"}], 
           RowBox[{"W", "[", "\[Lambda]", "]"}]}], "2"], ",", " ", 
         FractionBox[
          RowBox[{"0.95", " ", 
           RowBox[{"W", "[", "\[Lambda]", "]"}]}], "2"], ",", " ", 
         RowBox[{"0.05", " ", 
          RowBox[{"W", "[", "\[Lambda]", "]"}]}]}], "}"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"plotArrows", "[", 
     RowBox[{"\[Lambda]_", ",", "  ", "d\[Lambda]_"}], "]"}], " ", ":=", " ", 
    RowBox[{"Graphics", "[", 
     RowBox[{"{", 
      RowBox[{"Green", ",", " ", 
       RowBox[{"Arrow", "[", 
        RowBox[{
         RowBox[{"arrow", "[", 
          RowBox[{"\[Lambda]", ",", " ", "d\[Lambda]"}], "]"}], " ", "/@", 
         " ", 
         RowBox[{"yvalues", "[", "\[Lambda]", "]"}]}], "]"}]}], "}"}], 
     "]"}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"plotCSFarrows", "[", 
     RowBox[{"\[Lambda]_", ",", "  ", "d\[Lambda]_"}], "]"}], " ", ":=", " ", 
    RowBox[{"Graphics", "[", 
     RowBox[{"{", 
      RowBox[{"Green", ",", " ", 
       RowBox[{"Arrow", "[", 
        RowBox[{
         RowBox[{"CSFarrow", "[", 
          RowBox[{"\[Lambda]", ",", " ", "d\[Lambda]"}], "]"}], " ", "/@", 
         " ", 
         RowBox[{"yvalues", "[", "\[Lambda]", "]"}]}], "]"}]}], "}"}], 
     "]"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"displacementMagnitude", "[", 
     RowBox[{"y_", ",", " ", "\[Lambda]_"}], "]"}], " ", ":=", " ", 
    RowBox[{"Norm", "[", 
     RowBox[{
      RowBox[{"displacement", "[", 
       RowBox[{"\[Lambda]", ",", "1"}], "]"}], "[", "y", "]"}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
    "Fit", " ", "the", " ", "relation", " ", "between", " ", "the", " ", 
     "two"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"fitPPFlow", "[", "\[Lambda]_", "]"}], " ", ":=", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"data", " ", "=", " ", 
       RowBox[{"Table", "[", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{
           RowBox[{"signedCurvature", "[", 
            RowBox[{"y", ",", "\[Lambda]"}], "]"}], ",", 
           RowBox[{"(", 
            RowBox[{"displacementMagnitude", "[", 
             RowBox[{"y", ",", "\[Lambda]"}], "]"}], ")"}]}], "}"}], ",", " ", 
         RowBox[{"{", 
          RowBox[{"y", ",", " ", "0", ",", " ", 
           RowBox[{"0.5", 
            RowBox[{"W", "[", "\[Lambda]", "]"}]}], ",", " ", 
           RowBox[{"0.05", " ", 
            RowBox[{"W", "[", "\[Lambda]", "]"}]}]}], "}"}]}], "]"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"f", "[", "\[Kappa]_", "]"}], "=", " ", 
       RowBox[{"Fit", "[", 
        RowBox[{"data", ",", 
         RowBox[{"{", 
          RowBox[{
           SuperscriptBox["\[Kappa]", 
            RowBox[{
             RowBox[{"-", "1"}], "/", "3"}]], ",", " ", 
           SuperscriptBox["\[Kappa]", 
            RowBox[{"1", "/", "3"}]]}], "}"}], ",", " ", "\[Kappa]"}], 
        "]"}]}]}], ")"}]}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{
      RowBox[{"kmin", "[", "\[Lambda]_", "]"}], ":=", " ", 
      RowBox[{"signedCurvature", "[", 
       RowBox[{
        FractionBox[
         RowBox[{"W", "[", "\[Lambda]", "]"}], "2"], ",", "\[Lambda]"}], 
       "]"}]}], ";", 
     RowBox[{
      RowBox[{"kmax", "[", "\[Lambda]_", "]"}], ":=", " ", 
      RowBox[{"signedCurvature", "[", 
       RowBox[{"0", ",", "\[Lambda]"}], "]"}]}], ";", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"\[Alpha]", "[", "\[Lambda]_", "]"}], ":=", " ", 
      RowBox[{
       FractionBox[
        RowBox[{"1", "/", "2"}], 
        RowBox[{
         RowBox[{"kmax", "[", "\[Lambda]", "]"}], " ", "-", " ", 
         RowBox[{"kmin", "[", "\[Lambda]", "]"}]}]], 
       RowBox[{"(", 
        RowBox[{
         SuperscriptBox[
          RowBox[{"kmax", "[", "\[Lambda]", "]"}], "2"], " ", "-", " ", 
         SuperscriptBox[
          RowBox[{"kmin", "[", "\[Lambda]", "]"}], "2"]}], ")"}]}]}]}], 
    "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"fitLinear", "[", "\[Lambda]_", "]"}], ":=", 
    RowBox[{"(", " ", 
     RowBox[{
      RowBox[{"data", " ", "=", " ", 
       RowBox[{"Table", "[", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{
           RowBox[{"signedCurvature", "[", 
            RowBox[{"y", ",", "\[Lambda]"}], "]"}], ",", 
           RowBox[{"(", 
            RowBox[{"displacementMagnitude", "[", 
             RowBox[{"y", ",", "\[Lambda]"}], "]"}], ")"}]}], "}"}], ",", " ", 
         RowBox[{"{", 
          RowBox[{"y", ",", " ", "0", ",", " ", 
           RowBox[{"0.5", 
            RowBox[{"W", "[", "\[Lambda]", "]"}]}], ",", " ", 
           RowBox[{"0.05", " ", 
            RowBox[{"W", "[", "\[Lambda]", "]"}]}]}], "}"}]}], "]"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"f", "[", "\[Kappa]_", "]"}], "=", " ", 
       RowBox[{"Fit", "[", 
        RowBox[{"data", ",", 
         RowBox[{"{", 
          RowBox[{"1", ",", " ", "\[Kappa]"}], " ", "}"}], ",", " ", 
         "\[Kappa]"}], "]"}]}]}], ")"}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"fitLinearArrows", "[", 
     RowBox[{"\[Lambda]_", ",", " ", "d\[Lambda]_"}], "]"}], ":=", 
    RowBox[{"(", " ", 
     RowBox[{
      RowBox[{"data", " ", "=", " ", 
       RowBox[{"Table", "[", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{
           RowBox[{"signedCurvature", "[", 
            RowBox[{"y", ",", "\[Lambda]"}], "]"}], ",", 
           RowBox[{"(", 
            RowBox[{"displacementMagnitude", "[", 
             RowBox[{"y", ",", "\[Lambda]"}], "]"}], ")"}]}], "}"}], ",", " ", 
         RowBox[{"{", 
          RowBox[{"y", ",", " ", "0", ",", " ", 
           RowBox[{"0.5", 
            RowBox[{"W", "[", "\[Lambda]", "]"}]}], ",", " ", 
           RowBox[{"0.05", " ", 
            RowBox[{"W", "[", "\[Lambda]", "]"}]}]}], "}"}]}], "]"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"f", "[", "\[Kappa]_", "]"}], "=", " ", 
       RowBox[{"Fit", "[", 
        RowBox[{"data", ",", 
         RowBox[{"{", 
          RowBox[{"1", ",", " ", "\[Kappa]"}], " ", "}"}], ",", " ", 
         "\[Kappa]"}], "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"disp", "[", "y_", "]"}], " ", ":=", 
       RowBox[{
        RowBox[{"-", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"fNormal", "[", 
            RowBox[{"y", ",", " ", "\[Lambda]"}], "]"}], " ", 
           RowBox[{"f", "[", "\[Kappa]", "]"}]}], ")"}]}], "/.", 
        RowBox[{"\[Kappa]", "\[Rule]", " ", 
         RowBox[{"signedCurvature", "[", 
          RowBox[{"y", ",", "\[Lambda]"}], "]"}]}]}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"arr", "[", "y_", "]"}], ":=", " ", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"sectionalForm", "[", 
          RowBox[{"y", ",", "\[Lambda]"}], "]"}], " ", ",", " ", 
         RowBox[{
          RowBox[{"sectionalForm", "[", 
           RowBox[{"y", ",", "\[Lambda]"}], "]"}], "  ", "+", 
          RowBox[{"d\[Lambda]", " ", 
           RowBox[{"disp", "[", "y", "]"}]}]}]}], "}"}]}], ";", 
      "\[IndentingNewLine]", " ", 
      RowBox[{"Graphics", "[", 
       RowBox[{"{", 
        RowBox[{"Green", ",", " ", 
         RowBox[{"Arrow", "[", 
          RowBox[{"arr", " ", "/@", " ", 
           RowBox[{"yvalues", "[", "\[Lambda]", "]"}]}], "]"}]}], "}"}], 
       "]"}]}], " ", ")"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"plotMagnitudeNCurvature", "[", "\[Lambda]_", "]"}], " ", ":=", 
     " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"displacementMagnitude", "[", 
          RowBox[{"y", ",", "\[Lambda]"}], "]"}], ",", " ", 
         RowBox[{
          RowBox[{"fitPPFlow", "[", "\[Lambda]", "]"}], "/.", 
          RowBox[{"\[Kappa]", "->", 
           RowBox[{"signedCurvature", "[", 
            RowBox[{"y", ",", "\[Lambda]"}], "]"}]}]}], ",", 
         RowBox[{
          RowBox[{"fitLinear", "[", "\[Lambda]", "]"}], "/.", 
          RowBox[{"\[Kappa]", "->", 
           RowBox[{"signedCurvature", "[", 
            RowBox[{"y", ",", "\[Lambda]"}], "]"}]}]}]}], "}"}], ",", "  ", 
       RowBox[{"{", 
        RowBox[{"y", ",", " ", 
         FractionBox[
          RowBox[{"-", 
           RowBox[{"W", "[", "\[Lambda]", "]"}]}], "2"], ",", " ", 
         FractionBox[
          RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"Thickness", "[", "0.01", "]"}], ",", "Purple"}], "}"}], 
          ",", "  ", 
          RowBox[{"{", 
           RowBox[{"Green", ",", " ", "Thick"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"Red", ",", "Thick"}], "}"}]}], "}"}]}], ",", 
       RowBox[{"(*", 
        RowBox[{
         RowBox[{"BaseStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"FontSize", "\[Rule]", "15"}], ",", 
            RowBox[{"FontFamily", "\[Rule]", "\"\<Times\>\""}], ",", "Bold"}],
            "}"}]}], ","}], "*)"}], " ", 
       RowBox[{"PlotLegends", "\[Rule]", 
        RowBox[{"{", " ", 
         RowBox[{
         "\"\<|v|\>\"", ",", " ", 
          "\"\<\!\(\*SubscriptBox[\(c\), \(-\)]\) \!\(\*SuperscriptBox[\(\
\[Kappa]\), \(\(-1\)/3\)]\) + \!\(\*SubscriptBox[\(c\), \(+\)]\)  \
\!\(\*SuperscriptBox[\(\[Kappa]\), \(1/3\)]\)\>\"", ",", 
          "\"\<a + b \[Kappa]\>\""}], "}"}]}], ",", 
       RowBox[{"AxesLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"\"\<y\>\"", ",", "\"\<|v|\>\""}], "}"}]}], " ", ",", " ", 
       RowBox[{"AxesOrigin", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0"}], "}"}]}], ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"plotTermVSCurvature", "[", "\[Lambda]_", "]"}], " ", ":=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{
           RowBox[{"fitPPFlow", "[", "\[Lambda]", "]"}], "[", 
           RowBox[{"[", "1", "]"}], "]"}], "/.", 
          RowBox[{"\[Kappa]", "->", 
           RowBox[{"signedCurvature", "[", 
            RowBox[{"y", ",", "\[Lambda]"}], "]"}]}]}], ",", " ", 
         RowBox[{
          RowBox[{
           RowBox[{"fitPPFlow", "[", "\[Lambda]", "]"}], "[", 
           RowBox[{"[", "2", "]"}], "]"}], "/.", 
          RowBox[{"\[Kappa]", "->", 
           RowBox[{"signedCurvature", "[", 
            RowBox[{"y", ",", "\[Lambda]"}], "]"}]}]}]}], "}"}], ",", "  ", 
       RowBox[{"{", 
        RowBox[{"y", ",", " ", 
         FractionBox[
          RowBox[{"-", 
           RowBox[{"W", "[", "\[Lambda]", "]"}]}], "2"], ",", " ", 
         FractionBox[
          RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Thick", ",", "Red"}], "}"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"Blue", ",", "Thick"}], "}"}]}], "}"}]}], 
       RowBox[{"(*", 
        RowBox[{",", 
         RowBox[{"BaseStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"FontSize", "\[Rule]", "15"}], ",", 
            RowBox[{"FontFamily", "\[Rule]", "\"\<Times\>\""}], ",", "Bold"}],
            "}"}]}]}], "*)"}], ",", " ", 
       RowBox[{"PlotLegends", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
         "\"\<\!\(\*SubscriptBox[\(c\), \(0\)]\) \!\(\*SuperscriptBox[\(\
\[Kappa]\), \(\(-1\)/3\)]\)\>\"", " ", ",", " ", 
          "\"\<\!\(\*SubscriptBox[\(c\), \(1\)]\)  \!\(\*SuperscriptBox[\(\
\[Kappa]\), \(1/3\)]\)\>\""}], "}"}]}], ",", " ", 
       RowBox[{"AxesLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"\"\<y\>\"", ",", " ", "\"\<term\>\""}], "}"}]}], ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"plotTermVSCurvatureCSF", "[", "\[Lambda]_", "]"}], " ", ":=", 
     " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{
           RowBox[{"fitLinear", "[", "\[Lambda]", "]"}], "[", 
           RowBox[{"[", "1", "]"}], "]"}], "/.", 
          RowBox[{"\[Kappa]", "->", 
           RowBox[{"signedCurvature", "[", 
            RowBox[{"y", ",", "\[Lambda]"}], "]"}]}]}], ",", " ", 
         RowBox[{
          RowBox[{
           RowBox[{"fitLinear", "[", "\[Lambda]", "]"}], "[", 
           RowBox[{"[", "2", "]"}], "]"}], "/.", 
          RowBox[{"\[Kappa]", "->", 
           RowBox[{"signedCurvature", "[", 
            RowBox[{"y", ",", "\[Lambda]"}], "]"}]}]}], ",", " ", 
         RowBox[{
          RowBox[{"fitLinear", "[", "\[Lambda]", "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"2", ",", "1"}], "]"}], "]"}]}], "}"}], ",", "  ", 
       RowBox[{"{", 
        RowBox[{"y", ",", " ", 
         FractionBox[
          RowBox[{"-", 
           RowBox[{"W", "[", "\[Lambda]", "]"}]}], "2"], ",", " ", 
         FractionBox[
          RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Thick", ",", "Green"}], "}"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"Blue", ",", "Thick"}], "}"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"Orange", ",", "Thick", ",", " ", "Dashed"}], "}"}]}], 
         "}"}]}], ",", 
       RowBox[{"(*", 
        RowBox[{
         RowBox[{"BaseStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"FontSize", "\[Rule]", "15"}], ",", 
            RowBox[{"FontFamily", "\[Rule]", "\"\<Times\>\""}], ",", "Bold"}],
            "}"}]}], ","}], "*)"}], " ", 
       RowBox[{"PlotLegends", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
         "\"\<a\>\"", ",", "\"\<b \[Kappa]\>\"", ",", " ", "\"\<b\>\""}], 
         "}"}]}], ",", " ", 
       RowBox[{"AxesLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"\"\<y\>\"", ",", " ", "\"\<term\>\""}], "}"}]}], ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"paramsVStimeCSF", ":=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{"fitLinear", "[", "\[Lambda]", "]"}], "[", 
          RowBox[{"[", "1", "]"}], "]"}], ",", " ", 
         FractionBox[
          RowBox[{
           RowBox[{"fitLinear", "[", "\[Lambda]", "]"}], "[", 
           RowBox[{"[", 
            RowBox[{"2", ",", "1"}], "]"}], "]"}], 
          RowBox[{
           RowBox[{"fitLinear", "[", "\[Lambda]", "]"}], "[", 
           RowBox[{"[", "1", "]"}], "]"}]]}], "}"}], ",", "  ", 
       RowBox[{"{", 
        RowBox[{"\[Lambda]", ",", "0", ",", " ", "0.99"}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Thick", ",", "Green"}], "}"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"Blue", ",", "Thick"}], "}"}]}], "}"}]}], ",", 
       RowBox[{"(*", 
        RowBox[{
         RowBox[{"BaseStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"FontSize", "\[Rule]", "15"}], ",", 
            RowBox[{"FontFamily", "\[Rule]", "\"\<Times\>\""}], ",", "Bold"}],
            "}"}]}], ","}], "*)"}], " ", 
       RowBox[{"PlotLegends", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"\"\<a\>\"", ",", " ", "\"\<b\>\""}], "}"}]}], ",", " ", 
       RowBox[{"AxesLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"\"\<\[Lambda]\>\"", ",", " ", "\"\<coefficient\>\""}], 
         "}"}]}], ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"termsVStimeCSF", ":=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{"fitLinear", "[", "\[Lambda]", "]"}], "[", 
          RowBox[{"[", "1", "]"}], "]"}], ",", " ", 
         RowBox[{
          RowBox[{
           RowBox[{"fitLinear", "[", "\[Lambda]", "]"}], "[", 
           RowBox[{"[", "2", "]"}], "]"}], "/.", 
          RowBox[{"\[Kappa]", "->", 
           RowBox[{"signedCurvature", "[", 
            RowBox[{"0", ",", "\[Lambda]"}], "]"}]}]}], ",", 
         RowBox[{
          RowBox[{
           RowBox[{"fitLinear", "[", "\[Lambda]", "]"}], "[", 
           RowBox[{"[", "2", "]"}], "]"}], "/.", 
          RowBox[{"\[Kappa]", "->", 
           RowBox[{"signedCurvature", "[", 
            RowBox[{
             FractionBox[
              RowBox[{"W", "[", "\[Lambda]", "]"}], "2"], ",", "\[Lambda]"}], 
            "]"}]}]}]}], "}"}], ",", "  ", 
       RowBox[{"{", 
        RowBox[{"\[Lambda]", ",", "0", ",", " ", "0.99"}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Thick", ",", "Green"}], "}"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"Blue", ",", "Thick"}], "}"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"Purple", ",", "Thick"}], "}"}]}], "}"}]}], 
       RowBox[{"(*", 
        RowBox[{",", 
         RowBox[{"BaseStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"FontSize", "\[Rule]", "15"}], ",", 
            RowBox[{"FontFamily", "\[Rule]", "\"\<Times\>\""}], ",", "Bold"}],
            "}"}]}]}], "*)"}], ",", " ", 
       RowBox[{"PlotLegends", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
         "\"\<a\>\"", ",", " ", 
          "\"\<b \!\(\*SubscriptBox[\(\[Kappa]\), \(max\)]\)\>\"", ",", " ", 
          "\"\<b \!\(\*SubscriptBox[\(\[Kappa]\), \(min\)]\)\>\""}], "}"}]}], 
       ",", " ", 
       RowBox[{"AxesLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"\"\<\[Lambda]\>\"", ",", " ", "\"\<term\>\""}], "}"}]}], 
       ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"plotArcCurvature", "[", "\[Lambda]_", "]"}], " ", ":=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"{", " ", 
       RowBox[{"signedCurvature", "[", 
        RowBox[{"y", ",", "\[Lambda]"}], "]"}], "}"}], ",", "  ", 
      RowBox[{"{", 
       RowBox[{"y", ",", " ", 
        RowBox[{
         RowBox[{"-", "0.5"}], 
         RowBox[{"W", "[", "\[Lambda]", "]"}]}], ",", 
        RowBox[{"0.5", " ", 
         RowBox[{"W", "[", "\[Lambda]", "]"}]}]}], "}"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Thick", ",", "Red"}], "}"}], ",", " ", 
         RowBox[{"{", 
          RowBox[{"Green", ",", "Thick"}], "}"}]}], "}"}]}], ",", 
      RowBox[{"BaseStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"FontSize", "\[Rule]", "15"}], ",", 
         RowBox[{"FontFamily", "\[Rule]", "\"\<Times\>\""}], ",", "Bold"}], 
        "}"}]}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"\"\<y\>\"", ",", " ", "\"\<\[Kappa]\>\""}], "}"}]}]}], 
     "]"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"magCurvatureRelation", "[", "\[Lambda]_", "]"}], ":=", " ", 
     RowBox[{"ParametricPlot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"signedCurvature", "[", 
          RowBox[{"y", ",", "\[Lambda]"}], "]"}], ",", 
         RowBox[{"displacementMagnitude", "[", 
          RowBox[{"y", ",", "\[Lambda]"}], "]"}]}], "}"}], ",", "  ", 
       RowBox[{"{", 
        RowBox[{"y", ",", "0", ",", " ", 
         RowBox[{"0.5", 
          RowBox[{"W", "[", "\[Lambda]", "]"}]}]}], "}"}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Thickness", "[", "0.007", "]"}], ",", " ", "Black"}], 
         "}"}]}], 
       RowBox[{"(*", 
        RowBox[{",", 
         RowBox[{"ColorFunction", "\[Rule]", 
          RowBox[{"Function", "[", 
           RowBox[{"y", ",", " ", 
            RowBox[{
             RowBox[{"ColorData", "[", "\"\<DeepSeaColors\>\"", "]"}], "[", 
             FractionBox[
              RowBox[{"2", "y"}], 
              RowBox[{"W", "[", "\[Lambda]", "]"}]], "]"}]}], "]"}]}]}], 
        "*)"}], ",", 
       RowBox[{"(*", 
        RowBox[{
         RowBox[{"BaseStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"FontSize", "\[Rule]", "15"}], ",", 
            RowBox[{"FontFamily", "\[Rule]", "\"\<Times\>\""}], ",", "Bold"}],
            "}"}]}], ","}], "*)"}], " ", 
       RowBox[{"AxesLabel", "\[Rule]", " ", 
        RowBox[{"{", 
         RowBox[{"\"\<\[Kappa]\>\"", ",", " ", "\"\<|v|\>\""}], "}"}]}], ",", 
       " ", 
       RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", " ", 
       RowBox[{"AxesOrigin", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0"}], "}"}]}], ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"compareStrainRates", "[", "\[Lambda]_", "]"}], ":=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", " ", 
        RowBox[{
         FractionBox[
          RowBox[{"strainRate", "[", 
           RowBox[{"y", ",", "\[Lambda]"}], "]"}], 
          RowBox[{"strainRate", "[", 
           RowBox[{"0", ",", "\[Lambda]"}], "]"}]], ",", 
         FractionBox[
          RowBox[{"CSFstrainRate", "[", 
           RowBox[{"y", ",", " ", "\[Lambda]"}], "]"}], 
          RowBox[{
           RowBox[{"CSFstrainRate", "[", 
            RowBox[{"0", ",", " ", "\[Lambda]"}], "]"}], " "}]]}], " ", "}"}],
        ",", "  ", 
       RowBox[{"{", 
        RowBox[{"y", ",", " ", 
         RowBox[{
          RowBox[{"-", "0.5"}], 
          RowBox[{"W", "[", "\[Lambda]", "]"}]}], ",", 
         RowBox[{"0.5", " ", 
          RowBox[{"W", "[", "\[Lambda]", "]"}]}]}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Thick", ",", "Red"}], "}"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"Thick", ",", " ", "Green"}], "}"}]}], "}"}]}], ",", 
       RowBox[{"BaseStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"FontSize", "\[Rule]", "15"}], ",", 
          RowBox[{"FontFamily", "\[Rule]", "\"\<Times\>\""}], ",", "Bold"}], 
         "}"}]}], ",", 
       RowBox[{"AxesLabel", "\[Rule]", " ", 
        RowBox[{"{", 
         RowBox[{"\"\<y\>\"", ",", " ", "\"\<strain rate\>\""}], "}"}]}], ",",
        " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"minCurvature", "[", "\[Lambda]_", "]"}], "=", " ", 
     RowBox[{
      RowBox[{
       RowBox[{"signedCurvature", "[", 
        RowBox[{"y", ",", "\[Lambda]"}], "]"}], "/.", 
       RowBox[{"y", "\[Rule]", 
        FractionBox[
         RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]}]}], "//", 
      "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"termsVStime", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{"c0", "[", "\[Lambda]", "]"}], 
          SuperscriptBox[
           RowBox[{"minCurvature", "[", "\[Lambda]", "]"}], 
           RowBox[{
            RowBox[{"-", "1"}], "/", "3"}]]}], ",", " ", 
         RowBox[{
          RowBox[{"c1", "[", "\[Lambda]", "]"}], 
          SuperscriptBox[
           RowBox[{"minCurvature", "[", "\[Lambda]", "]"}], 
           RowBox[{"1", "/", "3"}]]}]}], " ", "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"\[Lambda]", ",", "0", ",", "0.99"}], "}"}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"Thickness", "[", "0.007", "]"}], ",", "Red"}], "}"}], 
          ",", " ", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"Thickness", "[", "0.007", "]"}], ",", "Blue"}], "}"}]}], 
         "}"}]}], ",", " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
       RowBox[{"PlotLegends", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
         "\"\<F =\!\(\*SubscriptBox[\(c\), \(0\)]\) \
\!\(\*SuperscriptBox[SubscriptBox[\(\[Kappa]\), \(min\)], \
\(\(-1\)/3\)]\)\>\"", ",", 
          "\"\<F =\!\(\*SubscriptBox[\(c\), \(\(1\)\(\\\ \
\)\)]\)\!\(\*SuperscriptBox[SubscriptBox[\(\[Kappa]\), \(min\)], \(1/3\)]\)\>\
\""}], "}"}]}], ",", " ", 
       RowBox[{"AxesLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"\"\<\[Lambda]\>\"", " ", ",", " ", "\"\<F\>\""}], "}"}]}], 
       ",", " ", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"paramsVStime", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"c0", "[", "\[Lambda]", "]"}], ",", " ", 
         RowBox[{"c1", "[", "\[Lambda]", "]"}]}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"\[Lambda]", ",", "0", ",", "0.99"}], "}"}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", " ", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"Thickness", "[", "0.007", "]"}], ",", "Red"}], "}"}], 
          ",", "  ", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"Thickness", "[", "0.007", "]"}], ",", "Blue"}], "}"}]}], 
         "}"}]}], ",", " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
       RowBox[{"PlotLegends", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
         "\"\<\!\(\*SubscriptBox[\(c\), \(0\)]\) \>\"", ",", 
          "\"\<\!\(\*SubscriptBox[\(c\), \(\(1\)\(\\\ \)\)]\)\>\""}], "}"}]}],
        ",", " ", 
       RowBox[{"AxesLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"\"\<\[Lambda]\>\"", " ", ",", " ", "\"\<c\>\""}], "}"}]}], 
       ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Lambda]s", " ", "=", " ", "0.9"}], ";", 
    RowBox[{"d\[Lambda]s", " ", "=", " ", "0.1"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"plotTermVSCurvatureCSF", "[", "\[Lambda]s", "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"plotTermVSCurvature", "[", "\[Lambda]s", "]"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"magCurvatureRelation", "[", "\[Lambda]s", "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"plotMagnitudeNCurvature", "[", "\[Lambda]s", "]"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "paramsVStimeCSF", 
   "\[IndentingNewLine]", "termsVStimeCSF", "\[IndentingNewLine]", 
   "paramsVStime", "\[IndentingNewLine]", "termsVStime", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"Show", "[", 
     RowBox[{
      RowBox[{"sectionFormPlot", "[", "\[Lambda]s", "]"}], ",", " ", 
      RowBox[{"sectionFormPlotD", "[", 
       RowBox[{"\[Lambda]s", "+", " ", "d\[Lambda]s"}], "]"}], ",", 
      RowBox[{"fitLinearArrows", "[", 
       RowBox[{"\[Lambda]s", ",", "  ", "d\[Lambda]s"}], "]"}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], " ", "]"}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"Show", "[", 
     RowBox[{
      RowBox[{"sectionFormPlot", "[", "\[Lambda]s", "]"}], ",", " ", 
      RowBox[{"sectionFormPlot", "[", 
       RowBox[{"\[Lambda]s", " ", "+", " ", "d\[Lambda]s"}], "]"}], ",", 
      RowBox[{"plotArrows", "[", 
       RowBox[{"\[Lambda]s", ",", "  ", "d\[Lambda]s"}], "]"}], " ", ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], " ", "]"}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"Show", "[", 
     RowBox[{
      RowBox[{"sectionFormPlot", "[", "\[Lambda]s", "]"}], ",", " ", 
      RowBox[{"sectionFormPlot", "[", 
       RowBox[{"\[Lambda]s", "+", " ", "d\[Lambda]s"}], "]"}], ",", 
      RowBox[{"plotCSFarrows", "[", 
       RowBox[{"\[Lambda]s", ",", " ", "d\[Lambda]s"}], "]"}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], " ", "]"}], "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"Clear", "[", 
     RowBox[{
     "D0", ",", " ", "L0", ",", " ", "W0", ",", " ", "k0tilde", ",", " ", 
      "Stilde", ",", " ", "kx", ",", " ", "g2", ",", " ", "d", ",", " ", "W", 
      ",", "  ", "g0", ",", " ", "f0", ",", " ", "g", ",", " ", "f", ",", " ",
       "bAngle"}], "]"}], "*)"}]}]}]], "Input",
 CellChangeTimes->{{3.7810820871563673`*^9, 3.781082148090484*^9}, {
   3.7810824514541655`*^9, 3.7810825605977554`*^9}, {3.7810827407143126`*^9, 
   3.781082834772094*^9}, {3.7810829778076267`*^9, 3.781082992029465*^9}, {
   3.7810835286573224`*^9, 3.7810835601937847`*^9}, {3.781084009784585*^9, 
   3.781084020597684*^9}, {3.7810843152536135`*^9, 3.781084347192952*^9}, {
   3.781084394767353*^9, 3.7810843951266446`*^9}, {3.781084900657935*^9, 
   3.7810849498770866`*^9}, {3.7810850044905305`*^9, 3.781085116909099*^9}, 
   3.7810851793392434`*^9, {3.7810869423131447`*^9, 3.781086943478389*^9}, {
   3.7810876900663943`*^9, 3.7810876944109616`*^9}, 3.7810878238820004`*^9, {
   3.7810878775677357`*^9, 3.7810878936405983`*^9}, {3.781087931582485*^9, 
   3.7810879561148005`*^9}, {3.7810880515959425`*^9, 3.781088093203038*^9}, {
   3.781088237909981*^9, 3.7810885281909065`*^9}, 3.7810885809686384`*^9, {
   3.7810886632339697`*^9, 3.781088684646098*^9}, {3.78109037031527*^9, 
   3.7810904467851667`*^9}, {3.7810904776959124`*^9, 
   3.7810904943233814`*^9}, {3.7810905827233696`*^9, 
   3.7810906026996374`*^9}, {3.781090695047984*^9, 3.7810906967194686`*^9}, {
   3.781090828831766*^9, 3.781090857392481*^9}, 3.7810909085851517`*^9, {
   3.781090981396634*^9, 3.781090985584515*^9}, 3.78109110884807*^9, 
   3.781092319654129*^9, {3.7812516444622774`*^9, 3.7812516471647673`*^9}, {
   3.781251711099479*^9, 3.781251720861792*^9}, {3.7812517565486526`*^9, 
   3.781251772485575*^9}, {3.7812519809104156`*^9, 3.7812519832445035`*^9}, {
   3.7812520695752664`*^9, 3.781252075696905*^9}, {3.781252123631652*^9, 
   3.781252135752127*^9}, {3.781252215588372*^9, 3.7812522310872636`*^9}, {
   3.7815059722065315`*^9, 3.7815060128950024`*^9}, {3.7815063181042337`*^9, 
   3.7815063303642473`*^9}, {3.781506366537963*^9, 3.7815063841264935`*^9}, {
   3.781699329735694*^9, 3.7816993521274*^9}, {3.7816993954546404`*^9, 
   3.781699400159319*^9}, {3.781860190658266*^9, 3.781860239056106*^9}, {
   3.7818602856263375`*^9, 3.7818602880341873`*^9}, {3.7818603642110777`*^9, 
   3.78186041492737*^9}, {3.7818605027852297`*^9, 3.7818607273199553`*^9}, {
   3.7818608074116206`*^9, 3.7818608716508656`*^9}, {3.7818611111852236`*^9, 
   3.781861124264325*^9}, {3.7818621311693735`*^9, 3.7818621313279514`*^9}, {
   3.7818621745641894`*^9, 3.7818621757210965`*^9}, {3.781863148152124*^9, 
   3.7818631910331025`*^9}, {3.781863252249253*^9, 3.781863296672313*^9}, {
   3.781863350344548*^9, 3.7818635374730916`*^9}, {3.7818635711710386`*^9, 
   3.7818636212414722`*^9}, {3.7818636627149725`*^9, 
   3.7818636708822384`*^9}, {3.781863749805279*^9, 3.7818637525437145`*^9}, {
   3.78186379933902*^9, 3.781863934187536*^9}, {3.781864051130307*^9, 
   3.7818641684168005`*^9}, {3.781864259245881*^9, 3.781864311235547*^9}, {
   3.781864517539608*^9, 3.7818645292423196`*^9}, {3.781864639223568*^9, 
   3.7818646482046747`*^9}, {3.781864691978287*^9, 3.781864749843166*^9}, {
   3.7818648053880277`*^9, 3.781864941445421*^9}, 3.7818651610457945`*^9, {
   3.781865196301569*^9, 3.7818652236539927`*^9}, {3.7818658055468793`*^9, 
   3.7818658370754023`*^9}, {3.7820509299458675`*^9, 3.782050995481924*^9}, {
   3.782051144683917*^9, 3.782051196922161*^9}, {3.782066154063233*^9, 
   3.7820662119133663`*^9}, {3.7820662444191494`*^9, 3.78206626815783*^9}, {
   3.782066300419032*^9, 3.7820663549090505`*^9}, 3.7820663939677544`*^9, {
   3.7820664460777464`*^9, 3.782066485731827*^9}, {3.782066528998352*^9, 
   3.7820665613746824`*^9}, {3.782113386279684*^9, 3.7821134974713173`*^9}, 
   3.7821135601981196`*^9, {3.782113779336528*^9, 3.7821138028313293`*^9}, {
   3.782114626644805*^9, 3.7821147014512157`*^9}, {3.782115560916212*^9, 
   3.7821156214024124`*^9}, {3.782115660702063*^9, 3.782115734740465*^9}, {
   3.782115803133031*^9, 3.782115816779586*^9}, 3.782115848309288*^9, {
   3.782115890152906*^9, 3.7821158979490557`*^9}, {3.7821159556140385`*^9, 
   3.7821159576515875`*^9}, {3.7821160516122494`*^9, 3.782116130553051*^9}, {
   3.7821162115890055`*^9, 3.7821162483798213`*^9}, 3.78211633304947*^9, {
   3.7821163653772697`*^9, 3.7821164281543093`*^9}, {3.782116549349782*^9, 
   3.782116596770254*^9}, {3.782116644917742*^9, 3.7821166542451696`*^9}, {
   3.7821168203217916`*^9, 3.7821168384173923`*^9}, {3.782117257969076*^9, 
   3.782117286949686*^9}, {3.7821173642294507`*^9, 3.7821173688873405`*^9}, {
   3.7821174285449457`*^9, 3.7821174329442043`*^9}, {3.782117900841861*^9, 
   3.7821180635753717`*^9}, {3.7821181267652144`*^9, 3.782118171479081*^9}, {
   3.7821182058782716`*^9, 3.782118207790183*^9}, {3.7821182619442234`*^9, 
   3.782118264476431*^9}, {3.7821183128623114`*^9, 3.7821183130049148`*^9}, {
   3.7821183840761194`*^9, 3.7821184226270657`*^9}, 3.7821185630549517`*^9, 
   3.7821186318909383`*^9, {3.7821202747190576`*^9, 3.7821203071711254`*^9}, {
   3.7821446399559565`*^9, 3.782144650296446*^9}, {3.7821447377489333`*^9, 
   3.782144806396428*^9}, {3.782150961874467*^9, 3.7821509619827695`*^9}, {
   3.782151572927781*^9, 3.782151591698717*^9}, 3.7822135534729156`*^9, 
   3.7822137476397004`*^9, 3.7822144039442625`*^9, {3.7822145768602*^9, 
   3.7822145931285877`*^9}, {3.782215115420828*^9, 3.782215190016961*^9}, {
   3.7822152350186615`*^9, 3.782215269573065*^9}, {3.7822153427840242`*^9, 
   3.7822153621093616`*^9}, {3.7822153978677917`*^9, 
   3.7822154346417603`*^9}, {3.78221547792247*^9, 3.7822155439242673`*^9}, {
   3.782215598490495*^9, 3.7822156112129016`*^9}, {3.782215948874402*^9, 
   3.782215950804502*^9}, {3.782218419115287*^9, 3.7822184697228713`*^9}, {
   3.782218505047573*^9, 3.782218558006241*^9}, {3.7822196887228675`*^9, 
   3.78221969227376*^9}, 3.7822219461888533`*^9, {3.782221996382036*^9, 
   3.782222028794899*^9}, {3.7822220855688944`*^9, 3.782222085881399*^9}, {
   3.7822221383149567`*^9, 3.7822221630260544`*^9}, {3.7822224813832383`*^9, 
   3.782222481492588*^9}, {3.782222545094181*^9, 3.7822225561107187`*^9}, 
   3.7822229696600027`*^9, 3.782287974387154*^9, {3.782291266122866*^9, 
   3.7822913213248725`*^9}, 3.782297253186963*^9, 3.782581334319169*^9, {
   3.7825829647813687`*^9, 3.7825832557346416`*^9}, {3.7825833001602163`*^9, 
   3.7825833284709315`*^9}, 3.7825834545448627`*^9, 3.782583487042841*^9, {
   3.7825835957496643`*^9, 3.78258367306267*^9}, {3.7825837112957983`*^9, 
   3.782583713449353*^9}, {3.7825837933122897`*^9, 3.7825838776477327`*^9}, {
   3.7825839157704234`*^9, 3.782583954589037*^9}, 3.7825840219735622`*^9, {
   3.782584118284232*^9, 3.7825842159532137`*^9}, {3.7825842899541087`*^9, 
   3.7825842971885996`*^9}, {3.7825843501520596`*^9, 3.782584515733596*^9}, {
   3.7825846864563785`*^9, 3.782584730360587*^9}, {3.78258477564745*^9, 
   3.782584777945195*^9}, {3.7825848129745913`*^9, 3.7825849486880007`*^9}, {
   3.7827568719957952`*^9, 3.7827568819136715`*^9}, {3.782756914623474*^9, 
   3.7827569399339294`*^9}, {3.783152596047209*^9, 3.7831525973138943`*^9}, 
   3.7831528788115234`*^9, {3.7831531086416035`*^9, 3.7831532480551305`*^9}, {
   3.783153285154948*^9, 3.7831533074653454`*^9}, {3.7831533496294327`*^9, 
   3.783153378370389*^9}, {3.7831534136258297`*^9, 3.783153459632023*^9}, 
   3.783153520420725*^9, {3.783153575608629*^9, 3.7831535790321307`*^9}, {
   3.7831536222181187`*^9, 3.783153770936043*^9}, {3.7831538065903296`*^9, 
   3.7831538163422804`*^9}, {3.783153879014574*^9, 3.783153891592552*^9}, {
   3.783153926968574*^9, 3.783154047142933*^9}, {3.783154081534525*^9, 
   3.783154109235832*^9}, 3.783154162202243*^9, 3.783154194450238*^9, {
   3.783154249722776*^9, 3.783154271825248*^9}, {3.783154310005553*^9, 
   3.7831543664514217`*^9}, {3.783154411247574*^9, 3.7831545253349266`*^9}, {
   3.783155762161491*^9, 3.783155773834439*^9}, {3.7831558523563967`*^9, 
   3.7831558798864055`*^9}, {3.783155957796626*^9, 3.783156011482092*^9}, 
   3.7831561216649437`*^9, {3.7831562961854954`*^9, 3.783156309770135*^9}, 
   3.783156394041247*^9, {3.783156638999818*^9, 3.783156641046212*^9}, {
   3.7831582826250353`*^9, 3.7831584855608063`*^9}, {3.783158528839937*^9, 
   3.783158638345584*^9}, {3.7831587761387005`*^9, 3.78315888488639*^9}, 
   3.7831594393803577`*^9, {3.7831607879881907`*^9, 3.7831607973816557`*^9}, {
   3.783162456798524*^9, 3.783162493103076*^9}, 3.7831663632804995`*^9, {
   3.7831666513992033`*^9, 3.783166652836446*^9}, {3.7831911787328815`*^9, 
   3.7831912461024704`*^9}, 3.783191302780488*^9, 3.7831926356510334`*^9, {
   3.783192916273572*^9, 3.7831929200502176`*^9}, {3.7831929582414656`*^9, 
   3.783192958663241*^9}, {3.783193006727538*^9, 3.783193027397189*^9}, {
   3.7831931729788804`*^9, 3.7831931786168933`*^9}, 3.7831932560089374`*^9, {
   3.7831933278682795`*^9, 3.7831933283837023`*^9}, {3.783193421026842*^9, 
   3.783193459836591*^9}, 3.783193657822238*^9, {3.7831937748990498`*^9, 
   3.7831937951482754`*^9}, {3.7831938824157906`*^9, 3.783193884164378*^9}, {
   3.783194045117854*^9, 3.783194046116905*^9}, {3.783194102725604*^9, 
   3.783194123179971*^9}, {3.783195001365484*^9, 3.783195026681239*^9}, {
   3.783195064914694*^9, 3.7831951754000287`*^9}, {3.783195270773015*^9, 
   3.7831953084623547`*^9}, {3.783195416022154*^9, 3.783195416901192*^9}, 
   3.7832431836534443`*^9, {3.783243612513362*^9, 3.783243655543535*^9}, {
   3.783331041785947*^9, 3.7833311255206685`*^9}, {3.7838397206372066`*^9, 
   3.7838397330055056`*^9}, {3.783839790813841*^9, 3.7838398074721994`*^9}, 
   3.783839856687611*^9, 3.7838398895957747`*^9, {3.7838399522929535`*^9, 
   3.783839963259219*^9}, {3.783840015582409*^9, 3.783840015957321*^9}, {
   3.783840068966235*^9, 3.783840132532386*^9}, {3.783840682228181*^9, 
   3.783840687761986*^9}, 3.783850844011297*^9, {3.7838508888678226`*^9, 
   3.783850900526016*^9}, 3.7838606226524935`*^9, {3.7839405073754663`*^9, 
   3.783940508132324*^9}, {3.7847074637408075`*^9, 3.784707496010713*^9}, {
   3.7847078556663227`*^9, 3.78470802663243*^9}, {3.784708435042449*^9, 
   3.784708440324047*^9}, {3.7847085838778653`*^9, 3.7847085867165966`*^9}, {
   3.7847086946501074`*^9, 3.7847087394104695`*^9}, {3.7847088029972453`*^9, 
   3.784708810301931*^9}, 3.7847088419420886`*^9, {3.7847094944873*^9, 
   3.784709543417396*^9}, {3.784720225911024*^9, 3.784720249374852*^9}, {
   3.784720347590201*^9, 3.7847206415099382`*^9}, {3.784720684209502*^9, 
   3.784720718629637*^9}, {3.784720829856007*^9, 3.7847208453872547`*^9}, {
   3.7847210376213365`*^9, 3.784721092106183*^9}, {3.7847213061662564`*^9, 
   3.7847213219188557`*^9}, {3.7847214131574054`*^9, 
   3.7847215223560233`*^9}, {3.7847216161996613`*^9, 3.78472164333375*^9}, {
   3.78472168265242*^9, 3.7847217209973736`*^9}, {3.7847217894029965`*^9, 
   3.784721806384948*^9}, {3.7847218400097494`*^9, 3.7847218585799403`*^9}, {
   3.7848854297703476`*^9, 3.784885446785854*^9}, {3.7848855493678102`*^9, 
   3.7848855768861723`*^9}, {3.7848858323725166`*^9, 
   3.7848858379406223`*^9}, {3.7848862684474263`*^9, 3.784886357983183*^9}, {
   3.7848865025847588`*^9, 3.7848865114619904`*^9}, 3.784967731472747*^9, {
   3.78496824720833*^9, 3.7849682631241035`*^9}, 3.7849683973060927`*^9, 
   3.784968809364736*^9, {3.7849702157038784`*^9, 3.7849702172915163`*^9}, {
   3.7850534144773703`*^9, 3.785053414604325*^9}, {3.785058725750577*^9, 
   3.7850587438766623`*^9}, {3.7850588116050544`*^9, 
   3.7850588126611967`*^9}, {3.785059803173952*^9, 3.785059812702477*^9}, 
   3.7852343103099146`*^9, {3.7860147078846307`*^9, 3.786014736281432*^9}, {
   3.786014890847514*^9, 3.786014966142973*^9}, {3.794471849381934*^9, 
   3.7944718517715764`*^9}, 3.7944719243316455`*^9, {3.7944724265773726`*^9, 
   3.7944724280055327`*^9}, 3.7944726300575876`*^9, 3.7977843248752985`*^9, {
   3.7977843750720243`*^9, 3.797784379152112*^9}, {3.797784583275462*^9, 
   3.7977846188762517`*^9}, {3.7977846948740025`*^9, 3.797784764945632*^9}, {
   3.7978455036521206`*^9, 3.7978455484375286`*^9}},
 CellLabel->"In[34]:=",ExpressionUUID->"e6ebda8a-55ec-42df-95e7-e243e7d97eab"],

Cell[BoxData["\<\"C.PallidusA\"\>"], "Output",
 CellChangeTimes->{
  3.782214469890087*^9, 3.7822145063382874`*^9, 3.782214630014892*^9, 
   3.7822148080317497`*^9, 3.7822149635798182`*^9, 3.7822152244400444`*^9, 
   3.782215435268258*^9, {3.7822154937377625`*^9, 3.782215544720903*^9}, {
   3.7822156122594576`*^9, 3.7822156323801775`*^9}, 3.782215951331479*^9, 
   3.7822184751137633`*^9, 3.7822185162662134`*^9, 3.7822185588943057`*^9, 
   3.782218632808107*^9, 3.7822196930539255`*^9, 3.7822199238570204`*^9, 
   3.782221947719692*^9, {3.7822220120433364`*^9, 3.7822220312653465`*^9}, {
   3.78222207922147*^9, 3.782222087115408*^9}, {3.782222119547361*^9, 
   3.78222216372894*^9}, 3.782222482039259*^9, {3.7822225459220853`*^9, 
   3.78222255665739*^9}, {3.7822229593946714`*^9, 3.782222974631442*^9}, 
   3.7822241640173044`*^9, 3.7822243438625016`*^9, 3.7822244250908556`*^9, {
   3.782287941715081*^9, 3.782287975449335*^9}, 3.782288789533774*^9, 
   3.7822906551711903`*^9, {3.7822913081643267`*^9, 3.782291322174583*^9}, 
   3.782296618392045*^9, 3.782297253796118*^9, 3.7823052364891925`*^9, {
   3.7825813621554995`*^9, 3.7825813740335407`*^9}, 3.7825833305841165`*^9, {
   3.7825833764092093`*^9, 3.782583396004898*^9}, {3.782583460894145*^9, 
   3.7825834891651287`*^9}, 3.782583538670022*^9, 3.7825836152701035`*^9, 
   3.782583675860424*^9, 3.7825837163291183`*^9, {3.7825838585338907`*^9, 
   3.7825838867432313`*^9}, 3.782583955494999*^9, 3.782584023067078*^9, 
   3.782584086548361*^9, {3.782584118955905*^9, 3.7825842168279285`*^9}, 
   3.782584299674696*^9, {3.7825843599343443`*^9, 3.7825843812968616`*^9}, {
   3.782584432244983*^9, 3.7825845067106376`*^9}, {3.7825846802976675`*^9, 
   3.782584730735442*^9}, 3.782584784836703*^9, 3.7825848523884544`*^9, 
   3.782584884050439*^9, {3.7825849159656315`*^9, 3.782584949323036*^9}, {
   3.7827568940209928`*^9, 3.782756940758292*^9}, {3.7831533103396225`*^9, 
   3.7831533790577283`*^9}, 3.783153415328582*^9, 3.7831534603661485`*^9, 
   3.7831535288761053`*^9, 3.78315358015679*^9, 3.7831539892648845`*^9, 
   3.7831540193869457`*^9, {3.78315407567104*^9, 3.783154083936883*^9}, 
   3.783154195231228*^9, 3.783154272590616*^9, {3.783154368356549*^9, 
   3.7831543820624256`*^9}, {3.7831544716733007`*^9, 3.783154526515828*^9}, 
   3.783155777834945*^9, 3.7831558816374884`*^9, {3.7831559607021933`*^9, 
   3.783156011920889*^9}, 3.7831561221335077`*^9, {3.783156296765147*^9, 
   3.783156310891715*^9}, 3.783156394806693*^9, 3.7831566421864924`*^9, 
   3.7831582194992313`*^9, {3.783158587610404*^9, 3.7831586417788267`*^9}, {
   3.783158806657195*^9, 3.783158839504523*^9}, 3.7831588901412787`*^9, 
   3.783159161620496*^9, {3.783159429892138*^9, 3.783159469496049*^9}, 
   3.7831595603609877`*^9, 3.7831596459583035`*^9, 3.78315980083782*^9, 
   3.78316079822515*^9, {3.7831624601285067`*^9, 3.783162494102844*^9}, 
   3.783163709882825*^9, 3.783166366453264*^9, 3.7831665669797745`*^9, 
   3.783166655679043*^9, {3.7831911714030275`*^9, 3.783191247336479*^9}, 
   3.7831913088068047`*^9, 3.783192636460191*^9, 3.7831929446675997`*^9, {
   3.783193018727408*^9, 3.783193027818966*^9}, 3.783193179147971*^9, 
   3.7831932562431793`*^9, 3.783193343489666*^9, 3.783193461335556*^9, 
   3.783193658649988*^9, 3.783193795386083*^9, 3.7831938847267466`*^9, 
   3.7831940468041677`*^9, {3.7831941143508043`*^9, 3.7831941236485357`*^9}, 
   3.7831944072430525`*^9, 3.7831950018340454`*^9, {3.7831951599932966`*^9, 
   3.7831951756655226`*^9}, 3.7831953096585855`*^9, 3.7831954177102757`*^9, 
   3.7832417324743977`*^9, 3.7832431846534543`*^9, {3.783243640013296*^9, 
   3.7832436564483814`*^9}, {3.7833311305534554`*^9, 3.7833311418539753`*^9}, 
   3.7838397345072727`*^9, 3.7838398083073215`*^9, 3.7838398584188833`*^9, 
   3.783839890542446*^9, 3.7838400173319426`*^9, 3.7838401330522175`*^9, 
   3.783840690743511*^9, 3.783850844885989*^9, 3.7838509205718775`*^9, 
   3.783860623772453*^9, 3.783940516425296*^9, {3.7847080319500265`*^9, 
   3.7847080470885954`*^9}, 3.784708457499934*^9, 3.784708587253621*^9, 
   3.78470869540226*^9, 3.784708740186722*^9, {3.7847087885429688`*^9, 
   3.7847088424746118`*^9}, 3.784709563684412*^9, {3.7847200566997724`*^9, 
   3.7847200706530633`*^9}, 3.784720869808626*^9, 3.7847210940015945`*^9, {
   3.784721285124527*^9, 3.7847213227155247`*^9}, 3.7847214917740593`*^9, 
   3.7847216455507154`*^9, 3.784721721840849*^9, 3.7847218696628532`*^9, 
   3.784738528103218*^9, 3.78488524187362*^9, 3.7848855270745335`*^9, 
   3.784885566987649*^9, 3.7848858402972956`*^9, 3.7848863011718693`*^9, 
   3.7848863600496325`*^9, 3.784886512219963*^9, 3.784967732761732*^9, 
   3.7849682687961087`*^9, 3.7849685802712865`*^9, 3.7849688099888678`*^9, 
   3.784970408819131*^9, 3.7849705362471104`*^9, 3.7850533332369843`*^9, 
   3.7850534154713125`*^9, {3.785058730920721*^9, 3.7850587442715693`*^9}, 
   3.785058812986328*^9, 3.7850598133447638`*^9, 3.7852340649346113`*^9, 
   3.7852343107995763`*^9, 3.786014805869358*^9, 3.786014917815103*^9, {
   3.786014951998384*^9, 3.7860149671583633`*^9}, 3.7944718536006613`*^9, 
   3.794471924896137*^9, 3.7944724331328316`*^9, 3.794472486579007*^9, 
   3.794472631045947*^9, 3.7944727452078714`*^9, 3.7944728194494762`*^9, 
   3.794472878155672*^9, 3.7944729141405096`*^9, 3.7944729867873755`*^9, 
   3.794473042851555*^9, 3.794473091599301*^9, 3.794473134204447*^9, {
   3.794473185626033*^9, 3.7944732145567217`*^9}, 3.7944732614653664`*^9, {
   3.7953329318976746`*^9, 3.7953329425632334`*^9}, 3.795333995972432*^9, 
   3.7953343554484253`*^9, {3.795334421042015*^9, 3.795334444908768*^9}, 
   3.795334587048658*^9, 3.795945225417776*^9, 3.796120000626225*^9, 
   3.796390295873082*^9, {3.7977843798622136`*^9, 3.7977843959561715`*^9}, {
   3.7977845729670043`*^9, 3.797784619577348*^9}, 3.797784765873123*^9, 
   3.7978455043835*^9, {3.7978455362336283`*^9, 3.797845549084798*^9}, 
   3.813914597806137*^9},
 CellLabel->"Out[34]=",ExpressionUUID->"e38ca0ac-4b95-4b3b-8ebd-c7a241927d47"],

Cell[BoxData[
 TemplateBox[{GraphicsBox[{{{{}, {}, 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[Large], 
          RGBColor[0, 1, 0]], 
         LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQLRqctpbh4uP9+/ceYVE0Z3QouHFCLzcXwT8Vq73h
JieCr39C2fOT4SM4X/mJ7ILIjIdwfsy0+qCtix7A+Z0BmmYLZ9yH8yuvhzmX
ctyD80/Ivq45EXYHzl84wS+XZe0tOH9G2tabd+VvwvnvfjcVmRVeh/OTvwS3
69y/CucnSX4J4g69Aucf+PvLK3PlJTjfxpV1f4rURTjfYMabffsun4Pzf//L
yW1tOg3nM+t8EW7POoEIj+sewu38R+H8c55LuA69PQjnK5TO2vpNcC9CPYem
IU/GNjj/vcbROdMNNsD5ir0/iu2fLYLzU1rZrd45dML5vTPeNnJJddjD+Ms3
OeW4Zy6G802fvQtXeL4ezk/tN/pQv2MbnN/50+Dmmdi9cP6s1wIvA08chPM3
3t7Ns1/lKJzfxZpg8dH9BJwfcC31W2D0aTg/QmNe9JaN5+B8oVvpT3KfX4Dz
Zz6Ymdc0/RKcz9hyouan1hU4/8Ev9Svt267C+fGbFP5PS74O5x9gE1vH8eUG
nH9o9hKD30tvwflWLCl/WALuwPmTORV8Cu/ehfN7/Uvz43ruw/kmM5O5w/sf
wPmxX5Y0d4U8hPOvv9+UWqf1CM4/aLm/U/kTgp99bJL0pMTHcD40v8D5AJZs
dIA=
          "]]}, Annotation[#, "Charting`Private`Tag$8663#1"]& ], 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          RGBColor[0, 0, 1], 
          Thickness[Large]], 
         LineBox[CompressedData["
1:eJw113kwVf//B3DJVvZCEh9rC0pKlkpeJFubnRTJVpI9KnuUrSxlV8iWbHGR
reJtLculLHHvjSxXtuzEPRTf08zv98eZM4+ZM3POeb9fr9dz3qLWLgZ29HR0
dDP49e/Oa3jzLV0XFY2yd8jmdpBA9ZYb91gHFdFelqh86yWBg4+v5+c2KtI/
X5LBMECCuqyYM1FNVGQx033bYZoEjiu1HfuqqChgzYzPgJkMDfF75hReUdFT
n0j/GDUyuJJaZJycqCjkJcfDgUoytFlIE8g78OdjFkVqCihwtEVcZ+nYKPJs
/O+Ux9AAiI8JpZvZj6DPtC+CqfuGwDwhwKA8cxgdPWI6crRmGML1JBUykobQ
7+FPlLuio+DVb6LuyfIDqQlbs1eFUaFF6Jdvi8kAoimfHLQ5/BMynl12YnhL
QX2Fkzs6J8Yh6WY5eVCYjMZbrJ5FZ0zC3EaQu4JbP8rY4tR8kTYNNiuGoYeH
viFVN1lFr7gZsN67YsBq3ItMOrj8NxLmoO7v+vnbed1oC03yiDstgLIGI7IV
6EJX+xL2JAYtgmzSTG1tTyc6dsNpXalsCTY2HZ2Cg9qRO3uQpdLgMmw/vLI7
1KEFZUgIEEZnVqCtX3t3KGcz6rs58V2IaRU6dbJ3NszWI7X4byM3sFUQ8XxR
vspdg1jCoovUxtbAuTiMVXftI4o0rqDGT6xBzdQ9qzcDH5EoL61zYnoNrl43
ZL/y5iPiVrhY93hxDeK12OyqlT+itPIBcubmGuwU8OfxvfUBud0+qu3MT4Pf
tVZ3t9VUo9FFRUX58zQ4h+m2mmVWI6mhmZfKl2gQI6ciXBpajQa3K/mq6dFA
Nleg3dqgGjEx++Sqm9DA4XmPWNNEFVJP0PeXtKbBsI1Gd8iuKiRw+WGilxcN
2lgkj7HZV6BZiwkv4RwanPfqvy6jW4F0JwZzsnNp0D4VHKGnUIEidgffPVhA
A2Lb6EQcQwXSHE0c30+gQWdESppQRjkSbxvnYHpPgx4uLrajlHco9tDecwYd
NBjgXxvXv1iGxoL8jLmXaGAe/prHQ64MTb7txrRWaDCIGZ5NEChDZslXeX1X
afCDQkilTJaiJuzU24F1GoykOBjZBJeiOHoWCNiOwbjIj3qP2hKU3fd7TJsH
g/lDzSmJsgTUtix8flwOg5uMp2oyeAmIW5xJZkkeg6pGiw+mv4tRUtvwzLoi
BjHyx848DC9G3Hz7V+mVMdDcS1LtKilC2t+lds2qY1A8vF/7Lv1bpOGkqXfI
EIOUZM7wUGIh4vLg0d5mjMETA6z1ZUIhktX1YOo3wcC2iXihSaoQvRXZ3f3g
Kgb8uXd1eQ0LULeJxaN4KwweutSbVGblIboH/DrHXTBwOlSQ2O6Uh4zOLQv2
u2JwdSSONKSYh3qGp7MfuGNwwtD+KgsxF/E9IhNLPDGYVOC8brbyBj3479P1
Pz4Y6G2a222cy0EybQqZi6EYiEbS7sJ4JlJdYOsyTsXAvdTadqIsE1l0DYd4
p2HQ0E80ig7MRLy2ZmdTXuHfK5YhPySYiSgeUZ/7MjDIrdRZ8zfMQLZH62gH
czC43iT/2zfwFfrikXL7VBEGdJw7+4iCr1BNisGRo8UYZJr9qBCsSkP6Su0z
IgQMfs6FPPg4l4rulH823yjBwHEvaWPjWgraK1mw+LQcA29nb3ofhWQ0IUH0
3vcRA8Hqy9S2riT0YEDtwxDu2u3iTQJOSahhyHg+vQaDbcntwe+zEpH/QKSs
AMIgrFFwxzpXAjoTycs6WY+BFMfilE5hPOqm1xmIbcCAeKW5LVkrHkXHlqUq
N2LAOecUcdI/DsW9Tpl/3IRBAj/i9PoVg0JBqnnhEwZKNrELLSExiJrhyf74
MwaUt7e6+MViEMGHQZ2nBQMhda7YqivPkfrFeA/pVgy0vzccXngajZYSQyZP
tGMQ4XpnLrohCrXLjD0vxv2FkYdwFItEjEeYDhwkYmAiayfncjMCf783O3sH
vt7BzKfmVMPRfevGrrJODGYIe0yDfMLQzVsLY7u/YOAxcNCDryIUscylbbni
DpbTLlKRDkHGIQXnxb5iwGF5pb3bLhhFW2Z538Od8MR+8mb6Y8R1Xq/kM+6c
kTCxaN5HaLyI87hVFwYy7MkgrheEDNJaffJwVyjlmVc+CUTvwkPb53BHCcce
QVsB6A+vm69rNwZp98puTXj4I+YR/cFC3MUdPRmc076o9E+6+jjurz48fDd6
vVDEVWYRvR4MhrtP6IXpPEDyQSPxD3EvSho/IdTeQ5XNxVxFuOkDPZtIcp6o
mmr6jIR7Fyl+ky7vLmIyrOeh68VA7GiFkuR/7qj+7LdUCdxyIX3u+rGuyO+F
v7Qm7pD3s2bLXM7Iej2vxhb3G3uZTvUNBwQfNIwe4m7hczkb9/MWIsypzSfh
nmoqrhj7Yov2WT6LKsK98+6ClPx7K9QdLXG8HrfxWWsVVh0LJFuzTP6KOyGN
eqBQyBRFDawED+ImrdtyXlrSQ8YpIgoTuE8UEee/R2qg/bZu07O4XTvSAk87
H0flRtTMRdwSTC5u2//yw6SWh+US7iA9k1M1MypA+iousoC71uUQUbDjAhBP
L49N4079HuM3y20EZ6J+vh3FbR7AHX/xzFVoDtny7scdya3dZ3ziBiikal1s
xe1ow2zNeN4GrOk/iVbhvlD+afad5U3QSH+8kYVbijnEy9bzNnTujSZH/Ptf
Mw1GnqeOMNu29MH933rkMzxvTHcBi5baTGPctptWUSevuUHN0PYoedxGb9SM
uMfd4Xpir98u3Op6ogJTrh5wUEbDfQbfL7HM4ddJIfdBPdryduK//btQd8eV
2wv83U452uPetvLqmHaKNzhb7/FQ+FcPGpY1ayV+IBx+Mbb1X73MqTz6ohwA
OQnU/Cjcwxeis3tsHoKY9fpnPdxfVpwdCuYCwb5JcTcRr0fN1uuX9rwLgujZ
fLVg3LWpl2UfeT0CNkzh3mncRZoyq1cZguHvO42lNLzeI5NmA3cKhEFWiP7p
s3i/mLDndyoshME9AR/P73h//Rd0c5/Np3C4Vtwo64a76M7Quw/uT+FCRK90
DN6PnSpdE47tUdA2c0c5H+/fxLLIE8kZ0bDVvxx6ELcsz+u60dPPoMlGyDSj
DQNamBU7567nIGzcGPgEnwdh7pScW7UxEBs2tEsOnx8zhUodfpKxILQ4GRyH
zxe9iYTl2LhYqK0uDFhqxvPA3FC1ziEOvPYJ7sjG51GeBpHMvycBIpYPPRzE
51kbfy1bm0sybOdguZP/Ae9fQ0G5YUoyRJAPBPW+x/Mq0ttsVeMF9LbMHdyo
xvOCXjFHTPAlNLN/ElWpwuDXr2LwaUmBeeX9Qy/e4f0zpHcygSsdGhxz2QiF
eP79CbgoqpkOaq3zplkFGEzvLbYs9EmHsE1e5dh8DC4bsYc0jKeDSQalyz4X
A77W1u65jxlQK96g9SsL77/Ss45at7PgzeoBlssvMLhns/hF5WUW8PUNjIsk
Y3COJ11OoSMLZp0qyQuJ+H57/l2XOJYNU/Wpm6Hx+P+frAqnx7Ih6MaPK7HP
8PxER97UhOWAYNTc4n8hGDgT+UflcvPgnL2KMCeej8p+nzWkKXkgbsu5FuyE
17fMvTwxtnyYfCDyB7uDf090jyu3az4wm0U+J9vj7zOI2ppTLIAZ5iL6+9YY
GJC3C+V/LoQBzdp2aTyv5cfnTEUmigGruFz6SAmf35Ysv7I4CMAovCfESwGD
vxf25ldKEsAE8z/ieAKDIYnTh4YsCfBAO+GPliwG2X3+EjJEArj7SzWQD2Jw
5BSTEDG7BBr/sIrf4sNAdRsvB4tJGeQLl1yRW6SBXfTxhYCqCnDvMB6ZSKUB
R3ifOG9PBQRGNdlIv6RBRZC3af5sBWg7iCo6JtGA5V5Dba9YJdhMqfT/jKFB
vrlBpGRkJZxl9JOuDqXBnKS7VI9VFdCH278ccaXB/aYS2wOs74G90DlSQ40G
4ZgsmWhRA95a/kkfKWvw4hfXlH5LPbDULXZIM6xByfcPbEiiGUbfJpvbbf2G
J4w3lBa1WiBkU1cnhLYCen12q/rX2iEtaKKTMr0MVw6lXXtX0gmLyQ1lJ9ES
7KLcGnOa+Irn/uFE85xFSB5Odg5K7IbLwww5nl4LsO1xiy8m1QvXsqbmeb7M
wfD6wd7Qim/g7VrEFdkyA5alIlsJNv2Q+i6Cerx4GuqY+IpYVkhA3tzIWu2Z
hIaX2bIbrynAkDd/xm5+HE4x2P5h0BsAT9gXLyv3E2J3iFx0GxyEIcuUyl8E
KkTqerpcjxgCLsaTGPfhUTiRbMNqGj0MrLKuR2QHhsFiJfvRE6MRuCZO4jEx
GYL++VI7f6lRaC+4Fk5cHoD6kyhcfGkUQlaJq5oTFDjQd2kz7fco7ApwsAv4
QYEI9wF3AWwUHge2/X3/jQImBdg1bjoqLLO2vzndRIEZwRMyW+xUmJBOb7LO
oAAfXV43RZIK2cb6qlrmFLjzKWZfjBUVRh75KVn3kuGrtegzdjsq2H1nnf3b
TgaFrWKGcHsqWDWoFqQ0koFOqWM2wIUK6mmvVKmlZEjIY65z8qOCm7JqWdxz
MtRF+NrqJFMhQrmbFKpLhv2SrOSmFCrYeEsQDLXI8KQ5+ZJqOhWeDB8JFAMy
GG9WKCi+oQLhpxNbqwwZpl0WWfaXU0HbeKjgJAcZ9Nge+qVXUaEx/oC8EBMZ
ynM5lvZ9pMKoiyJh+yYJHo5If9/VSAXHG/X3ybMk+On3XjfqExWmfFQbWn6S
4LyATtOONvwcdzp+/f0gCQgV/UrBHVQwXmwQJnwjwf+dV+H/z6v/A/y93Lc=

          "]]}, Annotation[#, "Charting`Private`Tag$8663#2"]& ], 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          RGBColor[1, 0.5, 0], 
          Thickness[Large], 
          Dashing[{Small, Small}]], 
         LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQLRqctpbh4uP9K2V+2QcnvrQvuHFCLzcXwT8Vq73h
JieCr39C2fOT4SM4X/mJ7ILIjIdwfsy0+qCtix7A+Z0BmmYLZ9yH8yuvhzmX
ctyD80/Ivq45EXYHzl84wS+XZe0tOH9G2tabd+VvwvnvfjcVmRVeh/OTvwS3
69y/CucnSX4J4g69Aucf+PvLK3PlJTjfxpV1f4rURTjfYMabffsun4Pzf//L
yW1tOg3nM+t8EW7POoEIj+sewu38R+H8c55LuA69PQjnK5TO2vpNcC9CPYem
IU/GNjj/vcbROdMNNsD5ir0/iu2fLYLzU1rZrd45dML5vTPeNnJJddjD+Ms3
OeW4Zy6G802fvQtXeL4ezk/tN/pQv2MbnN/50+Dmmdi9cP6s1wIvA08chPM3
3t7Ns1/lKJzfxZpg8dH9BJwfcC31W2D0aTg/QmNe9JaN5+B8oVvpT3KfX4Dz
Zz6Ymdc0/RKcz9hyouan1hU4/8Ev9Svt267C+fGbFP5PS74O5x9gE1vH8eUG
nH9o9hKD30tvwflWLCl/WALuwPmTORV8Cu/ehfN7/Uvz43ruw/kmM5O5w/sf
wPmxX5Y0d4U8hPOvv9+UWqf1CM4/aLm/U/kTgp99bJL0pMTHcD40v8D5AJfu
p+Q=
          "]]}, Annotation[#, "Charting`Private`Tag$8663#3"]& ]}}, {}}, {
    DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, 
     AxesOrigin -> {0, 0.3875523068020056}, FrameTicks -> {{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, 
     GridLines -> {None, None}, DisplayFunction -> Identity, 
     PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, 
     DisplayFunction -> Identity, AspectRatio -> 
     NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, 
     AxesLabel -> {
       FormBox["\"y\"", TraditionalForm], 
       FormBox["\"term\"", TraditionalForm]}, 
     AxesOrigin -> {0, 0.3875523068020056}, DisplayFunction :> Identity, 
     Frame -> {{False, False}, {False, False}}, 
     FrameLabel -> {{None, None}, {None, None}}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLines -> {None, None}, GridLinesStyle -> Directive[
       GrayLevel[0.5, 0.4]], LabelStyle -> Directive[Bold, Medium], 
     Method -> {
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}}, 
     PlotRange -> {{-0.6192630435706624, 0.6192630435706624}, {
      0.3875523068020056, 2.1519184467831276`}}, PlotRangeClipping -> True, 
     PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.02], 
        Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}],FormBox[
    FormBox[
     TemplateBox[{"\"a\"", "\"b \[Kappa]\"", "\"b\""}, "LineLegend", 
      DisplayFunction -> (FormBox[
        StyleBox[
         StyleBox[
          PaneBox[
           TagBox[
            GridBox[{{
               TagBox[
                GridBox[{{
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[Large], 
                    RGBColor[0, 1, 0]], {
                    LineBox[{{0, 10}, {40, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[Large], 
                    RGBColor[0, 1, 0]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {40, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[0, 0, 1], 
                    Thickness[Large]], {
                    LineBox[{{0, 10}, {40, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[0, 0, 1], 
                    Thickness[Large]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {40, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, {
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[1, 0.5, 0], 
                    Thickness[Large], 
                    Dashing[{Small, Small}]], {
                    LineBox[{{0, 10}, {40, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[1, 0.5, 0], 
                    Thickness[Large], 
                    Dashing[{Small, Small}]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {40, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}}, 
                 GridBoxAlignment -> {
                  "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, 
                 AutoDelete -> False, 
                 GridBoxDividers -> {
                  "Columns" -> {{False}}, "Rows" -> {{False}}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {
                  "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, 
             GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
             AutoDelete -> False, 
             GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
             GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], 
            "Grid"], Alignment -> Left, AppearanceElements -> None, 
           ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> 
           "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
          Directive[Bold, Medium], FontFamily -> "Arial"}, Background -> 
         Automatic, StripOnInput -> False], TraditionalForm]& ), 
      InterpretationFunction :> (RowBox[{"LineLegend", "[", 
         RowBox[{
           RowBox[{"{", 
             RowBox[{
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "Large", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0, 1, 0], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0., 0.6666666666666666, 0.], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"0", ",", "1", ",", "0"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0, 1, 0]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0, 1, 0], Editable -> False, Selectable -> 
                    False]}], "]"}], ",", 
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0, 0, 1], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0., 0., 0.6666666666666666], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"0", ",", "0", ",", "1"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0, 0, 1]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0, 0, 1], Editable -> False, Selectable -> 
                    False], ",", 
                   RowBox[{"Thickness", "[", "Large", "]"}]}], "]"}], ",", 
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[1, 0.5, 0], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> 
                    RGBColor[0.6666666666666666, 0.33333333333333337`, 0.], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"1", ",", "0.5`", ",", "0"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[1, 0.5, 0]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[1, 0.5, 0], Editable -> False, Selectable -> 
                    False], ",", 
                   RowBox[{"Thickness", "[", "Large", "]"}], ",", 
                   RowBox[{"Dashing", "[", 
                    RowBox[{"{", 
                    RowBox[{"Small", ",", "Small"}], "}"}], "]"}]}], "]"}]}], 
             "}"}], ",", 
           RowBox[{"{", 
             RowBox[{#, ",", #2, ",", #3}], "}"}], ",", 
           RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", 
           RowBox[{"LabelStyle", "\[Rule]", 
             RowBox[{"Directive", "[", 
               RowBox[{"Bold", ",", "Medium"}], "]"}]}], ",", 
           RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), 
      Editable -> True], TraditionalForm], TraditionalForm]},
  "Legended",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"], 
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, GridBoxItemSize -> Automatic, 
    BaselinePosition -> {1, 1}]& ),
  Editable->True,
  InterpretationFunction->(RowBox[{"Legended", "[", 
     RowBox[{#, ",", 
       RowBox[{"Placed", "[", 
         RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
 CellChangeTimes->{
  3.782214469890087*^9, 3.7822145063382874`*^9, 3.782214630014892*^9, 
   3.7822148080317497`*^9, 3.7822149635798182`*^9, 3.7822152244400444`*^9, 
   3.782215435268258*^9, {3.7822154937377625`*^9, 3.782215544720903*^9}, {
   3.7822156122594576`*^9, 3.7822156323801775`*^9}, 3.782215951331479*^9, 
   3.7822184751137633`*^9, 3.7822185162662134`*^9, 3.7822185588943057`*^9, 
   3.782218632808107*^9, 3.7822196930539255`*^9, 3.7822199238570204`*^9, 
   3.782221947719692*^9, {3.7822220120433364`*^9, 3.7822220312653465`*^9}, {
   3.78222207922147*^9, 3.782222087115408*^9}, {3.782222119547361*^9, 
   3.78222216372894*^9}, 3.782222482039259*^9, {3.7822225459220853`*^9, 
   3.78222255665739*^9}, {3.7822229593946714`*^9, 3.782222974631442*^9}, 
   3.7822241640173044`*^9, 3.7822243438625016`*^9, 3.7822244250908556`*^9, {
   3.782287941715081*^9, 3.782287975449335*^9}, 3.782288789533774*^9, 
   3.7822906551711903`*^9, {3.7822913081643267`*^9, 3.782291322174583*^9}, 
   3.782296618392045*^9, 3.782297253796118*^9, 3.7823052364891925`*^9, {
   3.7825813621554995`*^9, 3.7825813740335407`*^9}, 3.7825833305841165`*^9, {
   3.7825833764092093`*^9, 3.782583396004898*^9}, {3.782583460894145*^9, 
   3.7825834891651287`*^9}, 3.782583538670022*^9, 3.7825836152701035`*^9, 
   3.782583675860424*^9, 3.7825837163291183`*^9, {3.7825838585338907`*^9, 
   3.7825838867432313`*^9}, 3.782583955494999*^9, 3.782584023067078*^9, 
   3.782584086548361*^9, {3.782584118955905*^9, 3.7825842168279285`*^9}, 
   3.782584299674696*^9, {3.7825843599343443`*^9, 3.7825843812968616`*^9}, {
   3.782584432244983*^9, 3.7825845067106376`*^9}, {3.7825846802976675`*^9, 
   3.782584730735442*^9}, 3.782584784836703*^9, 3.7825848523884544`*^9, 
   3.782584884050439*^9, {3.7825849159656315`*^9, 3.782584949323036*^9}, {
   3.7827568940209928`*^9, 3.782756940758292*^9}, {3.7831533103396225`*^9, 
   3.7831533790577283`*^9}, 3.783153415328582*^9, 3.7831534603661485`*^9, 
   3.7831535288761053`*^9, 3.78315358015679*^9, 3.7831539892648845`*^9, 
   3.7831540193869457`*^9, {3.78315407567104*^9, 3.783154083936883*^9}, 
   3.783154195231228*^9, 3.783154272590616*^9, {3.783154368356549*^9, 
   3.7831543820624256`*^9}, {3.7831544716733007`*^9, 3.783154526515828*^9}, 
   3.783155777834945*^9, 3.7831558816374884`*^9, {3.7831559607021933`*^9, 
   3.783156011920889*^9}, 3.7831561221335077`*^9, {3.783156296765147*^9, 
   3.783156310891715*^9}, 3.783156394806693*^9, 3.7831566421864924`*^9, 
   3.7831582194992313`*^9, {3.783158587610404*^9, 3.7831586417788267`*^9}, {
   3.783158806657195*^9, 3.783158839504523*^9}, 3.7831588901412787`*^9, 
   3.783159161620496*^9, {3.783159429892138*^9, 3.783159469496049*^9}, 
   3.7831595603609877`*^9, 3.7831596459583035`*^9, 3.78315980083782*^9, 
   3.78316079822515*^9, {3.7831624601285067`*^9, 3.783162494102844*^9}, 
   3.783163709882825*^9, 3.783166366453264*^9, 3.7831665669797745`*^9, 
   3.783166655679043*^9, {3.7831911714030275`*^9, 3.783191247336479*^9}, 
   3.7831913088068047`*^9, 3.783192636460191*^9, 3.7831929446675997`*^9, {
   3.783193018727408*^9, 3.783193027818966*^9}, 3.783193179147971*^9, 
   3.7831932562431793`*^9, 3.783193343489666*^9, 3.783193461335556*^9, 
   3.783193658649988*^9, 3.783193795386083*^9, 3.7831938847267466`*^9, 
   3.7831940468041677`*^9, {3.7831941143508043`*^9, 3.7831941236485357`*^9}, 
   3.7831944072430525`*^9, 3.7831950018340454`*^9, {3.7831951599932966`*^9, 
   3.7831951756655226`*^9}, 3.7831953096585855`*^9, 3.7831954177102757`*^9, 
   3.7832417324743977`*^9, 3.7832431846534543`*^9, {3.783243640013296*^9, 
   3.7832436564483814`*^9}, {3.7833311305534554`*^9, 3.7833311418539753`*^9}, 
   3.7838397345072727`*^9, 3.7838398083073215`*^9, 3.7838398584188833`*^9, 
   3.783839890542446*^9, 3.7838400173319426`*^9, 3.7838401330522175`*^9, 
   3.783840690743511*^9, 3.783850844885989*^9, 3.7838509205718775`*^9, 
   3.783860623772453*^9, 3.783940516425296*^9, {3.7847080319500265`*^9, 
   3.7847080470885954`*^9}, 3.784708457499934*^9, 3.784708587253621*^9, 
   3.78470869540226*^9, 3.784708740186722*^9, {3.7847087885429688`*^9, 
   3.7847088424746118`*^9}, 3.784709563684412*^9, {3.7847200566997724`*^9, 
   3.7847200706530633`*^9}, 3.784720869808626*^9, 3.7847210940015945`*^9, {
   3.784721285124527*^9, 3.7847213227155247`*^9}, 3.7847214917740593`*^9, 
   3.7847216455507154`*^9, 3.784721721840849*^9, 3.7847218696628532`*^9, 
   3.784738528103218*^9, 3.78488524187362*^9, 3.7848855270745335`*^9, 
   3.784885566987649*^9, 3.7848858402972956`*^9, 3.7848863011718693`*^9, 
   3.7848863600496325`*^9, 3.784886512219963*^9, 3.784967732761732*^9, 
   3.7849682687961087`*^9, 3.7849685802712865`*^9, 3.7849688099888678`*^9, 
   3.784970408819131*^9, 3.7849705362471104`*^9, 3.7850533332369843`*^9, 
   3.7850534154713125`*^9, {3.785058730920721*^9, 3.7850587442715693`*^9}, 
   3.785058812986328*^9, 3.7850598133447638`*^9, 3.7852340649346113`*^9, 
   3.7852343107995763`*^9, 3.786014805869358*^9, 3.786014917815103*^9, {
   3.786014951998384*^9, 3.7860149671583633`*^9}, 3.7944718536006613`*^9, 
   3.794471924896137*^9, 3.7944724331328316`*^9, 3.794472486579007*^9, 
   3.794472631045947*^9, 3.7944727452078714`*^9, 3.7944728194494762`*^9, 
   3.794472878155672*^9, 3.7944729141405096`*^9, 3.7944729867873755`*^9, 
   3.794473042851555*^9, 3.794473091599301*^9, 3.794473134204447*^9, {
   3.794473185626033*^9, 3.7944732145567217`*^9}, 3.7944732614653664`*^9, {
   3.7953329318976746`*^9, 3.7953329425632334`*^9}, 3.795333995972432*^9, 
   3.7953343554484253`*^9, {3.795334421042015*^9, 3.795334444908768*^9}, 
   3.795334587048658*^9, 3.795945225417776*^9, 3.796120000626225*^9, 
   3.796390295873082*^9, {3.7977843798622136`*^9, 3.7977843959561715`*^9}, {
   3.7977845729670043`*^9, 3.797784619577348*^9}, 3.797784765873123*^9, 
   3.7978455043835*^9, {3.7978455362336283`*^9, 3.797845549084798*^9}, 
   3.813914599158518*^9},
 CellLabel->"Out[71]=",ExpressionUUID->"b0a06853-09cc-4a8f-976e-313685f494dc"],

Cell[BoxData[
 TemplateBox[{GraphicsBox[{{{{}, {}, 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[Large], 
          RGBColor[1, 0, 0]], 
         LineBox[CompressedData["
1:eJw113c0V///AHCrSISyMpJVJKOMjPJUUkQlpETKluyij0RGZqRklsqWke2N
wov7fpN1lT1SxruijBINKX1fzvn9/rjnnse55577Gs/7fL6e4rYeJg5MDAwM
f/G1duczdXzG0E1HFu0SHgUbukDHyYvnPUlHwcapl5rXd4GL/w2fl+109PIb
171x5i5ozIo/cIdGR0k5e5wEVklwXWoghWvoKNmxck/ENxKIRIF5tSd01HF+
r6HHGxI8h1oV3NzoqFCvbdbmGQnt5+VKhzfQkdSM+7veUyQotkoafNszib4d
2nD3W2wnSL4XTbdwnkDTnKbhoSMdYJV006Qqcxy9+KFCCil0QJSxrFpGyhia
8kj8Z3ytHfwGzXV92N4hh6G8AebuNmgVnbnRaj6KnF9xNgyJt0HG3RNuLM9G
kKl1e5iTfyukOFYNvxUbRlHPpZ1ufHgJ8ysh3mpeg+ig+35XFYOXYLdkGrF7
rB+9PkixyK9vAdutSyYbT/chm/KAXl2tFmj8+/vYpfweNGUSHetX1Qz79dYh
e6Fu9J8X84yVTjMopcw2NPR2ISWVWVW3dhqsrLq6hYV0oIDiRw5WF2nAvHtp
S4RLKzrQwVeas54G7YP6WyK4mpF7cafYYgkVugyy2Ym5JnQk0yLO/xIV7s29
/6Iw3oSchsK4bZypYHZPuv9hTxOqODh95qgTFUaGcp/4VDehqtsDGvwOVPjo
lK8iG9yE/ELXnai/SIXVsGLru7xNKN3kTZ/SWSooEjXl1lqNKJXT/lDxUSps
93lQ9YOnHhknlMVvkKWCe0nkxpM/65CL9aVBaRkq1H/ytckbrUMW4R2Th3ZS
4Zy1KefZvDrkr/n3+E1pKiQe5XCo3V+HtLj4/RglqMAuFMh7w+kFYuob1ZAT
psL3BpsrjPW16I9DiRjfJiocXj7ZZpFZi3hVi92OcVIhXllbrDyiFhkoZIcF
cVBB6alQh61JLWr8OLzlCzsVXO71StCmapBYp3RRPysVxu30esI31yCfQtpE
KyMV2tlk93A4U9Cb26Ns+j8IOOY3aK1wkoJcRXdnZX4noONTWIyxGgXtvTvw
5e8SAZ3tk1MJLBTk8exWOmWRgK6YtMeiGVXIkkPbRmmBgF5ubg7FkUpECy72
0JslYFTw58dTRhXIZJuyxo9JAqyicnivKlcgacY6HSfst8umh5KEKlDKCPFn
aIKAdyOlj0amy1G8WHR8wzgBE2kuZnZh5Yi/pEYt/h0BH7e/a7raUIaG+HZ6
WI4Q8EWmOS1ZqRRNuPxh8+0hwHGdZn0GXyl6UDiavdhNQA31/Isz30uQTBa/
gDd2vOqeA0FRJUi5fTTQ6zUBR7YO6XSXFaO/GXHnr3cRUDIurX+F6RnyOyHl
WNlOQFoqV1REZxH6GxLkAdjRJsttD5OK0NlgbeOONgLsaZ2GtF1FqHvntpQP
rQQIPr1yks+0EFHlhXSlXhIQ5NFkXp2Vj4w5hLe0UwlwkylM7nDLR43Feam2
2OcmEobG9uWjU80hv1YIAlRMnc+xdT5FlAJL2IM9rcZlbbGUh1wq+RZzGgkw
XrVyWDmci4y2a6xW1xMgHvvrCnzMRN3yo8uBNQR4l9vaT1Vkoga7lKJ92MRg
p1lccCbKP6smulCNxyuRoTomkok4fqqrO2I/rTb4GWiagVavaptbUAiwpql+
vxH8BFkpyGvYVRLAwMU+0CnyBF32o5I7sTMt3lFEah6jMbPq7XMVBHyYD/+v
bv4RKszpZbyO7bp1aGXFMg0x7XhUllZOwHX360z+aqnIr1aUXFdGgEjtCXp7
dwp6MpF1bKCUgAZmSZqQWwpi4pkLz8NmTO0Ie56VjBq73mkZYUdSRTb85k5C
rn0DyY9LCNi1aeGTQVEiapvk4PDB7jzb3J56NBH5aSuBETbXvFuMRmACUjQx
mfxTTECSIOLym4lHeeIRIk7Y6nb3v7aGxyMWz8JIXeyRZ07dghLx6E7ORMV2
bFFd7vs1Z+8hZJtw9O0zAvTfELu/3o5D/zxD7C9gx3heno8j7qB4ek7bQexX
63hLFZdjUaD07zkpbHMlB2UPxxj0ZPjQ1bkivN5hrJrzOlHojknptQjs2VKB
MyH+kahE46mhJ/bV0Z1X+SkRiKnQb9ACO0xZv1hbLhz9u1LBr4i96cLZjh6H
MJTyfHu7EHZStPO0Y/otpHfJS5UVO3ciUiKOLxQ1LzYrTxYSoMCZCpLGIWgL
X1fLa2yKer5VdXQwcpIleBqx74jdl0f/biJ6p8+rdOzHvhVOU1cD0cef6ofi
sUvI3gyuzzdQ5vEvrrewX/vz8l/s80OpL7U+u2CP96gYRxr8h+be9u2/gL0g
ezq6tMEXKTA7HTXDZgr2oQ0p+yAz/8UNx7A3DyWuMuRfQcI+/rd0sCUUKeqy
27wRCztD9T5s5fAB71P3PZGJdkiGInb48zmLRW53tIGR+bAMdp6zQpfuigta
kAt9LI7dyu9xKOGDE4oNZS4Txv5EK6G8f2WPpKtv+fNjs1/5ukv1uQ1qusi6
yoN9+pCt9kaD82jHuhj1TdhJj+k7ikTPoOEtW+Q2Yg/9tuc6/s0YSUyl9bNh
qxR3fnkTq4cYabLqrNie5ONgLfe9SGOk1mQ9ttR6Dy/mv4JgePi49JpDjM01
62e14Rrr+5I1N3jIdIqQhvB8S+C3tfcfvYkPmOMxg9e6wnMbsK1u8iQaHTgH
qudfPOHAjuXRHzitchHEua3ZubFd7Vht1x2zg7ifTPK82IZVLXOVFxxBJTWf
dSv2LtZwP3ufSxDlcOrBtrX5Wuit473tCrTq5fdSa+tRwHKPmu4Bb/szpuSw
7Vdt7mhYekHMV/1MZWyzvINmPB+94YjkPO9+bF1jcaFPnlfB4Opd0Fvbn8zx
nJTwa/BGrLXOYm3/DBsve/L4QaGIJZcDNuPSkz36adfh6I2PW73W4kHvQv3P
sgDobRg3v70WL/Paoa/23wT5B0ZRqWvPDeOye+2CQKqt4MpT7FdL7i6F88Fg
IrvPsxX7SJv1cYHKEFDJtwkZXlu/RyeUQv1CYaPQNaMZ7OIjCj/OsYQBJeQc
Gw+O99iUuWB2oUj4Wkvb5oBtzlnQpfY1Et5FSU4HYG8LcRS2a4kCS7HxqGTs
4stjlS+8b8PqPXtzErtLu3vKteMObPyyZ4su/l+TK2JVUjPioJhH4IktthJv
TuOk1l1A85rModi/Im04uTbfg5kd8mYt2JHeI7lODfFgb6oheAbni9kidTJA
9j6IjcQ7BGAbTyUt3k+4DwtNLLezsQWtTHUaXRLgiLWI9XfsfL3OYUGBJCjZ
dFMqA+erdsEGjnaPVHDa2b9bHOdHBVMR5fGRVFj0/vXLDDs+9rrFD70HcPFR
d1oU9jmmfbkSIg9BYjny8nfsmZkS8G9NA1PHA1KDON+GjxlrJHGnQ1DEzAqB
83XNn5tG4kfSoTdzEFiqCPi8teRCkX86RMPvc0ewT5hxhhMf0+GWFuInsfnb
2nrm6zLgSfXRrPe4HuSVH3I9eikLvlktsO6vJcDXbuGV9sMsYNLV8w7DPsyb
rqxGZsEHi4DkV9jjPn9/S+3JBpvT1zY7Psfz16iJYlrOhhC/B20PX+D6ieTz
6iNzQSEsWWVXAwHunYKTyk/zYbLtU00Prof7A17qyY3kA99bKzdlGo5vBd98
CY4CmKL5vEnAzovr9eTxLIC87svvLZrx90zu/JvfVwirD3Y+nW0hwGSYWbTg
ZRFEJ96dVcH1WvXj/JntUyVg9z1+szGu/zEX2GayNpWCM2fKz27sv4ZbC6pl
S0HFc7DSDJ8fxqS0ZMYulIJ+YkO1VS8B2QOBUgqdpWA9rfnWt58Aec31op3Z
ZSAZ/jOpd5gAHUa+TWzmFTDo6KijQCegbE6aFPaqgBB0n60DW2JELUYxpgKO
+SfkOr8ngKXiLPsZogJ4HOvscj8Q0Gaftj5XoRLKfc3H5abx+Fsl/+myVuE6
QX9lPUeAQ9zerzdrKCAGTbN2v3A9iBqQ5OulgGbf3s8Cyzi/h1w/UzBHgQQL
topObDZfoqFPohqSjt/KVV8hoMDKJFY2thp8yrU3C60SMC/rvavXpgY2G7lO
M7FQ4RqtzH7HxucgZV41fZmbClHLSsOd5+vhtmB/XaIcFRjqeVVTfOshaPf0
KdfdVPAN+nXXLq4ett50j9eVp4I9a6P+78Z6oKRf51tSoII238manVINcJWD
X/z8XiosKbklh3xuAMYfpzVPauDzc2XfrjStRrimKNBTjs/PD2a4P51qbQJF
s2kzb0cqlL15wYGkmkGZo0VxqYwK0esuqi8cbQWj/qmYr0w0MB5w+HHKsgPi
RlbZqyxpcFbmsWVlWRc4Lx2x+tNMg80jTu/dpl6DZqBOx889zZA6nuoektwD
epPsCZtKm4HxVuuN5V19UJfXoVkv3wLjv3f2RVD6IavYcN3nkha4UL79X5Ld
IMwlT92/cPglNK7nL2ZbGgIuRhGqXv9LIB5mK63kjECslxVZ8V8raLLY/2Ex
HoUCZolkGbE2uL9hu5HX27eQY/B5myNqg9iTPh7WMWPgeqXXTca7Hedxu41n
4sbhjhwadRLtgPNL2aHRZhOwV/JR8ea2Dhj8Uu4QuGsSdpfaIJ2ITmjSQFGS
3ybhb+qzeYn9JOwYOL76+PskzDnb1p8CEmK8R72FlidhO8HTFnSIBPPCZUse
Bjr8CeVOHtMnYVZEReEfJx1ezNhuTD9NAj9Dfs+ILB1a6QKHd3uQcLklXjje
hg7DVCE3r0wSXtuK3+V0oINIrmhVXg4Jav9KWKKc6bBNoGjfu6ckMKiTczc9
6DCVKjZrWEJCUj5ro1sAHURNT3DvqiOhMeaGvUEqHbTuHVNd6CdBWnbjMC2N
Dvn75ETlhkmIbk49rpNOh+SzLtoOoyScXqWo7cujQ1V57e6RSRI+eyywSVfR
weddIqXlCwnGHEEB6TV02KRj58S0SELV003fhOvoECmyYqz9g4SgCbk3m6l0
yGzW6aL8IeFDwPOTd1roUDHZZrP4j4RjQga0De10CBbuk1fC/XcpZVA9jKTD
pMzxvW64P/+//h3+v3//HxzXD/0=
          "]]}, Annotation[#, "Charting`Private`Tag$9097#1"]& ], 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          RGBColor[0, 0, 1], 
          Thickness[Large]], 
         LineBox[CompressedData["
1:eJw113c4l93/AHAfm89tzzIqo8JjlJ1xTsMTKYTIyPyg7BGlyN4rlBHZJbJX
9MRBlF0RiZ7Qp4eS0VCyv6fr+v3+uK/7el33H/e573Pea5+Dl7ETLQ0NzRa+
/tz5TJwraV5RUZGCnp9MGwlCFx+uj4NURIk3NplBJOh6Pcj/eR8VEYWHPDI7
SLC9OE0ruYuKxvUDDOi7SdB9pW1QqJmKYrc0n0/3k2DnbYEllXwqCq18mlby
lgS9x3vkPDyoyDPBPMv8Jwn2XZCpectCRW36LYFusrRQvkdc7/uhD0it0sRc
pJwWin8UKbC4OIP+Y70rZilGB60zQowbi6bRt9kfl1py6GCckZRKYdYUYnLf
ObxfnB4GvjE77s/8HhFW1gzvS+hhj8iXoB6zd6hw49x0uxIDLLxp4EFfOYGM
uzuDF7oYYJZz49t/97xF9Cp+SiFnGOHSRrivis8bVMmxMiVLZYSOKyYxf02N
oudMvNL5XkzQYdeKMfncaxRJGjTmW2OC7Vvrpy6VDSOlX26VI4nMUFOHAVF2
v0IB6ZqrIrwsUCFroa1tZAi1rJ6ytStigRvb7h5R4f1I6059/osDrJDurxWe
GNce1LtzamMjlxX2vdHlieHoRs8uRIbJcZPhkF4Ja+diB9J/Nhfvd5kMUxc/
LstNd6Bi+W4ZugAyNE2VHM0Z7kAu3mEzqVfIcGL8fr7/ow7UG3Y1ruIaGc66
lClJhXUgj8jMJ2OhZLgdVWVzk7cDsYi9VN9OJEP5zuY6G412dMQsY/52CRnu
9b/T+IurFenQCWb0vyRDz+pYsuHqExTiawL5h8mw9XOAfem7J4j7Vekn2xEy
tLQxYTtf+gS15fUf+jpKhrdPEk4tmk+QyaxNNv0kGbLuvsEb5PIPUmkIsdj8
SIY/2+z9SK0tSIY/JU7iNxmeWDPstShqQSFWnEIGa2SYpqi9py6mBVVqlucG
rJOhwoPd/Q7GLYh88Jpn1yYZuqaOiHXNNaMrTpPQhETAaUed4WjuZuQoLHFC
i5WAfcxSh4iLTWhEZvMrECLgqcA3NnKGTeitkoaYsjAB+z9HJRqpNCGVzSor
KRECDvR9mLtF34Sq7v7+j30PAYcSc/NEChtRbWKw4ZAYAUc4OQn5iQaE9vkf
FpUm4DvB1dmzp+uR76bLARo1AlrH3eO9rFiPlu+L9I9i/7tmcixjdz36mVDm
Ua5OwPcTNXcnPtUh0ynpKiMNAs7kupo6RtUhSaoiX6o2AWf3vu+43FaLFvLN
wcwJAi4f7M7NVKhB4tYXFFuNCOjMcKS1kK8GbZWV24WdJWDz0wv/mP+sRrZX
t86dMCZgmvIhrdC4anRYMCTzmQkB/941Dl/VVqGAezkeT8wIWD0tqetHW4li
edclPKwJmJvNERczUIHcdlOqRS4QMN54rTcnowK5OilvDWBTugb0u6Qr0DL3
r5kDtgQUfOBnyGfyEDWmOvYM2RMw1KvD7FFxGfI/yzM07UxAj4MPM/s9yhBv
2x6vYBcCWs7cGp9SLUNyYa4vBC8SUMnkoiXzwANUeapjQP8SAT+pcNhYrJSi
QJ/H9UVuBDTatnbaOHEfMXQWb/N4E3Bf0m8/MFuEQlkP09BdJaBvnQNlrr4I
2X/q9fLC7nwzYJoSVoTOwN6OCWyKWKHylHARqld2JqoCCfjgkd7qDZNCFFPP
oHbyOgFtupR/BoXlo1GDyN7jNwhIw8E6NiCcj2L3JxrkYRdZvG8Sbs5DxMvn
9avY/y1FX32ydBfdsbASLQ0hoPuu8Y0Nq1w0ejfZ+3coAa95XqO9rpKNqrtO
L1MiCCjcYkDte5WFRpsDL1Vit9GJd+32yELxF8mdK9ik7P6ox8WZ6L3YKlto
JAFjnwqzrHNmoNAkLfa4KAJKs3/7rFdxGzkLT17twR44392XffI2spEU7mCM
JiDHkkei+o1bqOOB/HwIdoYg4gj8koZ4JE/kUmIIqOaY/rUnOg1tORR9u4M9
UenySlAsDf0o3BR/iS1ynDO9+XwqMhSw2KMaS0Ddyc6/viakIPtTDZ6r2Ine
bkspnclIUfJ7mUQcAV8w8NbIryUhsWt5HUbYZgpOil7OiehRPF30PWxKFNOR
JRiHhL5Y2x+NJ+BCjYB5+PVYVK1V0U/BvvzuwGX+phiUym8sEoMdpahbpS0T
jQI1fQN6sNltz/cPO0Wh4wujwXPYGfEXPzkXRKIfcw7uDAkEvD8TK5bCF4GW
6l5sa2HLsWUDcaNw1LiQU3Qeu0mtzPpRfBi6etJV1hc7eU+6LNoJQd/s5lcL
sfMC6l3mLt9APOkJqs3Y1YMjhRzzQUhgkM1mEPvldV5+u9eBiNUjy3YFe3pY
yShW7yo6a5R+hDGRgN+kzsXXtAUgBRXTTX5s2jD/rnFFf1RiNFqyH5t7/PY2
TZkfolfkUlLGFpNvUpMS9UXEMG35MWzF6DHfs+neaCLiHqMhdvTjRYsfnJ5o
Y2dFzxK79KLc0PENV+Rqu+hHwe7h9zp26z8XlCucEOmB/bmruunjCwq6zNN/
3R+b1e+rtPJje3QurNwiCPvcMQdtst4FJMRwQDQcOyOPur9CxBwdyNfujcYe
X6dwnPluhIxrly3jsZWqBpYnk3TQ9rbaSCK292BemIbnYcRduetwMrYEo5cP
3ZYg+HY09cofhxuZHWld0AYJ9/KLk7DbvA4OCA/qA9N9Ok0J2Hcn04IXuUwB
tAuvjsW2DuG6fVrLEvR5nk+JxE7i0h07p2QHfj7uOReC7e7I5MBwyhFo8o7S
BmLrNz5bbLB1BgUPQzJ8sKWZogMp/pdAIU8/56U/32uhw8Cb4A5U4WMf2z//
o5w+9WmBF3gVbdRiik3Ztk9Wt/IBlnmpc7rYpqVHTblmfYF0ftimBvZxo327
P3tfBsx0kr9l/+xP0fS9rOgrgKszu5j9z/7pt7t5cwWCrlV/ky28/6SV/EO6
udfATR2h+fk/50HHtnW1NhicYpvs7/xzXpa0I15ohgCKO51A5Z/n+iklI46h
4EMlp14G9osVT9eHS2GA/eWavRP23702ZwQawkFT/qyuPnbbXQOFiMAIcE9+
gl8Bu+pvuV+W9FEg586Gyy98/pOyFsNYd8cCA9GT0/7YZmzlQypfY4GcKve2
IbZouLOQ47M4oDp5+9VB7Cq3qYZ/fBPAEQGmO2M4Hoe0X8259ycDvXnvOjHs
zPokpezCFPBR813IdxzfCrz32j9o3ATxZsl0Hdi/Y+3ZOLhTwZ45ATlL7Fjf
ifsubWmgYJKXOxjni4UKtcFgqXSwT5Tp1jFso7mMH+m30sFfrcsDjNiC1iaw
3fUW+P2IgZKA81GZzsBbQYEMYCrFJh2F81efYBvR55UNDt8MkdXA+U/ORFhx
eiIbPG+3lFkIx/Uq6ZrFL507oLZpaSYH25JW9b6YcA4wCX0auBpGwC9fqsH1
nlywuDxkno/zbfSUkXoGZwEYL4hfqA3G9W8z5PS+vwtA+rx+tAH2/K5q24rr
BUCAhjz5OYiABqZs0Z2zBaDXW7JJGJu/t3d46UkhuJtgpep3Dcdf3TH3k5eK
gTDbcgI1gIABjt9eaOcUA/+t8m9+2Cd4CxRVBovBk4wubTrsaf+tdYlDJaD9
flWKqD/+fvXmONq1ErAi0sWp64frJ5ItbY29DxgFzjc4exHQc0Dwg+KDMkD3
zvzRCK6PmsHPdWQmygD9PSnro9iscgFlYkQ5yMlbW6x0wutJGfHm8i4HtYJ2
byMo+H3GyTtLqg9Bl8XSazEHAhq/pRMpf14Ber+7Jcni+qw8u2S+d64a6BRU
x17B9T/RlvlLMXsN0JkyZmvA/cGW/q7yR1I14EzEYfNl3D9MSWgcnLKtASaN
MxoOhgQsGbshITdQA9Rb68+qnyag7BFGkYGSWjDar/qrQoeAkMTHzmxWD4J8
fvhUqBKwdlFyUMinHtSxv9TuVMHxNKGSKJ9YD6ZzUyfHlAlIX3+e1byzHtAk
KkVvKhKwl5LLeF+uAWRyHShXV8Dr7xHfOc7UCMyZ/UOuHySgU8rhryHNTWBG
Pp9lryCuB3Fj4nwjTUBBMjuSTwDn9/Br5uWLTWBFWW+WhZ+AzAGdba/FHoHu
i2a2yzwELLc2TpJKegQeBtEqVnIQcEnKV3rEvhncj8luXmEk4JWuWsp+8mPQ
zTpGNK2QYdyawtuBC62g38rJcNcgGdK08ipnBbSCgNxmmQ/9ZBgQ+vumY0or
cDR6Jl3eR4YUpnbd9fZWMEROSFPtIUNtPsPmAxJt4Kn2Lh7dp2S4ouCRGT7f
BlpoX8nAFtw/N7yWztVoB5fFKXYpuH++84Xz89meDpA7ZHQFXSXD2sl/CCTR
DSyVhk57cJBhPIOd2reTPeDn8SrN+UJWaDTm9OusVT8YnbbR6JNlhecP5lk1
1A6B6bARrclSFsg94fLRY+4loHs2eHK/JAvMns72DM8cBmXWXI0/05ghKbIn
aE36NdjUymZrYGKG0+sHXsc0jQLHa9sPhoOZoG3d3p0MxzdAYv1W3NIcI2xn
5K9iXhkHv6ZoTB5aM8LOnBKFjXsTYGWv6GuT5wzwCD1lk97oHYhNLu1iUGWA
6Sx7T/v8+y8QdAWjW3X0MMnQ38smcQrY3OpDPAfooVK2I9k8ZRq0O/j8O1BK
By+slETEm86AcmJ4yFqODr5ZrnO6If0BiDQGZN2oooUd6ihO/PsHYLgvbt+n
I7Rw/9iZ7byfH4Cp3rGjC2q0MNH3ne/utQ+Atjqi7KsKLTR7uGbFRUMFoonF
JuuHaeGCsJLcDhsVXPrpy84lQwv5acqGJ6SowI52R/S0EC10e5YmlGZPBf1a
kVW/N0jwpcO+m2xOVCB91X6aYZ0EVXaq6eMuUoHEyZeWPL9JkEZtcDHEiwqg
n52U/AoJZpQxtXsEU8EhVnVZ1wU83yYGUfSyqWBXN8+LxXckKClFftuVSwWj
hdVxOxMkGN+dfQYWUIHb1FAiF55vz203qaiWUoGuSZq7yigJznt9Y5ZspIIZ
f8a0iEESNCJCgwuaqaCdNvNmJp6PGx+wfxd6QgXJfvlvHvaSYOiMzCT3UyrI
duMCo3ie/i/4sWHyMyo4lnjFdv4pCZ7ardfF0kcFfU8Nenbw/F3T9EYtapAK
tI7fDuRrJ8H/m9/B/8/v/wOkZUad
          "]]}, Annotation[#, "Charting`Private`Tag$9097#2"]& ]}}, {}}, {
    DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, 
     AxesOrigin -> {0, 0}, FrameTicks -> {{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, 
     GridLines -> {None, None}, DisplayFunction -> Identity, 
     PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, 
     DisplayFunction -> Identity, AspectRatio -> 
     NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, 
     AxesLabel -> {
       FormBox["\"y\"", TraditionalForm], 
       FormBox["\"term\"", TraditionalForm]}, AxesOrigin -> {0, 0}, 
     DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, 
     FrameLabel -> {{None, None}, {None, None}}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLines -> {None, None}, GridLinesStyle -> Directive[
       GrayLevel[0.5, 0.4]], LabelStyle -> Directive[Bold, Medium], 
     Method -> {
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}}, 
     PlotRange -> {{-0.6192630435706624, 0.6192630435706624}, {0., 
      3.5686311093525025`}}, PlotRangeClipping -> True, PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.02], 
        Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}],FormBox[
    FormBox[
     TemplateBox[{
      "\"\\!\\(\\*SubscriptBox[\\(c\\), \\(0\\)]\\) \
\\!\\(\\*SuperscriptBox[\\(\[Kappa]\\), \\(\\(-1\\)/3\\)]\\)\"", 
       "\"\\!\\(\\*SubscriptBox[\\(c\\), \\(1\\)]\\)  \
\\!\\(\\*SuperscriptBox[\\(\[Kappa]\\), \\(1/3\\)]\\)\""}, "LineLegend", 
      DisplayFunction -> (FormBox[
        StyleBox[
         StyleBox[
          PaneBox[
           TagBox[
            GridBox[{{
               TagBox[
                GridBox[{{
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[Large], 
                    RGBColor[1, 0, 0]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[Large], 
                    RGBColor[1, 0, 0]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[0, 0, 1], 
                    Thickness[Large]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[0, 0, 1], 
                    Thickness[Large]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}}, 
                 GridBoxAlignment -> {
                  "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, 
                 AutoDelete -> False, 
                 GridBoxDividers -> {
                  "Columns" -> {{False}}, "Rows" -> {{False}}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {
                  "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, 
             GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
             AutoDelete -> False, 
             GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
             GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], 
            "Grid"], Alignment -> Left, AppearanceElements -> None, 
           ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> 
           "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
          Directive[Bold, Medium], FontFamily -> "Arial"}, Background -> 
         Automatic, StripOnInput -> False], TraditionalForm]& ), 
      InterpretationFunction :> (RowBox[{"LineLegend", "[", 
         RowBox[{
           RowBox[{"{", 
             RowBox[{
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "Large", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[1, 0, 0], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0.6666666666666666, 0., 0.], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"1", ",", "0", ",", "0"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[1, 0, 0]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[1, 0, 0], Editable -> False, Selectable -> 
                    False]}], "]"}], ",", 
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0, 0, 1], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0., 0., 0.6666666666666666], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"0", ",", "0", ",", "1"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0, 0, 1]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0, 0, 1], Editable -> False, Selectable -> 
                    False], ",", 
                   RowBox[{"Thickness", "[", "Large", "]"}]}], "]"}]}], "}"}],
            ",", 
           RowBox[{"{", 
             RowBox[{#, ",", #2}], "}"}], ",", 
           RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", 
           RowBox[{"LabelStyle", "\[Rule]", 
             RowBox[{"Directive", "[", 
               RowBox[{"Bold", ",", "Medium"}], "]"}]}], ",", 
           RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), 
      Editable -> True], TraditionalForm], TraditionalForm]},
  "Legended",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"], 
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, GridBoxItemSize -> Automatic, 
    BaselinePosition -> {1, 1}]& ),
  Editable->True,
  InterpretationFunction->(RowBox[{"Legended", "[", 
     RowBox[{#, ",", 
       RowBox[{"Placed", "[", 
         RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
 CellChangeTimes->{
  3.782214469890087*^9, 3.7822145063382874`*^9, 3.782214630014892*^9, 
   3.7822148080317497`*^9, 3.7822149635798182`*^9, 3.7822152244400444`*^9, 
   3.782215435268258*^9, {3.7822154937377625`*^9, 3.782215544720903*^9}, {
   3.7822156122594576`*^9, 3.7822156323801775`*^9}, 3.782215951331479*^9, 
   3.7822184751137633`*^9, 3.7822185162662134`*^9, 3.7822185588943057`*^9, 
   3.782218632808107*^9, 3.7822196930539255`*^9, 3.7822199238570204`*^9, 
   3.782221947719692*^9, {3.7822220120433364`*^9, 3.7822220312653465`*^9}, {
   3.78222207922147*^9, 3.782222087115408*^9}, {3.782222119547361*^9, 
   3.78222216372894*^9}, 3.782222482039259*^9, {3.7822225459220853`*^9, 
   3.78222255665739*^9}, {3.7822229593946714`*^9, 3.782222974631442*^9}, 
   3.7822241640173044`*^9, 3.7822243438625016`*^9, 3.7822244250908556`*^9, {
   3.782287941715081*^9, 3.782287975449335*^9}, 3.782288789533774*^9, 
   3.7822906551711903`*^9, {3.7822913081643267`*^9, 3.782291322174583*^9}, 
   3.782296618392045*^9, 3.782297253796118*^9, 3.7823052364891925`*^9, {
   3.7825813621554995`*^9, 3.7825813740335407`*^9}, 3.7825833305841165`*^9, {
   3.7825833764092093`*^9, 3.782583396004898*^9}, {3.782583460894145*^9, 
   3.7825834891651287`*^9}, 3.782583538670022*^9, 3.7825836152701035`*^9, 
   3.782583675860424*^9, 3.7825837163291183`*^9, {3.7825838585338907`*^9, 
   3.7825838867432313`*^9}, 3.782583955494999*^9, 3.782584023067078*^9, 
   3.782584086548361*^9, {3.782584118955905*^9, 3.7825842168279285`*^9}, 
   3.782584299674696*^9, {3.7825843599343443`*^9, 3.7825843812968616`*^9}, {
   3.782584432244983*^9, 3.7825845067106376`*^9}, {3.7825846802976675`*^9, 
   3.782584730735442*^9}, 3.782584784836703*^9, 3.7825848523884544`*^9, 
   3.782584884050439*^9, {3.7825849159656315`*^9, 3.782584949323036*^9}, {
   3.7827568940209928`*^9, 3.782756940758292*^9}, {3.7831533103396225`*^9, 
   3.7831533790577283`*^9}, 3.783153415328582*^9, 3.7831534603661485`*^9, 
   3.7831535288761053`*^9, 3.78315358015679*^9, 3.7831539892648845`*^9, 
   3.7831540193869457`*^9, {3.78315407567104*^9, 3.783154083936883*^9}, 
   3.783154195231228*^9, 3.783154272590616*^9, {3.783154368356549*^9, 
   3.7831543820624256`*^9}, {3.7831544716733007`*^9, 3.783154526515828*^9}, 
   3.783155777834945*^9, 3.7831558816374884`*^9, {3.7831559607021933`*^9, 
   3.783156011920889*^9}, 3.7831561221335077`*^9, {3.783156296765147*^9, 
   3.783156310891715*^9}, 3.783156394806693*^9, 3.7831566421864924`*^9, 
   3.7831582194992313`*^9, {3.783158587610404*^9, 3.7831586417788267`*^9}, {
   3.783158806657195*^9, 3.783158839504523*^9}, 3.7831588901412787`*^9, 
   3.783159161620496*^9, {3.783159429892138*^9, 3.783159469496049*^9}, 
   3.7831595603609877`*^9, 3.7831596459583035`*^9, 3.78315980083782*^9, 
   3.78316079822515*^9, {3.7831624601285067`*^9, 3.783162494102844*^9}, 
   3.783163709882825*^9, 3.783166366453264*^9, 3.7831665669797745`*^9, 
   3.783166655679043*^9, {3.7831911714030275`*^9, 3.783191247336479*^9}, 
   3.7831913088068047`*^9, 3.783192636460191*^9, 3.7831929446675997`*^9, {
   3.783193018727408*^9, 3.783193027818966*^9}, 3.783193179147971*^9, 
   3.7831932562431793`*^9, 3.783193343489666*^9, 3.783193461335556*^9, 
   3.783193658649988*^9, 3.783193795386083*^9, 3.7831938847267466`*^9, 
   3.7831940468041677`*^9, {3.7831941143508043`*^9, 3.7831941236485357`*^9}, 
   3.7831944072430525`*^9, 3.7831950018340454`*^9, {3.7831951599932966`*^9, 
   3.7831951756655226`*^9}, 3.7831953096585855`*^9, 3.7831954177102757`*^9, 
   3.7832417324743977`*^9, 3.7832431846534543`*^9, {3.783243640013296*^9, 
   3.7832436564483814`*^9}, {3.7833311305534554`*^9, 3.7833311418539753`*^9}, 
   3.7838397345072727`*^9, 3.7838398083073215`*^9, 3.7838398584188833`*^9, 
   3.783839890542446*^9, 3.7838400173319426`*^9, 3.7838401330522175`*^9, 
   3.783840690743511*^9, 3.783850844885989*^9, 3.7838509205718775`*^9, 
   3.783860623772453*^9, 3.783940516425296*^9, {3.7847080319500265`*^9, 
   3.7847080470885954`*^9}, 3.784708457499934*^9, 3.784708587253621*^9, 
   3.78470869540226*^9, 3.784708740186722*^9, {3.7847087885429688`*^9, 
   3.7847088424746118`*^9}, 3.784709563684412*^9, {3.7847200566997724`*^9, 
   3.7847200706530633`*^9}, 3.784720869808626*^9, 3.7847210940015945`*^9, {
   3.784721285124527*^9, 3.7847213227155247`*^9}, 3.7847214917740593`*^9, 
   3.7847216455507154`*^9, 3.784721721840849*^9, 3.7847218696628532`*^9, 
   3.784738528103218*^9, 3.78488524187362*^9, 3.7848855270745335`*^9, 
   3.784885566987649*^9, 3.7848858402972956`*^9, 3.7848863011718693`*^9, 
   3.7848863600496325`*^9, 3.784886512219963*^9, 3.784967732761732*^9, 
   3.7849682687961087`*^9, 3.7849685802712865`*^9, 3.7849688099888678`*^9, 
   3.784970408819131*^9, 3.7849705362471104`*^9, 3.7850533332369843`*^9, 
   3.7850534154713125`*^9, {3.785058730920721*^9, 3.7850587442715693`*^9}, 
   3.785058812986328*^9, 3.7850598133447638`*^9, 3.7852340649346113`*^9, 
   3.7852343107995763`*^9, 3.786014805869358*^9, 3.786014917815103*^9, {
   3.786014951998384*^9, 3.7860149671583633`*^9}, 3.7944718536006613`*^9, 
   3.794471924896137*^9, 3.7944724331328316`*^9, 3.794472486579007*^9, 
   3.794472631045947*^9, 3.7944727452078714`*^9, 3.7944728194494762`*^9, 
   3.794472878155672*^9, 3.7944729141405096`*^9, 3.7944729867873755`*^9, 
   3.794473042851555*^9, 3.794473091599301*^9, 3.794473134204447*^9, {
   3.794473185626033*^9, 3.7944732145567217`*^9}, 3.7944732614653664`*^9, {
   3.7953329318976746`*^9, 3.7953329425632334`*^9}, 3.795333995972432*^9, 
   3.7953343554484253`*^9, {3.795334421042015*^9, 3.795334444908768*^9}, 
   3.795334587048658*^9, 3.795945225417776*^9, 3.796120000626225*^9, 
   3.796390295873082*^9, {3.7977843798622136`*^9, 3.7977843959561715`*^9}, {
   3.7977845729670043`*^9, 3.797784619577348*^9}, 3.797784765873123*^9, 
   3.7978455043835*^9, {3.7978455362336283`*^9, 3.797845549084798*^9}, 
   3.813914600272538*^9},
 CellLabel->"Out[72]=",ExpressionUUID->"5e47f684-bde1-42f6-86ca-75c1152fa567"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {GrayLevel[0], Thickness[0.007], Opacity[1.], FaceForm[Opacity[0.3]], 
      LineBox[CompressedData["
1:eJwVx3881HccwPHLh/vB3WjnRz0iC/0ym4yEHe+3OT9SJpNUyrT5cUI2JJlt
aP0+I5GJiixGKr+S8iOVH/m10vxaV77HGU6uSIni7Pzxerwez1XfhX8ToESj
0dwULf5xf1StxIWGtlzhoN0tDmYfN49fdHS3Zf2imafDHw4qzNfftGvRJfp+
Ukphw4NWtTyFgweNw7oULruFbpYKm8iexeUrfDoiJUlX4b4KzYaXzjQcdr9z
5mYlB0Ve3UEajjTMEql2Lr/JwZBlJZ3brGioKSipm7zGwenYhKRIIxqedzhB
PbjMwcaQ8eRSFg0ndBYm889y8Ez2qaa0lgU40RWdU/ELB30yn84kRS/Ark8p
s4VADrpV/ntN6aMFYL9tb3rhwkHfUNHm7Ew5NHfYjBis5eA+ptFk6So59LQ1
NssJBz+ZZMQEpc1DzxY22+gpG2tupBbI6fPANX1tWn+DjVTXy9TYqDk4amzD
3HyEjV8lu9/8p+MDDJ3fZ062sdFCn9+yweQDCKVheUI9Nt6bE6jHHnoPI/K7
T2yH1DCHJ8squDcLub/HnPqjUA0L5s9tMdCahcRiL5n8BzUM1h52euw9A/r3
9DQbzNSwt+a49diVd+Dt2KTHe6uKGfHROx4MTYOuBSW0KVNFW2nmhbS10+C8
l5HIC1fF7YmZaz+LeQtux43uPzVVRX71kud91W9gNe9Jk+8YC72WXCxz+egN
cAaI2dRfLNSsvzpWHjgFtQZOBVECFq5Qd2zbWPEaJM3eLDBgYXNNrLv20tfQ
qHvZPk/MRI1LspW+/pNQwCnOP5vJRLn1tl7TuxMg7xF5yj2ZGMR08bRaPwER
YdkJe7hM9E/nG4dpv4KAfs91xR0M3Kve6+wxI4OImECJVhID27jry1xHx6HI
TyvB5WsGTvmxG660vgDlw3M2LaoMdB3c3a7TMgYx0STtp3Y6bi7U07hQLYUv
px3e15yko4OoPIbZMgra99HCcisdI2uP1KVLRiBUa+Oa6xp0TE8vkoxPDUPV
gGkgo1MFrWd/e1WjOwz2ZoEfHz2ngjuvj9LP8f6Dki3zkfo7VTBiIdLpQPAQ
uO7P0hldoYL2MZGzZsUSuDbXp3djSBmf1VULzUYGYSrUcJmoUBkrlr/rq7Ic
BB4tQyaLVEYfPzenwykDINphKaShMso63lUKJGJoFXLVq5jK2JA82nHCRQwq
Y16N+j0EpauNBBJHMQR8GKBjN8HhH8nPdg5ioInifPy6CHon79GethWDhkm/
be4Tgn938FVCzMWgJXcZMXxEsKzJ/X7ISjHU2AjbTR4SnC4y3pUipaCpgEVt
vUPw4LGs0e+HKBjNnUkIv00wsNRNYEVRoIEvN6VWEbxd3b1pqIsCX/PxZ72V
BC+d5HKd6ymo9TFW8y8nGFXMz7DOoKA1WzDzazFB1rfMZbqpFLzfkN2Wd5Vg
RHzSsQUhBTJ+Z2lzEUHTYJ5JSyIFa07b3VIvJGjQ/ig96AAFhxpW5OdcIbi1
3z7eI5gCtWSPpY1/Egz1sPTm+VNAox9LluYR3K/EaNXcTUFWorThi8sE486f
DVDyokDQphPnnUtQ5kxkE+4UPHdycIrLIbjO7nM/sSsFI2khhrmXCFqUj9c9
dqSgbXsKt+kiwf8BeBM3BA==
       "]]},
     Annotation[#, "Charting`Private`Tag$9694#1"]& ]}, {}},
  AspectRatio->1,
  Axes->{True, True},
  AxesLabel->{
    FormBox["\"\[Kappa]\"", TraditionalForm], 
    FormBox["\"|v|\"", TraditionalForm]},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[Bold, Medium],
  Method->{
   "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "ScalingFunctions" -> 
    None},
  PlotRange->{{0, 2.0355906297007564`}, {0, 3.7144754122731727`}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.05], 
     Scaled[0.05]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.782214469890087*^9, 3.7822145063382874`*^9, 3.782214630014892*^9, 
   3.7822148080317497`*^9, 3.7822149635798182`*^9, 3.7822152244400444`*^9, 
   3.782215435268258*^9, {3.7822154937377625`*^9, 3.782215544720903*^9}, {
   3.7822156122594576`*^9, 3.7822156323801775`*^9}, 3.782215951331479*^9, 
   3.7822184751137633`*^9, 3.7822185162662134`*^9, 3.7822185588943057`*^9, 
   3.782218632808107*^9, 3.7822196930539255`*^9, 3.7822199238570204`*^9, 
   3.782221947719692*^9, {3.7822220120433364`*^9, 3.7822220312653465`*^9}, {
   3.78222207922147*^9, 3.782222087115408*^9}, {3.782222119547361*^9, 
   3.78222216372894*^9}, 3.782222482039259*^9, {3.7822225459220853`*^9, 
   3.78222255665739*^9}, {3.7822229593946714`*^9, 3.782222974631442*^9}, 
   3.7822241640173044`*^9, 3.7822243438625016`*^9, 3.7822244250908556`*^9, {
   3.782287941715081*^9, 3.782287975449335*^9}, 3.782288789533774*^9, 
   3.7822906551711903`*^9, {3.7822913081643267`*^9, 3.782291322174583*^9}, 
   3.782296618392045*^9, 3.782297253796118*^9, 3.7823052364891925`*^9, {
   3.7825813621554995`*^9, 3.7825813740335407`*^9}, 3.7825833305841165`*^9, {
   3.7825833764092093`*^9, 3.782583396004898*^9}, {3.782583460894145*^9, 
   3.7825834891651287`*^9}, 3.782583538670022*^9, 3.7825836152701035`*^9, 
   3.782583675860424*^9, 3.7825837163291183`*^9, {3.7825838585338907`*^9, 
   3.7825838867432313`*^9}, 3.782583955494999*^9, 3.782584023067078*^9, 
   3.782584086548361*^9, {3.782584118955905*^9, 3.7825842168279285`*^9}, 
   3.782584299674696*^9, {3.7825843599343443`*^9, 3.7825843812968616`*^9}, {
   3.782584432244983*^9, 3.7825845067106376`*^9}, {3.7825846802976675`*^9, 
   3.782584730735442*^9}, 3.782584784836703*^9, 3.7825848523884544`*^9, 
   3.782584884050439*^9, {3.7825849159656315`*^9, 3.782584949323036*^9}, {
   3.7827568940209928`*^9, 3.782756940758292*^9}, {3.7831533103396225`*^9, 
   3.7831533790577283`*^9}, 3.783153415328582*^9, 3.7831534603661485`*^9, 
   3.7831535288761053`*^9, 3.78315358015679*^9, 3.7831539892648845`*^9, 
   3.7831540193869457`*^9, {3.78315407567104*^9, 3.783154083936883*^9}, 
   3.783154195231228*^9, 3.783154272590616*^9, {3.783154368356549*^9, 
   3.7831543820624256`*^9}, {3.7831544716733007`*^9, 3.783154526515828*^9}, 
   3.783155777834945*^9, 3.7831558816374884`*^9, {3.7831559607021933`*^9, 
   3.783156011920889*^9}, 3.7831561221335077`*^9, {3.783156296765147*^9, 
   3.783156310891715*^9}, 3.783156394806693*^9, 3.7831566421864924`*^9, 
   3.7831582194992313`*^9, {3.783158587610404*^9, 3.7831586417788267`*^9}, {
   3.783158806657195*^9, 3.783158839504523*^9}, 3.7831588901412787`*^9, 
   3.783159161620496*^9, {3.783159429892138*^9, 3.783159469496049*^9}, 
   3.7831595603609877`*^9, 3.7831596459583035`*^9, 3.78315980083782*^9, 
   3.78316079822515*^9, {3.7831624601285067`*^9, 3.783162494102844*^9}, 
   3.783163709882825*^9, 3.783166366453264*^9, 3.7831665669797745`*^9, 
   3.783166655679043*^9, {3.7831911714030275`*^9, 3.783191247336479*^9}, 
   3.7831913088068047`*^9, 3.783192636460191*^9, 3.7831929446675997`*^9, {
   3.783193018727408*^9, 3.783193027818966*^9}, 3.783193179147971*^9, 
   3.7831932562431793`*^9, 3.783193343489666*^9, 3.783193461335556*^9, 
   3.783193658649988*^9, 3.783193795386083*^9, 3.7831938847267466`*^9, 
   3.7831940468041677`*^9, {3.7831941143508043`*^9, 3.7831941236485357`*^9}, 
   3.7831944072430525`*^9, 3.7831950018340454`*^9, {3.7831951599932966`*^9, 
   3.7831951756655226`*^9}, 3.7831953096585855`*^9, 3.7831954177102757`*^9, 
   3.7832417324743977`*^9, 3.7832431846534543`*^9, {3.783243640013296*^9, 
   3.7832436564483814`*^9}, {3.7833311305534554`*^9, 3.7833311418539753`*^9}, 
   3.7838397345072727`*^9, 3.7838398083073215`*^9, 3.7838398584188833`*^9, 
   3.783839890542446*^9, 3.7838400173319426`*^9, 3.7838401330522175`*^9, 
   3.783840690743511*^9, 3.783850844885989*^9, 3.7838509205718775`*^9, 
   3.783860623772453*^9, 3.783940516425296*^9, {3.7847080319500265`*^9, 
   3.7847080470885954`*^9}, 3.784708457499934*^9, 3.784708587253621*^9, 
   3.78470869540226*^9, 3.784708740186722*^9, {3.7847087885429688`*^9, 
   3.7847088424746118`*^9}, 3.784709563684412*^9, {3.7847200566997724`*^9, 
   3.7847200706530633`*^9}, 3.784720869808626*^9, 3.7847210940015945`*^9, {
   3.784721285124527*^9, 3.7847213227155247`*^9}, 3.7847214917740593`*^9, 
   3.7847216455507154`*^9, 3.784721721840849*^9, 3.7847218696628532`*^9, 
   3.784738528103218*^9, 3.78488524187362*^9, 3.7848855270745335`*^9, 
   3.784885566987649*^9, 3.7848858402972956`*^9, 3.7848863011718693`*^9, 
   3.7848863600496325`*^9, 3.784886512219963*^9, 3.784967732761732*^9, 
   3.7849682687961087`*^9, 3.7849685802712865`*^9, 3.7849688099888678`*^9, 
   3.784970408819131*^9, 3.7849705362471104`*^9, 3.7850533332369843`*^9, 
   3.7850534154713125`*^9, {3.785058730920721*^9, 3.7850587442715693`*^9}, 
   3.785058812986328*^9, 3.7850598133447638`*^9, 3.7852340649346113`*^9, 
   3.7852343107995763`*^9, 3.786014805869358*^9, 3.786014917815103*^9, {
   3.786014951998384*^9, 3.7860149671583633`*^9}, 3.7944718536006613`*^9, 
   3.794471924896137*^9, 3.7944724331328316`*^9, 3.794472486579007*^9, 
   3.794472631045947*^9, 3.7944727452078714`*^9, 3.7944728194494762`*^9, 
   3.794472878155672*^9, 3.7944729141405096`*^9, 3.7944729867873755`*^9, 
   3.794473042851555*^9, 3.794473091599301*^9, 3.794473134204447*^9, {
   3.794473185626033*^9, 3.7944732145567217`*^9}, 3.7944732614653664`*^9, {
   3.7953329318976746`*^9, 3.7953329425632334`*^9}, 3.795333995972432*^9, 
   3.7953343554484253`*^9, {3.795334421042015*^9, 3.795334444908768*^9}, 
   3.795334587048658*^9, 3.795945225417776*^9, 3.796120000626225*^9, 
   3.796390295873082*^9, {3.7977843798622136`*^9, 3.7977843959561715`*^9}, {
   3.7977845729670043`*^9, 3.797784619577348*^9}, 3.797784765873123*^9, 
   3.7978455043835*^9, {3.7978455362336283`*^9, 3.797845549084798*^9}, 
   3.813914600354319*^9},
 CellLabel->"Out[73]=",ExpressionUUID->"c4c4ec94-5177-411b-be14-c8b9aa38aeda"],

Cell[BoxData[
 TemplateBox[{GraphicsBox[{{{{}, {}, 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[0.01], 
          RGBColor[0.5, 0, 0.5]], 
         LineBox[CompressedData["
1:eJw113c4193/B3D5fGR93kY3kptboe6oUEZCzrmTspLMZCSzsmeRiDKzt8jO
3ptwECUrIbuMTxGFhhTC93Rdv98f7+t9Pa73H+8zX89zDpg5aFnS0tDQbOHn
z5tT26qY5jUVKRnL8TxPJUFo7cT+vpeKbvB/zr+QToI373i5veiiopPpZ9zf
ZJBgS1b06fB2KhKzWmj/kE2CtqvNvX/XUdFXxcuyjIUk2Ba3d1k6jYoMB90D
DWtJ0HG0U9TOjoo6+YVqj/WTYJfxkbIxRipykE2vDaIlQ7FOQZVvx2eR5X86
9347k6Hge750g+szqE2O1pB2mgyN4n20qjOnkZH0C65kDToYrCksnZE4hUjP
fp1J7qKDHiN6im4M71DU6PMzy//thp18n7w69SZR3Ki07bvnu2FGpIYduXgc
Sdvwr2Wq08NEq+qxt/xjqCDqw8ZwNz1c3vRzlnYaQRHDtYda9Rmg+ap24NGp
N2jWphR5TDBAs32rWsy6Qyhvkhz50ogRtmxtqN7IH0CmyWfPHfnICOWV6JAF
z2v0sOtzh+B1Jiie+Lm5ebAPbTTkn6BfYYKb27Z2/n7dSMCNsHpjxwxJR1f/
CrzZiTyN1PWs3jLDrhHlvwJZO1DhYd/KYxcosE8lm6ltqRXZmb5VZC6kwKil
9yui061IOKxXPriIAnWiDr5JHmhFPqs7ertLKHB8NCfNrbYV+S1yLm2VUeCc
db6ksG8rypi8FTVbQ4Hb/iUmkRyt6PgI33nfNgoUa6urMJFrQewJjX1sYxS4
3+1R9Rp7EwrgVRQzIhHQvjSI+eLPRmTG0PU4kUzApgX3a7mTjcg9eIhriI6A
V0y0icu5jcjCufCQMgMB485TLOvlG5HS+S9lQgQBmXi8ObysnyI3Xz6ilIuA
P5qvuexqqkchlJAJOmECnl2/+NIgsx71K3xqFRAhYLSEAn9FYD2K9CE/UThC
QPE8nm4zrXrk/rz2qssxAt6MGhRon69D0m2Pk/uPE3DaXGkgYE8d2mcNBwxk
CdjFIHyccr0Gha8GO2WrElDVY8RE9GINKlmzU49QI2D3gn+opnQNkrEskvVQ
J2BP1+x8LLkGPfhIo6mqQcC+0JRUvoxq5G4XpTtziYCDbGwUsfEqNMboGDx7
mYCT3D/nLqlXIl3RzRAxKwIaBT/hcJWoRDTWwuA39tt17TPxPJXocb3b1gtr
Ar4bL3s8/rECqftqJxjdIOBMyk0dc/8KxGGfJuNpS8C5/e9aXZvLkTK76lqA
MwFXDnekJIiXoVcCSzHv7xLQik62KYOzDFW5/nqU7k3AumfGT/V/lKLIWftb
hj54vKSOn74XXIoG39uW9t4j4Ll9o/B1eQmKTXP9K/s+AUunDyq70BYjewMj
G+5gAqYksQYH9hShRAGjnFbsEK31l8nxRcj7wqmKGyEEtGjvUWsXKUI2P27J
1TwkIHeey0VO7UIUKRlH+S+cgPccWvVqs/KRDK2SA18MAe0OFyZ02+WjbZmG
xErsKzOxo1Mn85Fv8bdw5VgCSmpfv8LQk4f06Gqn7eMI+FGa1cRgNRc193za
U5xAQM1tI8vNszmIUSfQeyWZgAfCfrmAuUx0pffVSkgWAZ0rzCzmKzNRin3M
4jfstpEenQjfTDTyJGXQIBu3VyBDaoo3Ex3oWHAQekLAvFqVn97aGejNoxu9
RTkENGmX+uHlm4ZqD+zdCs4nIA0r03APbxriM7nePY2dafCuhrcuFekrDfpL
FxDww3LA7cblx+h7zO3md9i2+0Y3Nw1TkJRjnpxAEQE97T1p70gnIcX0f9Td
SgjIW69B7XqdiJbXBPsasJtJgu08doko4ZSn7A72rqRu/4asBPSCtfr1g1IC
Bj3jZdxgi0cdGw0//coIKMLydUGlKA5FLSa/RNg9lzu6ks7HIUVhVv9NbNZl
u9BT3rFotlenzqGcgPHciNXjUzQ6mkBhUasgoIx5zJfOgGi0se+YiA/2eLH1
a26BaKTeKCtWgc2nyBZTdzkKeRgPfOeoJKDyRNvRLw8jkIPTb4te7FBHm+WI
tnB0437o81/Yr+g4ysTWw5AHrzebYBUB9cQtJRysQpFG3XljV2wLf3rZZRiM
FL+MjDJWE/Bz2V59vztBSLnVqv8Ituvkv65cNYEIlr9sUMf2l1AuUTgSgGpd
3lo/xGa5erl7wNIfLf68JZKPHR9y/aNV+gMUuF0/1YGdMxMkEMF5H4nsoQj8
xhYlkoCgph+i62Mo5awhYI1MvlFtiC+i3AwQFcUO5485hnZ8EGqaIRthp7pX
Ws+7eqNIgVJDJ+zS3sEM1kUv9KV1Mtsfu/8OB5fpkAfyE5ZnKcSeHpDUDFK5
jY6mmoo2Yn8V1g0pa3ZHV3O6YA82ra9b+6iEG9IPclWawN4zGrdNk++CtBcv
yy9gC4jVyAj/44wKBpwPrmFLBAw7X4pxRE25TTS0tQQMaFgy+M5mjxjFpfoo
2LnXRfsUN2+if6PfhHFhd3I5nIn9YI0GdZIBP/ZCe2nN+1cW6IPJfeohbCaX
LyJSDdeQyc8Qj2PYumfMFJhVjJFNR+kuCez4VOqhIj59ZNG/cuck9uiGBeuF
b5qozUfloyy2ZEnPykSYEpJLfnruNLZjb6qvnP0JVKGqlKCALbTbwYm0xQ1O
cM2N/bGfpp5s02cFsGvuMcsfNzsc7uHtVQOhtHZS8tiPJ6LvLrHrAE8OHY1T
2EY+7HHqp6+Ax0I6BlLYYezKw7qSpmAt2V5PHNvWnN6MTtUcVCg+URLBVqt+
vlR11QpIKG0cEsQWoQ/wsHC7AdaFHTd4/vTXQImO46EtqJpgbGH/Mx4F5Khn
6Q5ANLvrFj22xfa18FOGTsD0WM2B33i8dXL/02GfcwbGvv1NK9iKmgd4Fhxd
gRrTP+qzf+Ync/pJYsAtQDlrBdr/zJ9ai40juwcIy7fJrsTetZp2XDnFE2gX
129m/FkPSlebfpbfBSf3qfje+bNelhXuv5L3AXTSiaVWf76rRWQPmt8DTlfU
+jWxX63a3yxc9gWZZ7Y+HsA+99Lkwt4qP3C+gTLDgN38WEP8vsd9oJSR0b2M
13PJOdG1K2R/0HHG93Ytdljiki8TTxD4dEPihDy2HlHQJ/0lCLx0iJ3ci/2P
n9Xf5s+DwZG3Eqrf8P4rsZmqeur8EFw2tXPIwu5TeD1v2x0OTjJmU9fw/k2o
DJNMyogAv4t78zuxxTmetMzKRQJXujaJJOxfQdcI1j1RILT+Sow0dpDzeI51
czR445h43wzXi89FMr13hWNAq5rpTRFszfn47zGxMUCVMZ3zK64/3EbasOVm
LJi4O1/viZ2v1DPGvTceyPPoyvvgetXF3UzpckgCObPq8AKuf6LavBLT40ng
x/lFz13Y0WGeBmtKj8CD/qd3qopxXtCezBHgTQYfWL36ubA/fSoFdzpTgObz
PV09hXj/TGmeimdLBxcMVHi383D+/fZRP3AuHbRYqHSlYi/uK71adCcdsGQ3
QAVsDR0ioG0uHXhbRAV65BKQ6+XLgeXGDMBJH+k7g/Mht+KM7fkbWeCTgL36
rUwCupt/faWQnAWyLr1SpmCf5UiXkO7NAga28jLpGXi+3bY2hI5nAw7e4S/t
6bj/p+qCadezQUiHce+uNJyf6FhuU1AO0I/I0FfB+WXfwz0rkZcP0m7PzbLh
PJS/+0LpyHg+GHLeiX4Qjde3qHu+AKUAzG+Uyf2Mwu2JGHRkdywA3W9ybo1F
4v9phe8snywEzoOOaVE4b7XGSHwFL4oA/2/JyX6c11Jzy/r750vBo1ejwaE4
/0OvMnzKYikDPKY9R1/j88GW2r6CWuEycHHDJ5MDe0pI7vDU1TLwJNWYPtGL
gNnD3kKiPWWg0SYQRXoQ8Jjsbr6e7HIgeTZXTNWFgHAXJwuDXiWYG1nXnbIk
YPnSwd6/nSpBnqrByrYF3k/j0qFioZUg5v2GJR82ufIyk35bJTDVcvysZ0bA
lxYpu3NEq8Auj6PXG01w+zsFdxTpq4GloovtJX0CWkac+OJTVwNeK9oo55zH
eRA8LMg5WAOctORJuedwfffz1C9YqgGhTz3Kc5QIyODe1jwkUAseFzcvZCoS
sMBIK0w4rBYMWB8aCgcEXBZ2Fhm8Vges1ffPS54k4K32cotDzA3goOm17saD
BAxeFx/rMW4CWsUnCgd2KJCmiUMq0b0JyPGPfMnbpkD3e78izSOagLbMkrn3
FgVa0Lcob7Q0gdHq2cFDmxSowHmx7l+hZhCcJvLBbo0CV8XtEvwWmwG3mTv/
m8/4/Fw1JJIi1wJuxPuHMeHz86NPbAuXOlvBO+20lEOlFFg+8ZSChDoAb1xX
RKgqBYbQmcp8Pd8JVFq9lPbNMkPNYcu1S4bd4E4fS6i/CzO8fDjVsKq8Dxz8
mkCSW2WCe8at39vN94MPvb7tSreZYNJ0kr1fwgDoYdJKXVtihLsedHqtiwwB
919KMxE3GeH0xr9DgTVvgLqUtsrrjwzwasX+nXjzEZDpMugnacQAW3ZzlTCs
jgK69BOlO2P0sC05W3zzyThg+vidbUqDHsqSLX6TNSdBa8k+jV+du2EM4351
p7dvQSWL6MlVjd0w7KKbg0noFIjpzj0n3UcHJZPMmfUjpoG77mnDLAM6aLya
fT9EZwZMvHu6vrRIhiMrFZbeIrPgn37b7G/uZNh6CgULfpsFSxsumgUsZHho
+MJ26o9ZMOvAbTxDIcNQ50lnnvVZINjNUcPNTIZ6heuG7DRUYBjLcSGIngw/
80qK7hBUICAkzGpDQ4ZcNPkD48JUkHwPUhW+kaDN8+i/o69RAf2ibgf/MAn2
mx2IJCypIFir0tB0iASld0rJwdepIJZBTSFjgARpZHqXfByo4K2twEfBVyQY
n0/fYneXCkxXTvcd7cT321AvC5UkKjhif31WvYEEDwozj7WnUMFFXT+56DoS
DOlIugDTqeD7g+rpkRoS1N2ukT6ZSwVOy8asFpUkuOjwleFgNRV0DDps+RSR
oCbl3t30OipA0kTtiwISrM5j+fZ3IxXoHCxtZM0nwXszRyb2PKOCr7d+FKY/
IcEPdxsuhj+nAhuR2LiFLBJU5VFpZ+yignt0R7tPZJJgWc2IjH8vFXRyNqh7
4fv5/93fwf/f3/8H/Ghp6A==
          "]]}, Annotation[#, "Charting`Private`Tag$9773#1"]& ], 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          RGBColor[0, 1, 0], 
          Thickness[Large]], 
         LineBox[CompressedData["
1:eJw113k0ldv/B3A5R6bzGLpILlchN8pQhkzZuyRzyZgMlbEyZkyRKGOGkCky
z0OmHEPYSJIpkTFlOEUUqiuF8N2t9fv9cdZZr/X88exn7/35vPfeZ+1qYEdP
R0e3iX9//rkN7cvoXtOQpqUyX0c6CUKHa5wfemnISfBLkV4mCV696ef1oouG
FDJPeA9lkWBLTtyx6HYaOmw/3/4xlwSdVpp7/66joW9q55SYS0iwLWH3knwG
DVkOeoea15Kg22inpLMzDb0UFKmV6CfBLsuDFWPMNOSmlFkbRk+GUp3CWt8P
zyCH40a3f7uTofAHgUyzy9OoXZnenH6KDC0SAwxqsqeQpfwLntTTDDBcX0w+
K3kSMTz7dSK1iwH6jpioeTG9R3GjHSeWju+EnQKf/TpNJlDyqLzT+46dMOv+
aWdy2Tg66ii4mq3LCJPta8beCY6hstiP68PdjHBpI8hd/toIih2uFW01ZYI2
K4ahhyaH0AfHcuT7lgla71kxYDV+g4onyPdfWjDDls117StFA8g69eSpg5+Y
oYo6A7Lle42iu748F77MAqWTvzQ3D/ah3w1FRxiXWeDGlpNzcFA32u9F2A85
s0LSoZW/Qq92In8LXRP7d6ywa0Tzr1D256jsQGC1hB4F9mnlsrQttiLXi+/U
WEsoMHbxw7LkVCsSi+pVCS+lQKPY/UOpA60oaGXbZOdjChwfzc/wqm1Fdxe4
FzcrKHDWoUhWLLAV5U34xM5QKXAr+LHVfa5WJDMioBHYRoFSbXVVVsotiCup
sY9jjAL3ej2sWeVsQhH8alIWJAK6lIexnvnZiOyZuh4lkwnYNO99qWCiEV0P
f8PzhoGA560MiXMF+Ll7iagmEwETNCh29SqNSEPja4UIQUAWvltcfg5PkXeg
AFHOQ8AfzZc8djTVo3uUiLcMYgQ8uXbmpVl2PepX/dwqJE7AOBlVwarQehQX
QM5TPUhA6UK+bmuDeuTTUXvBQ4KAV2MHhdrn6pBi26PU/sMEnLJRHwjZVYf4
HOCAmRIBu5jEDlMuU1HsSvi1XG0CavuOWEmeoaKKVWfdGB0Cds8HR+rLU5Gi
XamSry4Be7pm5h6QqSj4E52+9mkC9kWmpQtk1SAf51jj6bMEHOTgoEiNP0Fv
md3CZ84RcIL35+xZ3WpkKrkRIWVPQIvwPC5PmWq0w0EM/MZ+t2Z4IpGvGqXX
e22+cCDg+/GKR+OfqpBeoGGSxRUCTqddNbIJrkI8LhkKN5wIOLv3fatncyXS
5tReDXEn4PKB52lJ0hXotdBi/Ad/AtozKDVlcVegWs9fDzNvEbDumeVT0x/l
KG7Gxcc8AM+X3OFjt8PL0dAHp/Le2wQ8tWcUvq58jBIzPP/KvUPA8qn9mh70
ZcjNzMKRN5yAaSns4aE9pShVyCK/FTvCYO1lamIpuq2nWHUlgoC27T067eKl
yOmHjzL1HgF5Cz3OcBuWoFjZBMrxaALedm01qc0pQkr06q4C8QR0PlCS1O1c
hOgUG5Krsc9PPxidPFqE7pR9j9Z8QEBZw8vnmXoK0TmG2imXBAJ+kme3Mlsp
QC09n3eVJRFQf8vCbuNkPmIxCr21nErAfVG/PMBsNrLsfbUckUNA9ypr27nq
bPTIJX7hO3bbSI9RTGA2Gs1LGzTLxeMVypKb5M9GIs/nXUXyCFhYq/XzlmEW
Gnl4pbc0n4BW7XI//AIz0NN9uzfDiwhIx84y3MOfgQStLndPYWebvafy16Wj
8+qDwfLFBPy4FHK9cekR+hF/vfk9ttOe0Y0N8zQk51aoLFRKwBsuN+hvyqcg
jcx/dL0eE5C//jSt63UyWl4V7mvAbiYJt/M5J6OHijeUtrF3pHQHN+QkoS72
mtd3ywkY9oyfeZ0jEb1Yb/gZVEFAcbZv81qlCSh+IfUlwu4597wrRSMBnRJj
D97AZl9yjlS89QB96DWqc60kYCIvYvf9HIckkihsOlUEVLCJ/9oZEoc290iI
B2CPlzm85hWKQ7qNSlJV2AJqHPF152LRTcuB/7iqCaj5tu3Q13sx6Nq137a9
2JFujksxbdHI6U5kxy/sVwxcFVJrUegG/y0O4ScENJG2k3G1j0Rn6zQsPbFt
gxmVlmA4Ovl1ZJS5hoBfKnabBt0MQ9qt9v0HsT0n/vXkoYai45UvG3Sxg2U0
H6seDEH1Hu8c7mGzXTjXPWAXjL789BEvwk6MuPzJPvMuCt2qn3yOnT8dJhTD
fQeJ76II/caWJFKAsH4Q2tnHVM5NJSBVociiNiIQsV0NkZTEjhaMl0DbAQg1
TZMtsNO9qx3mPG+hWKFy82vY5b2DWewLfuhb60RuMHb/TS6ei2980V0xFbYS
7KkBWf0wretIOv2iZCP2NzHjiIpmb2ST3wV7sOkDvdpHZbyQWZin+lvsXaMJ
W3RFHshk4ZzKPLaQFFVB7B93VDrgvn8VWyZk2P1svBtCBU109LUEDGlYNPuP
wwVRpOX6KNgFlyX71DauIrG4oSge7E4e1xMPPjqgIaNUIIg9315O/fDKFs1a
3aGJYrN4fBWXa7iELv2M8JXANj5hrcqqZYmcn5fvkMFOTKeJlgqYIrv+5ZtH
sUfXbdn1vuuj9gCtT0rYso97lt9GqSPV1KenjmG79aYHKrscQVRt9SRVbJGd
rtdIm7xAnmd27I+D9E2Umr6oAvrZR2x/3Ox6oIe/Vwfcp3eWU8F+9DbOf5HT
CPhzGZ1WxLYI4EzQPXYePBIxMpPDjuLUHDaWvQh+prqYSGM72TBaM2jbgBq1
PHVxbJ2ajsUnF+yBjPq6qDC2OGOIr63XFbAu5rbO9+d7zdQZuO45geq3zC2c
f+ajmBz7LNMVSOV2+TBi225dilY0vwZsJKj7fuP5Nio4bsQ56w6sAvublrHV
9Pfxzbt5Aj2Wf3Rn/qxP9lRecogPYD9pD9r/rJ9Oi6Mbpy+IKXLMrcbesZJx
WDPtBjAqq9/I+rMf1C80/az0B0f3aAXe/LNfllTvvFIJAIzyyeX2f57rxOQO
2twGnud1+vWxX624XC1ZCgQ5JzY/7cM+9dJKb/eTIKDVQJlmwm5+dFr6ju8d
cCorq3sJ7+fHpyRXz5ODQceJwOu12FHJi4EsfGFg8YrMERVsE6K4T/5rGOhx
fTCxG/ufIPu/bTrCgcQ7Ge3vuP4eO04+eep+D5y/6Oyag92n+nrOqTsaKDHn
0lZx/SZVR8mmZMWA7bLeok5saa68lhnl+8CboU0mBftX2CWCfVcsiK4/Hy+P
HeY+nu/QHAeG3ZLvWON+8aVUoddfLB4807l4VRxbfy7xv/gH8UCHOZP7G+4/
vBaGsOXqAzDhP1d/A7tIvWeMd3ciAHzGKgG4X3XxNlO6XFNA4Ywu1MP9T9KQ
X2ZqPAWsaizc2IEdF3XDbFX9IQjtf3rzSRnOC/qj+UL8qeAju18/D/bnz+Xg
ZmcaMOjY1dVTgutnUl8xkSMT6Jtp8W8V4vz7HaC771QmaLHV6krHXthTfqH0
ZibgyG2AqtinjYiQttlMEGgbG+pbQECely8HlhqzwG7G+4HTOB8Kqk44aVzJ
AZ+FXHR9sgnobfPtlWpqDsg7+0qTgn2SK1NGvjcHnHdSUcjMwuvttbkucjgX
8PAPf23PxN+vWBdOv5YLIp9b9u7IwPmJJAqawvKBWUyWqRbOL5ce3hmZwiKQ
dX12hgPnoYr/C/WD40VgyH077m4c3t+S3kVClGIwv16h/DMWjydm0I3TrRh0
D+X7jN3H7zOI3l46WgI8B90yYnHeGoyRBIpflAKh37IT/Tiv5WaXTPfOlYPU
V6PhkTj/Iy8wfc5hqwD8F3sOvcbng02dPcW1YhVAfz0gmwt7UkT5wOSFClCY
bsmY7EfA3OFbIpI9FQA5hqL7vgSUUNop0JNbCY6eLJDS9iAg3MHNxmRSDeZH
1own7QhYubi/9+9r1aBY22x5yxbX07h8pFRkNUj4sG4ngE2uPsdi2lYNLhm4
fTGxJuBL27Sd+ZJPAL3vocuNVnj8ncLbaow1wF7Nw+msKQHtYo58DaijgkE1
R818DZwH4cPC3INU4GmgQio4hft70A3T4kUqiHrqW5mvTkAm77bmN0K1IL2s
eT5bjYDFFgZRYlG1YMBB9E00IOCSmLv44KU64KC7d072KAF92ittRVkbwL8X
L3U37idg+Jr0WI9lE67vIyUD2xRI18Qll+zdBFQFR74WblGg9+1f921imoCx
wqLNrU0KtGVs0VxvaQJjNTODohsUqMp9pu5fkWYQkSH+0XmVAleknZOCFprB
HmtvwaEv+Pz85I14mnILcEwMjmLB5+eHnznmz3a2gknDjDTRcgqsfPuUgg8n
QCChKyZSmwIjGC4qfNPoBNqtfup7Zlih/rDd6lnzbnCrjy0y2IMVnjuQbv6k
sg+IfksiKa+wwF3jDh+c5/rBXG9gu/p1FpgyleISlDQAelkM0lcXmeGOu51+
a+JvwPVf6tMxV5nh1Pq/b0KpQ0BPzlDr9ScmeKFq73aizQjI8RgMkrVggi07
eR4zrYwCxswj5dtjjLAtNVd6I28cEJ/+45g8zQiVyLa/yfoT4NnjPad/de6E
8cx7da+9eweq2CSPrpzeCaPOeLlaRU6ChO6CU/J9DFA2xYbVNGYK+BofM88x
Y4CWK7l3Ioymwbv3T9cWF8hwZLnK7pb4DNjb75T73ZsMWxVRuPD3GbC87qFf
zEaGosN6W+k/ZgDNlddymkKGke4T7nxrM0Ckm4vKy0qGJiVr5px0NGD1gEsv
jJEMv/DLSm4TNLBfRIzdkY4MeeiKBsbFaCDtNqSpfidBx464v+Mu0QDzgvFz
wWES7Lfed5+wo4FIg2rzi29IUH67nBx+mQYSmXRUswZIkE6hdzHAlQbeOwl9
En5FgolFjC3O/jRgs3ys71Anvt9G+tlqpdCAhMvlGd0GEtwvxjrWnkYD+sZB
ynF1JBjxPEUPZtLAyt2aqREqCRpvUeWPFtCAx5Ilu201CS64fmPaX0MDnYOu
mwGlJKhPue2fWUcDrfJE7YtiEqwpZPv+dyMNmOwvb2QvIsHb0wff7npGA//5
/CjJzCPBj/4NZ6I7aMBZ/EHCfA4JavNptTN30UAQw6HuI9kkWEEdUQjupYFu
7gZdP3w//7/7O/j/+/v/AExLasE=
          "]]}, Annotation[#, "Charting`Private`Tag$9773#2"]& ], 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          RGBColor[1, 0, 0], 
          Thickness[Large]], 
         LineBox[CompressedData["
1:eJw113k0Vd37AHBx6XKdi0LGkuRFkjKEyt6vUkpFKClT5uSaVWTITJkyhSQk
Y5ndVNxdKDJlyJgyXCFT9KoMqe9urd/vj7PO+qy9zjprD8+zn2e7lYuBLSsL
C8ssfv6+BQztnrB0MtENi09cvfokCO3d+MbbmEhzMe3xizMk6HjD16uxmYk4
J1dTsgxI8OXD+EMxDUykK/rnjLMRCTotMdpEq5mo5FfsMcp5EqxL2jKv+oCJ
FGnJRoYWJOja36RAo2HfeZMo5kyCzWa7Sgc4mYhnYSw/JYoE9zTtOP5t7xhS
SCZH8XST4I5x8UwTh1HUX2OenyjCDk2TAwyqskcQJVJk3cmOHUbqy6pmpQyj
X15X1/wQO/TuO3fYi/wJxWqLk/WEOWCT+Ixv07khtM69+Zd6EAfMijtNIz0Z
REtTmuH8ixwwxa5q4OO2AbS85+NUiMVGOL8W5K7q1ofyanWSGz9thNZLhuHy
wz2IZzDOAJiSoZXwkgHl7HvEv6gzPjxEhi/XV09cLuhCDHH12HIaJzyozY5s
RDrRrExcnNMyJ1RMmWUwuttRP20tsDaOC679dqKFBrWg6w2hyrU7KZBNfmlz
uGMT4u3oNI1/QoHNfTqbw3leIzm36m97NLhh+/Ecrrq5V8gyosSrs4IbSnil
Vf3gq0X1gdxD/8oS0LkkgqL3swaFTT34MSNHwNovVy/lDdUg/SY4myhPwAvm
hsT5vBrU1D9tw9xDwKRj3LbPDtagGKEKN3dVAnKJ+PP72r9A192HZM4fJuB3
xiWPDbXPUCndMvOAKQGPrOi9Ncl+hox2vzBAZgSMV9LcVh7+DBWjkbp/LQio
mC/SYmXwDGn9yzqgZUVAxzvdkg2T1WgkYq5exYGAI9baXWGbqlHreEjHRw8C
NpNl93I70BHdqfqV4i0CnvDuM1fQoyO7MqXzHrcJ2PIlNEpflY5Cj4UzKqMI
2No8NplIoqOxYt5lpVgCtkelZ4hnVaEOSTVuqUQCdvPycu8ZrERkg07p5vsE
HBL6OXHmZAXaGxBcIltKQNPIR/yeShWogr94g3YZAT+uGGoli1QgJy53Hoty
An4aLL0/OFWOsjSsLsZWEnA03dHIOrQccSKdnJFqAk5IfHrlyShDfAXgmvYr
An6VeZ1+V7EU5Tx9L8vfSUA7do3aLIFSpPOuUVSki4DV9WYvjL+XIMoOlRtb
u/F6qew9dDOyBDXp9AVI9hDwqHA/7CwrRta7BqO3DBCwZGSnjgfrE2S1NClf
NULA9FSeyPDWx6jxZ3t+1igBbxmsvL2X/BgZf/4dHjVGQJuGVt0GucdI8HQ7
zWycgEL5HnoChkVI5rLHm5lJAt50eXXu6cMChFb0ZZ/PE5AmU3S3hVaAvlho
JkR9xedhNLF/eH8BklHQMDZbIKCyocMFcms+OhGwd2ZlkYBTqjzmJkt5aK31
H+Vt3wmo/9vUdu1ILuqVHOkRXiPg9uhlDzCRjYZVdOda2KnQvdzKZrIiGzlL
q+iYc1BhXV+rUWxgNmp2Wdz5FdtGMktlWCwbyS/fduAmU2H+0+M//Q2zkFuP
1AYVLio0b1D57hv4AEkvx6trUqmQhYert1XsAdrK7XyvGjvb5BNdrDoDTZnI
3djLQ4Wf58Ou18zfR54pMhVbeanQSbh/be1iOjppkLY+wUeFPs4+rDdUU9G+
Drk6BQEqFHt2mtncmYLWimzH4rAZbDsaRGgpKPOJi+8i9obUltDnD++i30UU
8WJBKoyoF+Nc5U1G5iF6XAJCVChHXfxy/HESkgFfvjlit55/3Zx6LAmFhWcY
ImyeeVqUun8iiuRN8LUWpsJkIcTjPROPgj6a2KeKUKGadcJCU1g8Ko0JoDCx
B5/YdwpJxqO7a0eld4lSofhh3oTq83fQiDUPomPrfKiTX7gdi6o5yd4vxKgw
yvXKfGxdDJLqobctY79j5y/dsxKNtN433lUWp8JzirZKLnZR+P9Bt/OwbUI3
aszDSLTqnDvns5UKZ0u3GAfdiEDuiwd/FmJ7Dv3jKUgPR/XKiSED2KFKOsWa
u8LQ9E0RuX3bqJBqcb6lyzYUhdEEtUyxk285TNllhqDGMaePIdi5oxGSsQLB
aF9S6/1ObAUiFezQD0JTUQV137HpagWmT28FotSgCEchCSqM2ZawG/0JQLU6
61om2BlXK+wnPf2RVjHN4xp2SVt3Fs+0LxI6mCSdiN1xg1/Q8r03Yr/SxP8W
e6RLWT/i+HU06F+lN4q9KHv2VinjKkrLFCOWsVkDvRr6lbxQesnCSWI7FW7q
T/rNUuCBtOx38mzHltxDV5Pd6o4kLEoMlbCVwnrdzyS4ot9cISJHsMOez5n8
x+uMFp6nWhti5zkotB9ec0Tm9yYVLmE3CbpoJX62R1uqbH1p2F8aSujj72zQ
yTnuk9exuTwW5FSeX0L57H33A7HPallpUo6bIeN0hlskdnIGU/qxuDHikEeN
sdj9qzY8p77po2lKz4NEbOXi1q8forVRl8v6yl1s17aMwAPO+5CIg2pvKrYU
h4sb27oQqBj1V07DDtI/p1E7qwl25fby/x1nuMi0irXpgkcXNa8lY9//EO83
x2cEPoU8vRiPbRrAl3Ty0AUgGXikLgo7mk+n96yyJbgQNVUYiu1kvdGK/YQ1
WGDkCfhh61a9mau0sANjRDirB7bcxjBvG6/LIPdElJv93/maaLPz33YCqjsY
Vhf+rkch6U59pguY3y7Vq4tt8/tSjPpFN5Dx5E3LAWyjvH+N+CbcgTNnyWE5
7MP620W+uHqCLqPJQ1v+7k/2yKOUsGvAMtTz2Szez026L6+48nkD/x+jGj3Y
G5Ye7NVJ9wE/nDs0a/6eB22L2p9lfuA065X20L/nZV4z+N3BALApUvWCw99x
3dicbuuboGP+lcNx7HdLzo5F84HgvweW1I3YR9+an9pSGQTClNMeMfF5Zdw/
rRjsHQy0NUYQA7v4qMKPC6RQoJky6eeKHZ0yF8glEgF4A2mSdThezhGF7aoL
EWD1RBCKwd4aZCdq/SYSOCVJ3zfBLr4yXPnC/TYYZysRmcbx2K7ZOenUEgOk
Klclf+D4vVsRrZyaFQsYBYymSmxF/kcvxw7EgSwXw1I37OWISwTPpjvgtEOu
9gTOBxHug7n2jHhADlKOeY7zx+xjtTY/2QRwWvXZsSvY+pPJ/yUkJoAMkXtH
RLCFTA3hS8dE4NtiwOmB81GBduuA0JZkELp/oIEH56tmIQZ3s0sqeNmgo/GD
H8evoZjSyGAqCJXr176NHR/tY/JDOw3IStakbMW+wLo/V1LsHshuyBOAm6lw
ZqYE3GhKB6qmxp7OON+GDeurJ/NmAoklIYo3QYXVvwJObj+aCSyza0q/cVPh
tHCJxeMbmYCt9l22I/ZpIyKsbiITOFLLaWcpVCj49m3XfE0WyHj3KF+QE8df
uZbTscsPwSb1frIOiQqvWi++07z3EDTLKF0vY6PCI/yZSqptDwHdM9NNGHvE
a31Vam8OqMzYTPq8Ac9fvTqSdSUHsMwrlTn+wfcn2p1XG5EL2kg1foqruF5q
FRpTyi8Ao4vWifn4fjzo16i9a7AAdLicZBmfw/WQwtUCSe5CoLT6nnUrdl5s
tyufayHQcrzdFj2D6xmDmD/z+4tA1SvRMNMpAhoMsIkXNj4Gu0cfTtPxfa0y
MW8sMVkCDgrPfrTC93+UBXnmIbUUaJ3qaDTD9cG6rnDhU9lS4KgRImqM64dh
qQMywxalYG2Uh037HQFzev2lFFpLwfKvgc9ECwF3a3CIt+aUAYmaE8lGdQSE
GwSo5HMVIPGUeNnzEgLaxu5bCKimg+s5Lt/5wwhIjezdIdBNByzseXR6CAHp
QT7GhXN0wHQ/K2EcTEDy1TrGe8mnwHWfzULCTQIWmhpEy0Y/BZYwOG3dh4Dz
su5y3ZeqAWT17rrjQsBrDWU20pTn4M1m35Z6YwJGrigOtJrVAt9RtjMBUgRM
m+H9cqbpFai/Xzuj+owbln14wY2kXoPSRL6KblVueIvdUm3xWBNgrXWStamg
QP1e2x9nLrYAaoCaU4w8BZ6XybhYWdYOqrlyP9Umc8FNg/bjtMkOEDd9QV+P
iwumjqQ6B93tAhO7G/s+eHDCDSFNvity70GyNIIT02Q4svrP+3B6D/hksqBz
5DIZWpRL/Em27gMT03m1c2Mb4UsOwWLyUj/wqq1/stVpI6y7l6O49mgQsORD
o9VvHFCDZPOLpD8E0qMpcnPBHDCBU+Kk28eP4GlP0beLOzhgtJ6Xi3nUMGD7
syl4Zx07VE61phjHjoC6txK8u53ZodlSTvAto1EgV2fROLOdHfZ9Lbf1lxsD
akoLSWk9JPhKHUXu+DYG4kwzmJyJJCjde+p3xvcxkEW4Ly7Ek2CU+5C7yMoY
WCD8bfrvkOC5opWLfCxMcGgbwzs/lgRnxZQV/hBMcLD+vNmp2yQoyFLQNSjL
BJ5T7bMFQSR45U28aPwlJjjg/F73iRsJdlhtjyNsmUBe3a4u05UEVf+UkCId
mIDSK5+W6EKCLGptcwEuTBBe1u/kRyPB5IKNL2l+THDqtfw9w8u4n4vytTme
ygT67MN/+C6R4E5ZykBDOv7+1FsfiiUJ3nqdegpmMkGH97QRO+7nzv6mq+7P
YwIvHwPpVVMSnHZZJO+sYgKHfKgxhfs/fe6bfpnVTHAt7nLRuDEJVuVTv4nW
MMGLohaf0XMkeHN014dN9UzQ+qVGaQj3j5/9nuvFvMHzbeMWHzQkwRMixxs4
m5lAzXaLTT/uN0vpfWqhbUwwLVpL7sP96P/1q+D/+9X/AfPuuCM=
          "]]}, Annotation[#, "Charting`Private`Tag$9773#3"]& ]}}, {}}, {
    DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, 
     AxesOrigin -> {0., 0.}, FrameTicks -> {{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, 
     GridLines -> {None, None}, DisplayFunction -> Identity, 
     PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, 
     DisplayFunction -> Identity, AspectRatio -> 
     NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, 
     AxesLabel -> {
       FormBox["\"y\"", TraditionalForm], 
       FormBox["\"|v|\"", TraditionalForm]}, AxesOrigin -> {0., 0.}, 
     DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, 
     FrameLabel -> {{None, None}, {None, None}}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLines -> {None, None}, GridLinesStyle -> Directive[
       GrayLevel[0.5, 0.4]], LabelStyle -> Directive[Bold, Medium], 
     Method -> {
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}}, 
     PlotRange -> {{-0.6192630435706624, 0.6192630435706624}, {0., 
      3.766407404062386}}, PlotRangeClipping -> True, PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.02], 
        Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}],FormBox[
    FormBox[
     TemplateBox[{
      "\"|v|\"", 
       "\"\\!\\(\\*SubscriptBox[\\(c\\), \\(-\\)]\\) \\!\\(\\*SuperscriptBox[\
\\(\[Kappa]\\), \\(\\(-1\\)/3\\)]\\) + \\!\\(\\*SubscriptBox[\\(c\\), \
\\(+\\)]\\)  \\!\\(\\*SuperscriptBox[\\(\[Kappa]\\), \\(1/3\\)]\\)\"", 
       "\"a + b \[Kappa]\""}, "LineLegend", DisplayFunction -> (FormBox[
        StyleBox[
         StyleBox[
          PaneBox[
           TagBox[
            GridBox[{{
               TagBox[
                GridBox[{{
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.18], 
                    RGBColor[0.5, 0, 0.5]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.18], 
                    RGBColor[0.5, 0, 0.5]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[0, 1, 0], 
                    Thickness[Large]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[0, 1, 0], 
                    Thickness[Large]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, {
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[1, 0, 0], 
                    Thickness[Large]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[1, 0, 0], 
                    Thickness[Large]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}}, 
                 GridBoxAlignment -> {
                  "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, 
                 AutoDelete -> False, 
                 GridBoxDividers -> {
                  "Columns" -> {{False}}, "Rows" -> {{False}}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {
                  "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, 
             GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
             AutoDelete -> False, 
             GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
             GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], 
            "Grid"], Alignment -> Left, AppearanceElements -> None, 
           ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> 
           "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
          Directive[Bold, Medium], FontFamily -> "Arial"}, Background -> 
         Automatic, StripOnInput -> False], TraditionalForm]& ), 
      InterpretationFunction :> (RowBox[{"LineLegend", "[", 
         RowBox[{
           RowBox[{"{", 
             RowBox[{
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "0.01`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0.5, 0, 0.5], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> 
                    RGBColor[0.33333333333333337`, 0., 0.33333333333333337`], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"0.5`", ",", "0", ",", "0.5`"}], "]"}], 
                    NumberMarks -> False]], Appearance -> None, 
                    BaseStyle -> {}, BaselinePosition -> Baseline, 
                    DefaultBaseStyle -> {}, ButtonFunction :> 
                    With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0.5, 0, 0.5]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0.5, 0, 0.5], Editable -> False, Selectable -> 
                    False]}], "]"}], ",", 
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0, 1, 0], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0., 0.6666666666666666, 0.], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"0", ",", "1", ",", "0"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0, 1, 0]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0, 1, 0], Editable -> False, Selectable -> 
                    False], ",", 
                   RowBox[{"Thickness", "[", "Large", "]"}]}], "]"}], ",", 
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[1, 0, 0], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0.6666666666666666, 0., 0.], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"1", ",", "0", ",", "0"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[1, 0, 0]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[1, 0, 0], Editable -> False, Selectable -> 
                    False], ",", 
                   RowBox[{"Thickness", "[", "Large", "]"}]}], "]"}]}], "}"}],
            ",", 
           RowBox[{"{", 
             RowBox[{#, ",", #2, ",", #3}], "}"}], ",", 
           RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", 
           RowBox[{"LabelStyle", "\[Rule]", 
             RowBox[{"Directive", "[", 
               RowBox[{"Bold", ",", "Medium"}], "]"}]}], ",", 
           RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), 
      Editable -> True], TraditionalForm], TraditionalForm]},
  "Legended",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"], 
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, GridBoxItemSize -> Automatic, 
    BaselinePosition -> {1, 1}]& ),
  Editable->True,
  InterpretationFunction->(RowBox[{"Legended", "[", 
     RowBox[{#, ",", 
       RowBox[{"Placed", "[", 
         RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
 CellChangeTimes->{
  3.782214469890087*^9, 3.7822145063382874`*^9, 3.782214630014892*^9, 
   3.7822148080317497`*^9, 3.7822149635798182`*^9, 3.7822152244400444`*^9, 
   3.782215435268258*^9, {3.7822154937377625`*^9, 3.782215544720903*^9}, {
   3.7822156122594576`*^9, 3.7822156323801775`*^9}, 3.782215951331479*^9, 
   3.7822184751137633`*^9, 3.7822185162662134`*^9, 3.7822185588943057`*^9, 
   3.782218632808107*^9, 3.7822196930539255`*^9, 3.7822199238570204`*^9, 
   3.782221947719692*^9, {3.7822220120433364`*^9, 3.7822220312653465`*^9}, {
   3.78222207922147*^9, 3.782222087115408*^9}, {3.782222119547361*^9, 
   3.78222216372894*^9}, 3.782222482039259*^9, {3.7822225459220853`*^9, 
   3.78222255665739*^9}, {3.7822229593946714`*^9, 3.782222974631442*^9}, 
   3.7822241640173044`*^9, 3.7822243438625016`*^9, 3.7822244250908556`*^9, {
   3.782287941715081*^9, 3.782287975449335*^9}, 3.782288789533774*^9, 
   3.7822906551711903`*^9, {3.7822913081643267`*^9, 3.782291322174583*^9}, 
   3.782296618392045*^9, 3.782297253796118*^9, 3.7823052364891925`*^9, {
   3.7825813621554995`*^9, 3.7825813740335407`*^9}, 3.7825833305841165`*^9, {
   3.7825833764092093`*^9, 3.782583396004898*^9}, {3.782583460894145*^9, 
   3.7825834891651287`*^9}, 3.782583538670022*^9, 3.7825836152701035`*^9, 
   3.782583675860424*^9, 3.7825837163291183`*^9, {3.7825838585338907`*^9, 
   3.7825838867432313`*^9}, 3.782583955494999*^9, 3.782584023067078*^9, 
   3.782584086548361*^9, {3.782584118955905*^9, 3.7825842168279285`*^9}, 
   3.782584299674696*^9, {3.7825843599343443`*^9, 3.7825843812968616`*^9}, {
   3.782584432244983*^9, 3.7825845067106376`*^9}, {3.7825846802976675`*^9, 
   3.782584730735442*^9}, 3.782584784836703*^9, 3.7825848523884544`*^9, 
   3.782584884050439*^9, {3.7825849159656315`*^9, 3.782584949323036*^9}, {
   3.7827568940209928`*^9, 3.782756940758292*^9}, {3.7831533103396225`*^9, 
   3.7831533790577283`*^9}, 3.783153415328582*^9, 3.7831534603661485`*^9, 
   3.7831535288761053`*^9, 3.78315358015679*^9, 3.7831539892648845`*^9, 
   3.7831540193869457`*^9, {3.78315407567104*^9, 3.783154083936883*^9}, 
   3.783154195231228*^9, 3.783154272590616*^9, {3.783154368356549*^9, 
   3.7831543820624256`*^9}, {3.7831544716733007`*^9, 3.783154526515828*^9}, 
   3.783155777834945*^9, 3.7831558816374884`*^9, {3.7831559607021933`*^9, 
   3.783156011920889*^9}, 3.7831561221335077`*^9, {3.783156296765147*^9, 
   3.783156310891715*^9}, 3.783156394806693*^9, 3.7831566421864924`*^9, 
   3.7831582194992313`*^9, {3.783158587610404*^9, 3.7831586417788267`*^9}, {
   3.783158806657195*^9, 3.783158839504523*^9}, 3.7831588901412787`*^9, 
   3.783159161620496*^9, {3.783159429892138*^9, 3.783159469496049*^9}, 
   3.7831595603609877`*^9, 3.7831596459583035`*^9, 3.78315980083782*^9, 
   3.78316079822515*^9, {3.7831624601285067`*^9, 3.783162494102844*^9}, 
   3.783163709882825*^9, 3.783166366453264*^9, 3.7831665669797745`*^9, 
   3.783166655679043*^9, {3.7831911714030275`*^9, 3.783191247336479*^9}, 
   3.7831913088068047`*^9, 3.783192636460191*^9, 3.7831929446675997`*^9, {
   3.783193018727408*^9, 3.783193027818966*^9}, 3.783193179147971*^9, 
   3.7831932562431793`*^9, 3.783193343489666*^9, 3.783193461335556*^9, 
   3.783193658649988*^9, 3.783193795386083*^9, 3.7831938847267466`*^9, 
   3.7831940468041677`*^9, {3.7831941143508043`*^9, 3.7831941236485357`*^9}, 
   3.7831944072430525`*^9, 3.7831950018340454`*^9, {3.7831951599932966`*^9, 
   3.7831951756655226`*^9}, 3.7831953096585855`*^9, 3.7831954177102757`*^9, 
   3.7832417324743977`*^9, 3.7832431846534543`*^9, {3.783243640013296*^9, 
   3.7832436564483814`*^9}, {3.7833311305534554`*^9, 3.7833311418539753`*^9}, 
   3.7838397345072727`*^9, 3.7838398083073215`*^9, 3.7838398584188833`*^9, 
   3.783839890542446*^9, 3.7838400173319426`*^9, 3.7838401330522175`*^9, 
   3.783840690743511*^9, 3.783850844885989*^9, 3.7838509205718775`*^9, 
   3.783860623772453*^9, 3.783940516425296*^9, {3.7847080319500265`*^9, 
   3.7847080470885954`*^9}, 3.784708457499934*^9, 3.784708587253621*^9, 
   3.78470869540226*^9, 3.784708740186722*^9, {3.7847087885429688`*^9, 
   3.7847088424746118`*^9}, 3.784709563684412*^9, {3.7847200566997724`*^9, 
   3.7847200706530633`*^9}, 3.784720869808626*^9, 3.7847210940015945`*^9, {
   3.784721285124527*^9, 3.7847213227155247`*^9}, 3.7847214917740593`*^9, 
   3.7847216455507154`*^9, 3.784721721840849*^9, 3.7847218696628532`*^9, 
   3.784738528103218*^9, 3.78488524187362*^9, 3.7848855270745335`*^9, 
   3.784885566987649*^9, 3.7848858402972956`*^9, 3.7848863011718693`*^9, 
   3.7848863600496325`*^9, 3.784886512219963*^9, 3.784967732761732*^9, 
   3.7849682687961087`*^9, 3.7849685802712865`*^9, 3.7849688099888678`*^9, 
   3.784970408819131*^9, 3.7849705362471104`*^9, 3.7850533332369843`*^9, 
   3.7850534154713125`*^9, {3.785058730920721*^9, 3.7850587442715693`*^9}, 
   3.785058812986328*^9, 3.7850598133447638`*^9, 3.7852340649346113`*^9, 
   3.7852343107995763`*^9, 3.786014805869358*^9, 3.786014917815103*^9, {
   3.786014951998384*^9, 3.7860149671583633`*^9}, 3.7944718536006613`*^9, 
   3.794471924896137*^9, 3.7944724331328316`*^9, 3.794472486579007*^9, 
   3.794472631045947*^9, 3.7944727452078714`*^9, 3.7944728194494762`*^9, 
   3.794472878155672*^9, 3.7944729141405096`*^9, 3.7944729867873755`*^9, 
   3.794473042851555*^9, 3.794473091599301*^9, 3.794473134204447*^9, {
   3.794473185626033*^9, 3.7944732145567217`*^9}, 3.7944732614653664`*^9, {
   3.7953329318976746`*^9, 3.7953329425632334`*^9}, 3.795333995972432*^9, 
   3.7953343554484253`*^9, {3.795334421042015*^9, 3.795334444908768*^9}, 
   3.795334587048658*^9, 3.795945225417776*^9, 3.796120000626225*^9, 
   3.796390295873082*^9, {3.7977843798622136`*^9, 3.7977843959561715`*^9}, {
   3.7977845729670043`*^9, 3.797784619577348*^9}, 3.797784765873123*^9, 
   3.7978455043835*^9, {3.7978455362336283`*^9, 3.797845549084798*^9}, 
   3.8139146014005203`*^9},
 CellLabel->"Out[74]=",ExpressionUUID->"3ac6c72b-75f5-4092-9309-e26a6c6c9bf3"],

Cell[BoxData[
 TemplateBox[{GraphicsBox[{{{{}, {}, 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[Large], 
          RGBColor[0, 1, 0]], 
         LineBox[CompressedData["
1:eJwV13k0Vd0bB3DudU15RaZESoZKkkwNLz0nkiGJSoSfqWQsY5FShqSkjImQ
ISpXZjK7g+lNZI4khK6Ee+UYC/22v876rLP2Pvvss9fzfI+0g8dZRwIbG5so
OxvbxpXuzzfwusjsWF6r5op0FA4JrQw2V4YqtBQo6Fg8wSFw67PUYwwdsCd3
7o96jIPXMdbUHsY5uCtzZXz9EQ5uphJCUoxLMCJ0reP7Axx+WBa92srwAaPA
O96dITi8sr09K8IIhX8LQi2k/HB4/9w44mTYPdiWMGDkfAOH6d6dsn6yYXCY
sTJQfB0HFaNG836H+yD7qarewBcHymF+yvPhBzBy3o12xwuHfsH0xzs+P4Z3
OdxAcseBNGr/VJgRBy3dL3pC7HHY6sfWY6MZD4nqXyY67XBQ4EvbkhMbD2+O
yL+RRjbRGIzSgqcQ9omhVG+Dw/OICxFXEhNgKUfAmN8aByXVU3crDJOA0OOc
3HABB4t7ai7WBS/A44x0TYERDq7i3a9fkdKA2PvPkhByYL4XY9YqDa5EH+vz
P4WDqXtfkTZHOnyeu3X/hCEONxKED/QVpkO1a3/SmB4O1J9P9rLxZsL/jATs
MB0czOJCpc7WZEGe2qsO76M4aDe+N0oezwKplMzD80fQepY23xrnywbfpf8p
3EDmtErpu/G/bCiVtCTfOoxDxa6y6OT1bJgTdRF7rIHDtmIG4Tv2GgokVO+8
V8FhpMNgwq8xB5jGj3Vf78OhlRAtQpvJgZwItSdHkCvVPunwipIBnvJYtSrg
EJvokJ5yhQy30qKD8L046NjdukjjygW2cdtFvT3oe7LefuA1fAuSa8VOPHLo
+/MLFKZ+zIfm/VNHZ6TQesWToiUX84GjMe9RDPKczC6v5O0FUHzO94IGcsAR
NZUk9wKIuO17MXg7DroqipaGpEK4SBAT3C6J9uN/JoO6LwvhM61Dzk0cB9+S
xBHN4SKobJYbsRPG4dPhryarc0XQOVy8Rxj5cJ00rZqzGI7YpzGahXBY/Y+c
cVSpGJTInHRl5HtDNQ6HA4shw2YXzrUFhzieb+OqEiVALr2yo3UzDsW2eycV
zEvhebY1mbwJh3ntL70J7qXAXA4Wc0LWkH9MJ4SUwh67ZB5Z5Orp2eSBt6Xw
03btVhovDg03K4wjCGXQTG2OT+HBoTdOr3Qyrwxuf9rkVcC1cR5X0s3qy6Do
5EVxX2RLy9zHtP4y4C+c1TmCPLRzs1MS8R0Qf5jtaOTEgZH3Sdzg4jvIXXX5
OUrCYbnZ8e4bjnL42nw3T4MDh6O5Yu7C28rhQdbSFSLy7SfvLYIOlMM1Sbn0
DiIO7Gb7VSwsy2E5bz3aHZl3dH6cq7AcLFKPO5MJOEishho6WVVAsczCey12
HGyG1Q91e1ZAgNas2xbkdPqEDNyvADxV+tEEGw6yD0+tiRZVQNz+CCwOWVFU
qLCJsxK0O/eFzv6dg2PKmSLyxZUQ9axWl74+Byrh7TyyTZWwZO5HykCWH1pd
kx6oBB2WvHIQ8j+R5ozthCrQ45luBOTBCb5ykbNVwLlawKpfm4OOY0dzha5U
AUGyivgKuf6pU5pgQBWMOzQEP0Am69DD/8msgpBXttXGyDfT/CxIc1Xwk2gn
PbI6B+6LWUZEzmqwmhMPaUS2O92FsW+rBn6u0VO5yPp/FPeuHa+Gv+Wy2/yR
Rc1HV+ZjquESfuCFKHIp/+nk8YM1MDTkquD0Zw7eOAZEjerWwAlvMf5zyCk1
r0NHLtZAHPuKBSCHuhLcB4Nr4HI1Q0Yc+WxTuWZPZw2EaB9/1Pl7Dk5u/67c
9b0GpFZcsqnIR323yHWs1ACX04hcIbL0rqv/tErXwv12nYvRyLOBu4bqvWph
D7nxvhnyeM+ZLlpYLWRGa3boIffvC2yiJNWC9qXtd48iUz735VfTaiFvOpdP
GrlYmfSysrcWbppJTwkjvwpXeVY+WQuX+KOVeJCfqD++WyJYBxauk2NzK3MQ
ElnlUyRXBwcVU8x+IF8fm3AqOFIH72717xtCto7RNsm1rwPuhDukD8gmPzxO
5FyvA/JUITcd+QSkHn79sA4ixtc8KpH3zSztfFmE5nO56ZqDvJ4RG3O6uQ5e
6X90yEDuurCfsDxYB+UByh1JyK82/eedOVcHqnKBxbHIAVSHMSNuCkBQDE8k
svH1tXNL2ymg+8mwNwx5l0JiQ4YqBVih90WCkBeHVNSNDCggsSzdEoDcEteW
vWhDgb6S33PXkV/oO4tm+FLA1JAZ5YXsvUYIPxWB7tsNpF9FPlmcurSQRoHW
/BQ5V+RtToed08sokLC2RcoJmSnR3W/4gQJJeyQiLiPTO64aLIxQ4ND2OBcH
5IQw7qq0RQrQByxq7JDVU01F5Dip4OFtGGKLnLb04vRvASoYc52stkHmOTsd
1i5BBZ2Pe5027PP2SF2WPBU4+HvCNvyVM3zx5kEqkHbIiG2M17PvUTqjSQUf
t4VtG/MXVUs7yepRQdljb4w9soSoR9qKKRXo5ak3LyGHedb0fbSmgvm4co8j
MquFRyDLiQpvs2npzsgX5cz1b3pTQaBOadgNuf5uVpBxIBXs2M2jPJD3D/yq
kHlAhfHz4kU+yM/U4NdyLBXcC86f8Edmj4rc+zGVCoriP/QDkXt1dj/3L0Hz
xcZlP0CGF75dp+vQerld154g5yzTeGXeU+G2tUjTU+TAPOtbbUPofRWcc7KQ
J7jIJZmTVGiP/1j/FtnUYWnKb54KvZRw4zJkObFY6128NKhb8CxtRo7yGo5f
EqYB+y27qE7klQ+Kba07aCBeJj3wBbktqFnLT50GtKXEul8b5/nnqlSrHQ3a
jw5SdqHzP3zC0DzDjQYhPgMiysgGac+ibtyggYF/7oAW8vbzKmzSkTRQK9Ir
tERurHX6dr2cBqbCK+FJyAe2lomfotNgt/t2UzJykjfh7M42GmzrE39QjXx1
dyq9ZZQGjxqkYBhZJKbr5Q5+OgTlLLXtQ/WhNKNQn76VDqVbFV9u1I/zxU9m
LsvQoV323LeN+hLfbXiIfJgOxhGkxEBkYdH6FrVLdIjf8mmqd2O8fIZH31U6
uIXfJM1sjD90VzjAnw5pfArhHKh+xVn8a0N5TIfsVIyuhrwlueSXQQUd+jz2
CT9HLs6NSZim06E6XsqtFPlsjce/UW10mFjQ3NuOHPt1X1jPKB3Ykx8NkFB9
FdyZtdX2n3pQG7vM748skB0Pvg71cL5sINMD1e/CMu9x0av18FwqzDYa2aTJ
5GGlXz1c3ZwZXIQcPcHXvR5ZD99NmxfmkTcrhF15WF4Pxqutz4NQ/+AvuP74
BV8DjJ6zo5JRf+GrvPDlv3cN8JDHjmaA+te90LnQUmoDPLCamvJBXjv9RDG9
pQE8BcbcXiAzRxsD/YYaINq50W0euZNPfac8ZyP0+mx1yUL9McFOyDHUrBG+
HFHSF0b9dSd3B1NrvhE+N/RvUkX9OrHL7dne9UZgeQzUOCELpnJhItxNYPff
e+pGPyeoQMy0RBPsB1kaF+r3363yVZN1msA9Ni/jGzK5INJ/ObYJqjutOrP4
cFAzNyCUHGwGTUE3J2cBHFI7JCZ9NZshKq7l5VtkTkNmu4ZeM4wETh77hdyn
GZdaZd0M+qI8MbcEUT7a9fUwPbwZeH8ZZsajvEKd8fTo/NoM0uThy/0o7xjd
SxxkPfwPGl4LtmWjfHS5aOKd4uh7mPEhOZ+TRfls3C/j0PR7eHn/UNwb5Akx
7kjtxfdwNlGfbx3Z9c4eewveFmCYNU3koPzmecpl0z2VFli55qxN2o3yxPef
tl9CWkBfV86/BeW/eHEmd4TMBxDhOnTjyQEcGoPnLScut8LxXEWblX9x0HQT
KaZca4VUh1B/W00cSs9r8CT6t0KiIHGgETlzt3+5fmQr2KXoecdp4RDU9keI
XNIKJ6euLR4ENF6c2OZOaAOb2ufHb2ujPFYoCHNpbTDtz/1A1wCHtGElmbWB
j7B7X4/gG3O0H7cjNE3rO6C5QV8nKACHlgY12xOELpBa16kwT0P/Bz9L9f9a
dUO8lJJp1wf0/L5TDU4FPSgvflSf/YND2N+k8tmpXnCQNPDNV5wHd1Kd13Gd
PuhO6c7Nd5wHt5NJL4tD+yF0wKq87MU8XHM0TJka+gwJJtkmmSPzoHRqy+4u
1S+gU6c+fF9uATjdY/Z+9hqE4NaMHQ9dFmDUlTH3uuUr8AdrHr1cvgCfsuZU
n/ENg4hYbyQHxyLUd0UQt8mOgED+N5mfZxdhu3a4iVH7CCTfX7EYfLsIHGds
P/N7fINsl3R3HtISzBhm6qpLjkKevBivh8sSqJFnA1SaRsE0drpEtnMJuF5v
m6ZcHoN810kJisYyDMYWYEUC4yDzITfmOXkZtCR3dqoUjYMCeV4+QHIFVrlT
FB4ZfwdzvaiOHzErUDse4qS38h2WbncyXLf+hk02uiNxiQwYui3ufij1N1g1
eWue0J2AnTxKLpwaf+BQ662ee4wJWLF5+pX48Q94qUerp9z7Aavrb2S/ua9C
3uPNAWLKk9ByzKOyVW4Nroe6/t7VMQnVtuv3+UfWAJyVbWIDf0KpdDanV/U6
OBWyP+rfPQUsz/BAoTd/QTIhH89vmgKfQI3aldNsWLdrE0x6T0OmQZs98xsb
Jvq1srlEaAYU7JSusu6wY+XFFVvNimag51X4/YPKBKzlYsR+9lJ0X7jji6cq
ARtks9bOezcDOtoNd4o1CBjhzF83Us0MmDeQqjW1CJjRlC6lrGkGHGy+uF01
JGAjMt2OooMz4MPfW6ftSMC4n84U93Ey4YPFEZO+FAJm6bfrtKU1E4RHyn88
EyZiY5Fjmf02TLC/Gpx9cisRc8/MWr5gz4QAuVmrZQkiFtgmn3XuChM6diu+
vyxDxNJl9v0x8mRCU27dAQcVIsZoV82Be0xIfVRFxk2ImPceXZLcWyY4pr/7
+yyaiP3R4rR6mc+E+XRu48J4InbvXHOhdBETTspPGrYmErGndwyspd4x4ey7
BdfNGUSsoud0iRiVCXssHhDqi4jYetAFe94eJtiKOVG+dxOxh5+dall/mGCV
VLPzjAQHNmelYlKxzgQX5RMHr+/kwCyHVkeD2Flgz9UklCHHgSmOxXBv4WJB
mKV1KK8yB9YxXX1ObQsLrBbYwuV0OTAxNoGf/ntYMLBu8OiBJweWLV8hSjBj
ga5zcIpnKwfGnxOS02LOggu/tMWvdXFgN/ad1oyzZMGxmT1ePv0cmL7yqL2s
HQvkug5yJIxzYNNH+PJOurHAKOwQSWuNA1M9bafzKJgFVMr6kpwyCUtpV/h0
7h4Lrpknu+RqkDCOswvOkuEs+PfqFdmjWiTs04WIJ3mRLHiaKjTkY0jCAuxK
P7c/Y8F8fZiZlSMJGxu94574nAUKs2HsSu4kzMjR4K9dKgteZe3v5vUhYVKu
Q7JzmSxgKN21GQsiYeHTb8qrslkg+Y55fjichM1e8zEMfcOClo6En9+fkDCL
X1pfT+WyIF1yNyw9JWE0H25P4XwWmBd89hZKJWH/BxMLvZs=
          "]]}, Annotation[#, "Charting`Private`Tag$10296#1"]& ], 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          RGBColor[0, 0, 1], 
          Thickness[Large]], 
         LineBox[CompressedData["
1:eJwV13k4VGscB3BJUYSklCiVtJdIJHxTdumWVlqUrWxJIinaaJE1NVlS11Kp
K4VEm6FdufbdnGJmzpkZxkypSKj73r/m+TxznmfO+3t/28xyD3T2kpWRkdEa
JSPz/+fLMKX2OwVbLfxO/86d7SRms6oYGV/GEEoh+mMsLcXsiKnXMiyYdSge
83PxPiMxO8hC2jOf2YybzfM7b2uL2X6bpk+awXjAJnZBh62khy10Lbg9lQlG
5fkbmzsTeti33U58mcycxehrHhX+jd3sMdx9V9WZZJjL27n9dhextyafneH8
PAdrWfMy3XcybD9l1YcZ1fnI8YlplbvDYxe6LRAt3P4IFeoGlOeMLraFftZk
vcInKIwf7ew8imIv6h3QyS4ow5Ebg/My97SyJyfVZ89UfokvLgHJShkNbKUn
2zreP34NrfgHR0R+1ewV2+1li5a/g1j7gz0/7y3bs0DweDG3EscOf48wj33B
fnP6u6vAswoB8pOr0n0esG9+XjpnpL0aW73i9byenWeXn4gx2/SqFl6PnC+9
FGXjw+sVblay9RjID3TrNihGa/cjuz87G6ATIXs9bV05slocX+9/0AjPMs7b
iANvEP0nteRLTxP2x23S126rhP+YsiDLdS1YrzyUPsOhGn42qdmFZ1uhpz+7
Il6pDge9HK73fGrDRuM7kz5K67HUUW1evWEHRoz7N+TcaMRY/6QFbUEciPZN
Kdmg2AyuL9N35wOF7RkLctmBLWjO6TO8pvQZ0iXn7oantuJVfcxoTd1OGCWF
nKnOaIP22vMb19d0Ijf/b5O1rHbI/eXWphzYhWXjTob5uHXgu6tq8KugLlhU
/P6Q5N4BnneFUtiRLlinsORKvTrwMnLOmq5jXehSd1z6268Dp/MFt4uiuqDx
0tszKKwDvyccOrIjrQv6qn03vyV24GfVKZWsN12wVQgM8invQK9DlrWRFheq
2pf6Fk7jwDfqqCk1g4vYdguVV9M5EL5Yvyx6Fhcn3h83cZnBAVd/YGqTHheQ
pBWcnMNB85T14iPLuVg++h/r4iUclHF/XH5kw8WSmvNLX1lykBhu32kYxMUk
fHrnd4CDFfe+hBu85eKDp86/Iw84mOdc/DDvPRcei1l3+gs40Px1jNH7yIWs
uxLVW8TBKIfRztNruWhIKHZpKeGgWjR5gVw7F9lbJ99ksTnwWbC6pamXi1+Z
UWfeVnNwIzfa8NhkHuwHdnWLezhI2ujg802Dh3uh9yMKejmI+ql8M0CTh++r
bwcdkXLgZ5cy3n0mD7buFid+9HFgIrzX5bCAB4XEVzr8QQ7q59UmaJnz8PRm
alWwPAX5O5piticPB0aONu2eReHxL/+CwP083Ddfl6Y6h4L3BnboTF8edLZX
nKjQpfD6h8eok4E8jCrKTNeeT+GM1f0pFuE8DBQet2EvpTDcBcvnCTzkvNx+
Inc1hT4tL1bpUx4S3Fhlk7ZQyDxUsvPACx5U0vxTY7ZS2Ph63Kyp5TzYHRmb
8mcbhQd++f8cfcNDapzZKL4LBf+nA+Ura3lwVci/wHKjINge0/OI5mGncPhy
li8FzuUHawpU+WCxzr7bfpKC7NavNoaT+Hjnsu1U5CkK8zQMnYon85Er5N3I
Pk3hcPpjlyeafBTWFk0QnaWgkPPicIUuH3/HlxXvvUBhRfHHnDoTPuYnNjiO
TqIQ2yJQ6NvLxyJ3od+UTAqFqQtUjnjwUb2idtr4LAotO/0m93vx4dW6ffkw
8exOyaxfvnzMin2a0ZFDoVT4w1Q2hI9Run0Hz+dS4A+ODlC7yEdz6GfF5AcU
zLV06gwK+Bjd4C0Jf07hi+I5g9wiPorWu5qZvKCQNdSTrP2YD4V/R8t/J1bo
KNmm8IyPj4rNavvZFBpT/+JQr/novjY8dvVLEi+Nk4ILrXxoa6uGpL2jMFOe
tvvdTp5vVEzFewr1/Q73gilynqg5q3nEJs1TAvZw+XhYNTQ4l9S53NX8PkMx
OV9numdqFYXrap9GPv3hY2hS7B/jOgp/yVq5bZGlcUN2UPkNsWzf3fJKORpd
wrcZG+spHKgLOftoHI1Gu/pVHg0knokTxsVMojEqrzQgtIlC1QRzdaN5NHqs
PjduaaNwciQr5N4CGudKJvIqiQ16FVpmLqYhG/g+yLydQkpVY+r45TQM68ZO
1Omg4HnJf2anKY1jtdd3NHBIvilcX3hpAw3WxP2afZ8p+OUkTF+5iYZnXPyk
7Z0U2nFWqWszDWvjPQ5PiUtDfSUrXWjs+mwZdLyLwhG+SSHXg4am1ezbQi4F
3snF2XHeNBIcrsSDR8F5us4VEx8aNydaFl8h1neWD40/SGNMZOKLVXwKYnbT
KtNjNLKW8J4dpCns3Fm5kD5OQ7VPIaWE+EP/8+mJkeT9rksLfxPnLskZoc/S
8Bu2uHWeoaBReU2SeI7Gnc9vT1QSn/O89Hn1RRplchuSxwnIedMPVyTF0yhc
y4qIIm5Y6V1olkTD59uRTWzitfUu2YJkGhcmx3v+JNYZZxltnkpD9E+unZeQ
1Eeoir0om8aLVtnxC0UUHNVGm165TSNjuWnbNuKn9/sX4i6NmLKpwtPEKXxK
6Wo+DQeZ36/rieVP1Y2ggMarMO3kn8Sh099IuotonM6bnKnVTWGLc17tmic0
CuLZJ9yIX/XerOh5Rt53zwWHSGKDi8mFrDIauYt37EgnztQ9n21ZQaNzjOnt
x8Sq5eFXxK9oMC9NVtQSn9x5MPraWxrL5N1khcSS/n2haytpPLIsUf1NvPvy
1v29H2k8/MfRTa2H5NMS+x0p1TS49noSXeLVlWb26+poGPdsfGFEfM9T31TS
QOPigqYqK+JpMrqLUptprPF5ruVMfCFdQ8uqjYawVeX+buKBlYoTpB00bgW1
Ruwn9q7/PZL6iUZp/4yEQOKmgD6JVReNAz96OkOIrcYxn6U8GmZvbIPDiYty
2mrTGBqW501tIohnr/m3wlpE7l+vyiWSOKmjvPBLD41xO+Ty//9e5uij7HQJ
jd7U7rXHiQPVcq/YfKXBNzw39Sjxp/vp0V+/0Zhv/GlpEPEG+4TQ6/00bCIH
o32IX/DP7LcdpHEl75P2XuIsiVfq6yEaAV01r7b+f76fdh8tf9Moiojg2xMH
yC4eKZNh0OshPmlG7KykssxsNAMZp1msJcTGU/r2PhnD4Nk7nXnaxFo6TZdX
KjD4aiI1UCRmDNP79ScwAHvcMy65j4/mkfPzVRg0f9htXEX80Haf6yI1BqOe
Ji59RHx857yyuRoM3u3OjDtJvNdr/JesaQyciqN/uBPbBPbO0tFisHbltlar
//PhbFG05iwGvrrvlOWIf8SySq7NYbD/k797F8m/dtYxkboeg+U7xy1/QXzr
HpxUFjFw270Mh4hjHs0+GbuEQWbz80hb4kNlYwrG6TM4+stulTaxaf1HdTkj
BgHrPWa+JvUxk5Nvc9qYgUTtu8NVYjkmKez3Kgapjy589SSuGdzO+WnBYGVb
+YM//9fjLH52rx0DO+PwL7OJ7Re9a/J1ZLA61eS7gNTvUqN78kInBqrDw4f/
IR60O+THdSbnj7vatYQ4/tCwQcsuEr/r4jM6pB8Eh3/23OLGYMXAyz1tpJ/s
iHrJqtvH4JALqziReE7KhV8fvRkI9ixu/EX6Tylb/WX5IRKvgsbG56RfZVQO
fDMPZmD5evMFH+IzDe1zn4UwCGI9e6xO7CT4+2JxOANriXGUN+l3XOUlm+5F
MeAlhHcNkH6puMe6MzmFQchyu8w60k/zJj3OtEkn+WDwkLeLeEOlnsdgBrnP
Z5G7GNJ/E1coMHuyST5MXfb1G+nPkxU/9izIZxAbKr412EriWbpxgP2KQaLK
8RUPGimUB1SUHn7LYIr6YKs2sfscg/C5lQxemVkUxZD5kBM/aSSmmiF7iljB
jcyPBV7NstvaGGjNDTHuq6FgqLZLWSwh97tZ8+pLMp8a31XV3PjKoIH1LEGd
ODTCPGnTdwZDW9awPSv/n7cz1EsGGYjLCp7/IfPPnN017YycAKnam5fpvKFg
679/7lRNAVoupfHGk/m58+1hMytrAfoSkwbPFZD9oLveotJWAKupejX5D0k+
KRtabnAQwH3VbLUmMq9Lt32z3vGXAAYTRj5r5VOYIgj+y99FAJ9gbkrqPTJf
5UPcrwQIINPY6GebTfLD/ugF/lUB3BRNeoOTSf4HtMT4pAhQ1Bu91ucyhbAk
4zhJmgBh3nqyu8m+cbttIOnnTQEMTcRsJJB89A1LV7pHrOti0BdD4hlzLH9F
mQARfza1jj9D6rXqeGMUI8DEr8p24wNJv9eWMRgRCnDq7DhRfQCFU4FRCSE9
AuTOWSST5k/mkVqcg/cXAe42bU+cQ/anPS43ym1/CVBaE7pC14vMH6Y8b7yy
EGaK3/w6XEm8ZcZGJxoJ8Scv4pKONYVjzjFcBRMhHFdX55asozAjR3nNaVMh
4ux8jJ3WkvlvqzEUBCEW7ai7EwwKQ3HzgzbbCxEmn157fxXph9Mdd0/ZLcQ+
8WPNliUUgowSja5HCXGNNct2WJ3EzyBrtsN5IYacwzdaTCLzQ/+Rys+LQpSv
z4uInEjh+8JW0eYEIR58iF87OIHET0fnhmKaENOYtoOtY8l5FR+OPf5AiMpL
J9XNf3KQ0FXT4tIuhP3h4isZbRzcj1MJ19AX4XgEW3yXRfbnQdXcawYi3IhM
C0u5wsEuL7VmDSMR1pT3b46+zMF488kGU01FqDvxY8AlngNvsWb3VCsR2C42
Ykk0BzMd9Vw1d4iQ2PTA4t0Rsp8rmJtqnxJhmN5usmwTByFnfX/NrhUhYrFa
+Hs5DhTSB0ta60WYqHj8oposB9cLL4TEN4nwPv7v065/yP+frttfBtuJBwYW
8Ac7oLyGx9TSIqTYxTl+knQgd3hnQ+SQCLu7WVsDWjvQHuKU167XjYzMiWF9
dzuAA/p7Lkd0I9qT/SPEpgP7H4661DqvB0tiOlmXD7RDi5X/Lf9tDzZX3J27
52gbGnzfQnRYDLZK/NBsu1ZMoZ68K5rUi4dGH+22yrSgpLB06taCXhyyPnq6
Mq4JrkdnO7nukmBDf256Y2kDeLG8rNY9EoxP0VD2KmiAf1bOz237JPDkJxR+
uduAiH/1cjZ7S/DDqzpiMK0Bf89ZNLT+kAQbz9Qk1p5oAFNjeBdREtxmlc5J
RAMOz7ceMzdPAt3kwqdLK+pxsW3/C+kQ+b2RJR5JRXXo22mwsfS3BKZ5r7Of
3K2D66dh7qlRUtzs39DTdrMOi3lJCmryUqwpjtwnG1uHWvGzzSvUpBh89iH7
q0cdNGRUu8PmS+GzaW63hVodbumVTpHdKsXerXf1Vh2ohfLdM3c/bJcixulI
tf3uWoQucjJLdpVih5Nj3UbnWtjpc/fp7pXi3zMfci3NaiFepXTfxk8Kd3uN
9jyVWhg67V136bQUrr6hikY+Nbhes7B5c5QUXy+91VNzroGc848DWuelOB+k
2NBmWoPmbTHx92Ol6Pe3sp2vVIPwvY/aaq5J8fp6nMeL+9XgcSP9U9Kk2NUd
W919tRrrvez/7M2QwvLDqcRRkdWY4ftJty9Linu6PsHdTtU4L84teXpLiqFS
wzXPjarx5WCww9lcKaKH056Faldjx1dzyvEfKbyPWT+dNqYaFcEKh9TzpeBq
b1G9Jf4X/wG+51Py
          "]]}, Annotation[#, "Charting`Private`Tag$10296#2"]& ]}}, {}}, {
    DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, 
     AxesOrigin -> {0, 0}, FrameTicks -> {{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, 
     GridLines -> {None, None}, DisplayFunction -> Identity, 
     PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, 
     DisplayFunction -> Identity, AspectRatio -> 
     NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, 
     AxesLabel -> {
       FormBox["\"\[Lambda]\"", TraditionalForm], 
       FormBox["\"coefficient\"", TraditionalForm]}, AxesOrigin -> {0, 0}, 
     DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, 
     FrameLabel -> {{None, None}, {None, None}}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLines -> {None, None}, GridLinesStyle -> Directive[
       GrayLevel[0.5, 0.4]], LabelStyle -> Directive[Bold, Medium], 
     Method -> {
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}}, 
     PlotRange -> {{0, 0.99}, {-0.8844159413020355, 2.7016972515756765`}}, 
     PlotRangeClipping -> True, PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.02], 
        Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}],FormBox[
    FormBox[
     TemplateBox[{"\"a\"", "\"b\""}, "LineLegend", DisplayFunction -> (FormBox[
        StyleBox[
         StyleBox[
          PaneBox[
           TagBox[
            GridBox[{{
               TagBox[
                GridBox[{{
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[Large], 
                    RGBColor[0, 1, 0]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[Large], 
                    RGBColor[0, 1, 0]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[0, 0, 1], 
                    Thickness[Large]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[0, 0, 1], 
                    Thickness[Large]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}}, 
                 GridBoxAlignment -> {
                  "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, 
                 AutoDelete -> False, 
                 GridBoxDividers -> {
                  "Columns" -> {{False}}, "Rows" -> {{False}}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {
                  "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, 
             GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
             AutoDelete -> False, 
             GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
             GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], 
            "Grid"], Alignment -> Left, AppearanceElements -> None, 
           ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> 
           "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
          Directive[Bold, Medium], FontFamily -> "Arial"}, Background -> 
         Automatic, StripOnInput -> False], TraditionalForm]& ), 
      InterpretationFunction :> (RowBox[{"LineLegend", "[", 
         RowBox[{
           RowBox[{"{", 
             RowBox[{
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "Large", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0, 1, 0], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0., 0.6666666666666666, 0.], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"0", ",", "1", ",", "0"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0, 1, 0]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0, 1, 0], Editable -> False, Selectable -> 
                    False]}], "]"}], ",", 
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0, 0, 1], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0., 0., 0.6666666666666666], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"0", ",", "0", ",", "1"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0, 0, 1]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0, 0, 1], Editable -> False, Selectable -> 
                    False], ",", 
                   RowBox[{"Thickness", "[", "Large", "]"}]}], "]"}]}], "}"}],
            ",", 
           RowBox[{"{", 
             RowBox[{#, ",", #2}], "}"}], ",", 
           RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", 
           RowBox[{"LabelStyle", "\[Rule]", 
             RowBox[{"Directive", "[", 
               RowBox[{"Bold", ",", "Medium"}], "]"}]}], ",", 
           RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), 
      Editable -> True], TraditionalForm], TraditionalForm]},
  "Legended",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"], 
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, GridBoxItemSize -> Automatic, 
    BaselinePosition -> {1, 1}]& ),
  Editable->True,
  InterpretationFunction->(RowBox[{"Legended", "[", 
     RowBox[{#, ",", 
       RowBox[{"Placed", "[", 
         RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
 CellChangeTimes->{
  3.782214469890087*^9, 3.7822145063382874`*^9, 3.782214630014892*^9, 
   3.7822148080317497`*^9, 3.7822149635798182`*^9, 3.7822152244400444`*^9, 
   3.782215435268258*^9, {3.7822154937377625`*^9, 3.782215544720903*^9}, {
   3.7822156122594576`*^9, 3.7822156323801775`*^9}, 3.782215951331479*^9, 
   3.7822184751137633`*^9, 3.7822185162662134`*^9, 3.7822185588943057`*^9, 
   3.782218632808107*^9, 3.7822196930539255`*^9, 3.7822199238570204`*^9, 
   3.782221947719692*^9, {3.7822220120433364`*^9, 3.7822220312653465`*^9}, {
   3.78222207922147*^9, 3.782222087115408*^9}, {3.782222119547361*^9, 
   3.78222216372894*^9}, 3.782222482039259*^9, {3.7822225459220853`*^9, 
   3.78222255665739*^9}, {3.7822229593946714`*^9, 3.782222974631442*^9}, 
   3.7822241640173044`*^9, 3.7822243438625016`*^9, 3.7822244250908556`*^9, {
   3.782287941715081*^9, 3.782287975449335*^9}, 3.782288789533774*^9, 
   3.7822906551711903`*^9, {3.7822913081643267`*^9, 3.782291322174583*^9}, 
   3.782296618392045*^9, 3.782297253796118*^9, 3.7823052364891925`*^9, {
   3.7825813621554995`*^9, 3.7825813740335407`*^9}, 3.7825833305841165`*^9, {
   3.7825833764092093`*^9, 3.782583396004898*^9}, {3.782583460894145*^9, 
   3.7825834891651287`*^9}, 3.782583538670022*^9, 3.7825836152701035`*^9, 
   3.782583675860424*^9, 3.7825837163291183`*^9, {3.7825838585338907`*^9, 
   3.7825838867432313`*^9}, 3.782583955494999*^9, 3.782584023067078*^9, 
   3.782584086548361*^9, {3.782584118955905*^9, 3.7825842168279285`*^9}, 
   3.782584299674696*^9, {3.7825843599343443`*^9, 3.7825843812968616`*^9}, {
   3.782584432244983*^9, 3.7825845067106376`*^9}, {3.7825846802976675`*^9, 
   3.782584730735442*^9}, 3.782584784836703*^9, 3.7825848523884544`*^9, 
   3.782584884050439*^9, {3.7825849159656315`*^9, 3.782584949323036*^9}, {
   3.7827568940209928`*^9, 3.782756940758292*^9}, {3.7831533103396225`*^9, 
   3.7831533790577283`*^9}, 3.783153415328582*^9, 3.7831534603661485`*^9, 
   3.7831535288761053`*^9, 3.78315358015679*^9, 3.7831539892648845`*^9, 
   3.7831540193869457`*^9, {3.78315407567104*^9, 3.783154083936883*^9}, 
   3.783154195231228*^9, 3.783154272590616*^9, {3.783154368356549*^9, 
   3.7831543820624256`*^9}, {3.7831544716733007`*^9, 3.783154526515828*^9}, 
   3.783155777834945*^9, 3.7831558816374884`*^9, {3.7831559607021933`*^9, 
   3.783156011920889*^9}, 3.7831561221335077`*^9, {3.783156296765147*^9, 
   3.783156310891715*^9}, 3.783156394806693*^9, 3.7831566421864924`*^9, 
   3.7831582194992313`*^9, {3.783158587610404*^9, 3.7831586417788267`*^9}, {
   3.783158806657195*^9, 3.783158839504523*^9}, 3.7831588901412787`*^9, 
   3.783159161620496*^9, {3.783159429892138*^9, 3.783159469496049*^9}, 
   3.7831595603609877`*^9, 3.7831596459583035`*^9, 3.78315980083782*^9, 
   3.78316079822515*^9, {3.7831624601285067`*^9, 3.783162494102844*^9}, 
   3.783163709882825*^9, 3.783166366453264*^9, 3.7831665669797745`*^9, 
   3.783166655679043*^9, {3.7831911714030275`*^9, 3.783191247336479*^9}, 
   3.7831913088068047`*^9, 3.783192636460191*^9, 3.7831929446675997`*^9, {
   3.783193018727408*^9, 3.783193027818966*^9}, 3.783193179147971*^9, 
   3.7831932562431793`*^9, 3.783193343489666*^9, 3.783193461335556*^9, 
   3.783193658649988*^9, 3.783193795386083*^9, 3.7831938847267466`*^9, 
   3.7831940468041677`*^9, {3.7831941143508043`*^9, 3.7831941236485357`*^9}, 
   3.7831944072430525`*^9, 3.7831950018340454`*^9, {3.7831951599932966`*^9, 
   3.7831951756655226`*^9}, 3.7831953096585855`*^9, 3.7831954177102757`*^9, 
   3.7832417324743977`*^9, 3.7832431846534543`*^9, {3.783243640013296*^9, 
   3.7832436564483814`*^9}, {3.7833311305534554`*^9, 3.7833311418539753`*^9}, 
   3.7838397345072727`*^9, 3.7838398083073215`*^9, 3.7838398584188833`*^9, 
   3.783839890542446*^9, 3.7838400173319426`*^9, 3.7838401330522175`*^9, 
   3.783840690743511*^9, 3.783850844885989*^9, 3.7838509205718775`*^9, 
   3.783860623772453*^9, 3.783940516425296*^9, {3.7847080319500265`*^9, 
   3.7847080470885954`*^9}, 3.784708457499934*^9, 3.784708587253621*^9, 
   3.78470869540226*^9, 3.784708740186722*^9, {3.7847087885429688`*^9, 
   3.7847088424746118`*^9}, 3.784709563684412*^9, {3.7847200566997724`*^9, 
   3.7847200706530633`*^9}, 3.784720869808626*^9, 3.7847210940015945`*^9, {
   3.784721285124527*^9, 3.7847213227155247`*^9}, 3.7847214917740593`*^9, 
   3.7847216455507154`*^9, 3.784721721840849*^9, 3.7847218696628532`*^9, 
   3.784738528103218*^9, 3.78488524187362*^9, 3.7848855270745335`*^9, 
   3.784885566987649*^9, 3.7848858402972956`*^9, 3.7848863011718693`*^9, 
   3.7848863600496325`*^9, 3.784886512219963*^9, 3.784967732761732*^9, 
   3.7849682687961087`*^9, 3.7849685802712865`*^9, 3.7849688099888678`*^9, 
   3.784970408819131*^9, 3.7849705362471104`*^9, 3.7850533332369843`*^9, 
   3.7850534154713125`*^9, {3.785058730920721*^9, 3.7850587442715693`*^9}, 
   3.785058812986328*^9, 3.7850598133447638`*^9, 3.7852340649346113`*^9, 
   3.7852343107995763`*^9, 3.786014805869358*^9, 3.786014917815103*^9, {
   3.786014951998384*^9, 3.7860149671583633`*^9}, 3.7944718536006613`*^9, 
   3.794471924896137*^9, 3.7944724331328316`*^9, 3.794472486579007*^9, 
   3.794472631045947*^9, 3.7944727452078714`*^9, 3.7944728194494762`*^9, 
   3.794472878155672*^9, 3.7944729141405096`*^9, 3.7944729867873755`*^9, 
   3.794473042851555*^9, 3.794473091599301*^9, 3.794473134204447*^9, {
   3.794473185626033*^9, 3.7944732145567217`*^9}, 3.7944732614653664`*^9, {
   3.7953329318976746`*^9, 3.7953329425632334`*^9}, 3.795333995972432*^9, 
   3.7953343554484253`*^9, {3.795334421042015*^9, 3.795334444908768*^9}, 
   3.795334587048658*^9, 3.795945225417776*^9, 3.796120000626225*^9, 
   3.796390295873082*^9, {3.7977843798622136`*^9, 3.7977843959561715`*^9}, {
   3.7977845729670043`*^9, 3.797784619577348*^9}, 3.797784765873123*^9, 
   3.7978455043835*^9, {3.7978455362336283`*^9, 3.797845549084798*^9}, 
   3.813914602556428*^9},
 CellLabel->"Out[75]=",ExpressionUUID->"c7d8b2c9-d779-4b5d-a213-94b0765a6593"],

Cell[BoxData[
 TemplateBox[{GraphicsBox[{{{{}, {}, 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[Large], 
          RGBColor[0, 1, 0]], 
         LineBox[CompressedData["
1:eJwV13k0Vd0bB3DudU15RaZESoZKkkwNLz0nkiGJSoSfqWQsY5FShqSkjImQ
ISpXZjK7g+lNZI4khK6Ee+UYC/22v876rLP2Pvvss9fzfI+0g8dZRwIbG5so
OxvbxpXuzzfwusjsWF6r5op0FA4JrQw2V4YqtBQo6Fg8wSFw67PUYwwdsCd3
7o96jIPXMdbUHsY5uCtzZXz9EQ5uphJCUoxLMCJ0reP7Axx+WBa92srwAaPA
O96dITi8sr09K8IIhX8LQi2k/HB4/9w44mTYPdiWMGDkfAOH6d6dsn6yYXCY
sTJQfB0HFaNG836H+yD7qarewBcHymF+yvPhBzBy3o12xwuHfsH0xzs+P4Z3
OdxAcseBNGr/VJgRBy3dL3pC7HHY6sfWY6MZD4nqXyY67XBQ4EvbkhMbD2+O
yL+RRjbRGIzSgqcQ9omhVG+Dw/OICxFXEhNgKUfAmN8aByXVU3crDJOA0OOc
3HABB4t7ai7WBS/A44x0TYERDq7i3a9fkdKA2PvPkhByYL4XY9YqDa5EH+vz
P4WDqXtfkTZHOnyeu3X/hCEONxKED/QVpkO1a3/SmB4O1J9P9rLxZsL/jATs
MB0czOJCpc7WZEGe2qsO76M4aDe+N0oezwKplMzD80fQepY23xrnywbfpf8p
3EDmtErpu/G/bCiVtCTfOoxDxa6y6OT1bJgTdRF7rIHDtmIG4Tv2GgokVO+8
V8FhpMNgwq8xB5jGj3Vf78OhlRAtQpvJgZwItSdHkCvVPunwipIBnvJYtSrg
EJvokJ5yhQy30qKD8L046NjdukjjygW2cdtFvT3oe7LefuA1fAuSa8VOPHLo
+/MLFKZ+zIfm/VNHZ6TQesWToiUX84GjMe9RDPKczC6v5O0FUHzO94IGcsAR
NZUk9wKIuO17MXg7DroqipaGpEK4SBAT3C6J9uN/JoO6LwvhM61Dzk0cB9+S
xBHN4SKobJYbsRPG4dPhryarc0XQOVy8Rxj5cJ00rZqzGI7YpzGahXBY/Y+c
cVSpGJTInHRl5HtDNQ6HA4shw2YXzrUFhzieb+OqEiVALr2yo3UzDsW2eycV
zEvhebY1mbwJh3ntL70J7qXAXA4Wc0LWkH9MJ4SUwh67ZB5Z5Orp2eSBt6Xw
03btVhovDg03K4wjCGXQTG2OT+HBoTdOr3Qyrwxuf9rkVcC1cR5X0s3qy6Do
5EVxX2RLy9zHtP4y4C+c1TmCPLRzs1MS8R0Qf5jtaOTEgZH3Sdzg4jvIXXX5
OUrCYbnZ8e4bjnL42nw3T4MDh6O5Yu7C28rhQdbSFSLy7SfvLYIOlMM1Sbn0
DiIO7Gb7VSwsy2E5bz3aHZl3dH6cq7AcLFKPO5MJOEishho6WVVAsczCey12
HGyG1Q91e1ZAgNas2xbkdPqEDNyvADxV+tEEGw6yD0+tiRZVQNz+CCwOWVFU
qLCJsxK0O/eFzv6dg2PKmSLyxZUQ9axWl74+Byrh7TyyTZWwZO5HykCWH1pd
kx6oBB2WvHIQ8j+R5ozthCrQ45luBOTBCb5ykbNVwLlawKpfm4OOY0dzha5U
AUGyivgKuf6pU5pgQBWMOzQEP0Am69DD/8msgpBXttXGyDfT/CxIc1Xwk2gn
PbI6B+6LWUZEzmqwmhMPaUS2O92FsW+rBn6u0VO5yPp/FPeuHa+Gv+Wy2/yR
Rc1HV+ZjquESfuCFKHIp/+nk8YM1MDTkquD0Zw7eOAZEjerWwAlvMf5zyCk1
r0NHLtZAHPuKBSCHuhLcB4Nr4HI1Q0Yc+WxTuWZPZw2EaB9/1Pl7Dk5u/67c
9b0GpFZcsqnIR323yHWs1ACX04hcIbL0rqv/tErXwv12nYvRyLOBu4bqvWph
D7nxvhnyeM+ZLlpYLWRGa3boIffvC2yiJNWC9qXtd48iUz735VfTaiFvOpdP
GrlYmfSysrcWbppJTwkjvwpXeVY+WQuX+KOVeJCfqD++WyJYBxauk2NzK3MQ
ElnlUyRXBwcVU8x+IF8fm3AqOFIH72717xtCto7RNsm1rwPuhDukD8gmPzxO
5FyvA/JUITcd+QSkHn79sA4ixtc8KpH3zSztfFmE5nO56ZqDvJ4RG3O6uQ5e
6X90yEDuurCfsDxYB+UByh1JyK82/eedOVcHqnKBxbHIAVSHMSNuCkBQDE8k
svH1tXNL2ymg+8mwNwx5l0JiQ4YqBVih90WCkBeHVNSNDCggsSzdEoDcEteW
vWhDgb6S33PXkV/oO4tm+FLA1JAZ5YXsvUYIPxWB7tsNpF9FPlmcurSQRoHW
/BQ5V+RtToed08sokLC2RcoJmSnR3W/4gQJJeyQiLiPTO64aLIxQ4ND2OBcH
5IQw7qq0RQrQByxq7JDVU01F5Dip4OFtGGKLnLb04vRvASoYc52stkHmOTsd
1i5BBZ2Pe5027PP2SF2WPBU4+HvCNvyVM3zx5kEqkHbIiG2M17PvUTqjSQUf
t4VtG/MXVUs7yepRQdljb4w9soSoR9qKKRXo5ak3LyGHedb0fbSmgvm4co8j
MquFRyDLiQpvs2npzsgX5cz1b3pTQaBOadgNuf5uVpBxIBXs2M2jPJD3D/yq
kHlAhfHz4kU+yM/U4NdyLBXcC86f8Edmj4rc+zGVCoriP/QDkXt1dj/3L0Hz
xcZlP0CGF75dp+vQerld154g5yzTeGXeU+G2tUjTU+TAPOtbbUPofRWcc7KQ
J7jIJZmTVGiP/1j/FtnUYWnKb54KvZRw4zJkObFY6128NKhb8CxtRo7yGo5f
EqYB+y27qE7klQ+Kba07aCBeJj3wBbktqFnLT50GtKXEul8b5/nnqlSrHQ3a
jw5SdqHzP3zC0DzDjQYhPgMiysgGac+ibtyggYF/7oAW8vbzKmzSkTRQK9Ir
tERurHX6dr2cBqbCK+FJyAe2lomfotNgt/t2UzJykjfh7M42GmzrE39QjXx1
dyq9ZZQGjxqkYBhZJKbr5Q5+OgTlLLXtQ/WhNKNQn76VDqVbFV9u1I/zxU9m
LsvQoV323LeN+hLfbXiIfJgOxhGkxEBkYdH6FrVLdIjf8mmqd2O8fIZH31U6
uIXfJM1sjD90VzjAnw5pfArhHKh+xVn8a0N5TIfsVIyuhrwlueSXQQUd+jz2
CT9HLs6NSZim06E6XsqtFPlsjce/UW10mFjQ3NuOHPt1X1jPKB3Ykx8NkFB9
FdyZtdX2n3pQG7vM748skB0Pvg71cL5sINMD1e/CMu9x0av18FwqzDYa2aTJ
5GGlXz1c3ZwZXIQcPcHXvR5ZD99NmxfmkTcrhF15WF4Pxqutz4NQ/+AvuP74
BV8DjJ6zo5JRf+GrvPDlv3cN8JDHjmaA+te90LnQUmoDPLCamvJBXjv9RDG9
pQE8BcbcXiAzRxsD/YYaINq50W0euZNPfac8ZyP0+mx1yUL9McFOyDHUrBG+
HFHSF0b9dSd3B1NrvhE+N/RvUkX9OrHL7dne9UZgeQzUOCELpnJhItxNYPff
e+pGPyeoQMy0RBPsB1kaF+r3363yVZN1msA9Ni/jGzK5INJ/ObYJqjutOrP4
cFAzNyCUHGwGTUE3J2cBHFI7JCZ9NZshKq7l5VtkTkNmu4ZeM4wETh77hdyn
GZdaZd0M+qI8MbcEUT7a9fUwPbwZeH8ZZsajvEKd8fTo/NoM0uThy/0o7xjd
SxxkPfwPGl4LtmWjfHS5aOKd4uh7mPEhOZ+TRfls3C/j0PR7eHn/UNwb5Akx
7kjtxfdwNlGfbx3Z9c4eewveFmCYNU3koPzmecpl0z2VFli55qxN2o3yxPef
tl9CWkBfV86/BeW/eHEmd4TMBxDhOnTjyQEcGoPnLScut8LxXEWblX9x0HQT
KaZca4VUh1B/W00cSs9r8CT6t0KiIHGgETlzt3+5fmQr2KXoecdp4RDU9keI
XNIKJ6euLR4ENF6c2OZOaAOb2ufHb2ujPFYoCHNpbTDtz/1A1wCHtGElmbWB
j7B7X4/gG3O0H7cjNE3rO6C5QV8nKACHlgY12xOELpBa16kwT0P/Bz9L9f9a
dUO8lJJp1wf0/L5TDU4FPSgvflSf/YND2N+k8tmpXnCQNPDNV5wHd1Kd13Gd
PuhO6c7Nd5wHt5NJL4tD+yF0wKq87MU8XHM0TJka+gwJJtkmmSPzoHRqy+4u
1S+gU6c+fF9uATjdY/Z+9hqE4NaMHQ9dFmDUlTH3uuUr8AdrHr1cvgCfsuZU
n/ENg4hYbyQHxyLUd0UQt8mOgED+N5mfZxdhu3a4iVH7CCTfX7EYfLsIHGds
P/N7fINsl3R3HtISzBhm6qpLjkKevBivh8sSqJFnA1SaRsE0drpEtnMJuF5v
m6ZcHoN810kJisYyDMYWYEUC4yDzITfmOXkZtCR3dqoUjYMCeV4+QHIFVrlT
FB4ZfwdzvaiOHzErUDse4qS38h2WbncyXLf+hk02uiNxiQwYui3ufij1N1g1
eWue0J2AnTxKLpwaf+BQ662ee4wJWLF5+pX48Q94qUerp9z7Aavrb2S/ua9C
3uPNAWLKk9ByzKOyVW4Nroe6/t7VMQnVtuv3+UfWAJyVbWIDf0KpdDanV/U6
OBWyP+rfPQUsz/BAoTd/QTIhH89vmgKfQI3aldNsWLdrE0x6T0OmQZs98xsb
Jvq1srlEaAYU7JSusu6wY+XFFVvNimag51X4/YPKBKzlYsR+9lJ0X7jji6cq
ARtks9bOezcDOtoNd4o1CBjhzF83Us0MmDeQqjW1CJjRlC6lrGkGHGy+uF01
JGAjMt2OooMz4MPfW6ftSMC4n84U93Ey4YPFEZO+FAJm6bfrtKU1E4RHyn88
EyZiY5Fjmf02TLC/Gpx9cisRc8/MWr5gz4QAuVmrZQkiFtgmn3XuChM6diu+
vyxDxNJl9v0x8mRCU27dAQcVIsZoV82Be0xIfVRFxk2ImPceXZLcWyY4pr/7
+yyaiP3R4rR6mc+E+XRu48J4InbvXHOhdBETTspPGrYmErGndwyspd4x4ey7
BdfNGUSsoud0iRiVCXssHhDqi4jYetAFe94eJtiKOVG+dxOxh5+dall/mGCV
VLPzjAQHNmelYlKxzgQX5RMHr+/kwCyHVkeD2Flgz9UklCHHgSmOxXBv4WJB
mKV1KK8yB9YxXX1ObQsLrBbYwuV0OTAxNoGf/ntYMLBu8OiBJweWLV8hSjBj
ga5zcIpnKwfGnxOS02LOggu/tMWvdXFgN/ad1oyzZMGxmT1ePv0cmL7yqL2s
HQvkug5yJIxzYNNH+PJOurHAKOwQSWuNA1M9bafzKJgFVMr6kpwyCUtpV/h0
7h4Lrpknu+RqkDCOswvOkuEs+PfqFdmjWiTs04WIJ3mRLHiaKjTkY0jCAuxK
P7c/Y8F8fZiZlSMJGxu94574nAUKs2HsSu4kzMjR4K9dKgteZe3v5vUhYVKu
Q7JzmSxgKN21GQsiYeHTb8qrslkg+Y55fjichM1e8zEMfcOClo6En9+fkDCL
X1pfT+WyIF1yNyw9JWE0H25P4XwWmBd89hZKJWH/BxMLvZs=
          "]]}, Annotation[#, "Charting`Private`Tag$10806#1"]& ], 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          RGBColor[0, 0, 1], 
          Thickness[Large]], 
         LineBox[CompressedData["
1:eJwV1nk8VOsfB3BLWeJWN2sldSkVUUQrfSrUlSyRXSiiK1pUcqOyttCGlIqK
EIpra1MaS9GVIslO2YaZc2YGN2NOhd/z+2Ne83r/Mc85z3e+2x/7DtvtlxAT
E2PI5//flSHy7Q8LHTbtTa89tmX/MOtGHVvMn70a1WO6bQ6ew6zTqjdTN7FN
ka9/r9vfZZh1dJOAWsa2x+Hgunc3rIZZB3fNV1Bne8NqHIpCo2HWkGthlir7
GLp6HZwapYZZWZ5hw0rsKCS4py0WsxOwpvfuTVJkJ8LyakWuRTeP5ZAYpW73
KgP5Sc8/favhsg7OnF2Q+jEfUjEjI5Xjg6wiz+UcbacSyLhskjA3H2BtWpWu
pFX0ArYFppKOB3pZOrzxRQ8KXyPUdl/lq+tfWUrxjQ8WzqzEuJVf3+rp7Sz5
F44d756+gU1A/dqy3CaWoZOFRLF+DSYLvmp5natn+RQOPl3R+y9Cf3vfdXHO
W9bbiO+ugz51OFz2TRFjT1n3vuppTrR/hMbySuXY6nhWeVis8a6qBsjbaYTW
ZuWj9o2hp5lEI4zyFtT3lJWjlVvy55TbZ+jNmEibCKxFeovlG79/mmA7d6Wt
sP8TYqZuPRumvmDl5Sq2pn4zAqa/PrrFtAVCmpMnqmnHwW23HhRFtSLdLzxk
x1Q3Du3fkUJ1t6HyvPL1X697oGc5Z2nj6g44ccW7NnL7IBUQv7ztaCcCtnlL
hA8OoNefPfqwtgt2xVMB9PQhNGeMrr4p/xWWERXOjJCDqsZYyXmLv2HnhIZw
2RcKC7aet91Z/w0HlptK7frEwzQbz7aZh3uQXlTbMj9NAN6OdHMjtV6cPnhs
NvvtMAxzh08ZVPci1yQxx6FgBNIP59Esnz4cr7h/uDt6FJ0J/2wunN2P5Ssz
zur4/AcTtUWfDAr7oXv9arKj7nf8kknRjrMeQHbCmisa1HeU9Uf6bWcGoOe9
Tl+yYAxyHubfEpPZkPEUyTl6COFWHWRsZj6I2AGrgLFZ41hbF9oUzR5EllTd
3/054zhqdM0oJXoIVcVak4aGIuRdnnVKZRUHWb4dFatKRYhmZmffNOCgUm2b
jcQrEdz3z2lWMeLg6r6HDY1lIswwUTJQ3cCB/Df+4yMVIvjS87iqZuT3bl2l
996JsNBSy3WeMwdh7h0Ztc0ixMuYbFgQzoHBlikXm1ERTkT5/9Bo4CBVR/Ox
YAkDmTvMs9ZGDqIWSM+5vZRBStGFE1e+cFDywU7OdDmDyp6sYaadg3s+LiXX
VjCYubmP3TDAgZfbibfzVjPI/uX2+cxPDljKW+Q4YNB+wupxuxYXKo7vtf2c
GQRe7vzr2nIuTlcNK/W6MBDLPLh02wouajfaHndzY6DVdDG9UJ8Lhb7D5yw8
GBwzqE6+YMxFC5p65vgwkBdsilljx4WWx7EzLocZ4MAqj4TTXBStl3HNj2bg
ldcXvDGcC80e+SuCGAbhozeu9kdyYS1rtmjlefL+YRPlay5wkZmb5ppzkYFZ
fK1mRwIXt8U3SMVeYWBR6sPRzOYiI/WB7s+bDOzlbx1/0shFnOjkgus5DI7v
2nnZ4wsXPZWxZXdzGVy/MZUp3cpFzqTk9YePGDQv8m1x6SL39f7UXZzHwNlo
9YbJQS4WKapWPy1ksMfjw9S2CWIxs2yfFwz8CsTjWpdSKExz/uhYw2DSO6Pf
XpvCeOJIsco7cr7K9k31KyjoaMT3NRNXnrk08lafwucXPfNtaxmoW6k4F2+k
sDbb/4PuBwZNnBVLrthQ0NU5p5jUyOBgav0ZWTsKfD1n8Q2fGUjsCmqN3k0h
sTJSs4t41fNncaEuFIraIyXUvzCIO7d19IA3BZ791umxLQy2ajqzTE9S8Llo
ypHtZNDW/EOV9TeF1am7zscTH4lNDdoQRmFd2gUzlS4GqSO9S/QjKFjZ5Skv
6GYgYgVeUo+j4J6sPPL7NwZXSRneukyhn3rlGUustbQYStcoPFNs7RHrYbD7
imhULomCtl3QvCHif9yjXJi7FPw0fxjc62OwbbZW8fE0CtxWZQWZfgadVe/k
hx9QCNkW8+MQ8QydmeXsbBKfm5ptawYY+DLJWk1FFE7OSMrJZzOYeLwx3OYJ
hbkLQ5OlB0l8vbrbap9R2GwxP9KDuKJG83LFKwqhhvMgNcRA7Ub+f/nVFAa9
kg1MOAwOj3V3ev5LYY2YaUMcceXuWdWz6yi8f7NxsoX4gMKR5KBPFFQD4iX+
4jJ4GXQ/QrOJQpJGRlMe8czGBv+mZgpBKUf0homLr+mbrOkk55lEHQmkGEgN
79Ua7KbQ4HVgdzaxs03CrOQeClhr/uwb8eRv//UwbBKfz5IjFjSDXYGa73M5
xGqBVaeIM+rsS9xoCrsVu+RyiHfElZwrG6GQMps1NkGcyu0/fOg7BbGT9xMW
8xgMWyi5LBynMG2bX8qfxKY55lsbGAqGf1fN9ie+IROsE/GLQia9l3eBmOOX
pWgwRcHOiV6ZSWxc0zzRK07jo7ls82viK1rSg4nTaGgpund9Ie6JWdtgJk3D
cyjalEtsOOD3YkyWRvzjRVK/iM+ZJadnydOwkf1XQ45P8uvBuzinWTTkPBVv
qhCvkGSOy8yhYVmR5PUH8dl9yz1eKNI4IegMW0bcWOGy3V+FRpRNMGcF8ZI/
YlfNn0fj1iD3gR5xSHjp3Do1Gp1O5Tm6xO+/ciVOL6RxvClEtJxYHfNpXQ0a
tHriZU3io3ctv3QvpqEcHus7j/jNROjrq0tpnK1oDp9JrLLn8cPN2jSMl9Jt
U+T9/V91XhtZQcPir42H+cSv5v92Kn3l/++nv6mdeFaoibe9AY0Fp9eZVRHv
aw/cOc2IRlL1kzM5xCXr7xo9WUtD/KMcdYlY+tZHdd8NNMR0bp0LJHYVTUqr
mNDYXP7c2pI4z2nlSA1o3HxSsVmLWOyZZ3vIVhpKR6RdJ8n/m3Wi/HH7dhod
jVHjmcRM03BS3A4aseutg08Q7zT846yxFY2fn8N+30o8Mhqx664djbpAyYRG
kl9mdkUbbBxomIrqj94gvlHYqynmTCOkjLPPidj4iKlw7x4aRgqVgQ0kf6/W
H/s6x4tGmNyXiAvEvXoZ76r20Vgy2XXHhPgCb9qdJQdobLezar5L6uOzfzU4
QTR+cJUVTEh9paxj/xVwgsbdqqQzfaT+fKWkrgtO0nDdd8fkPLEozXxoLIxG
UUbg42pSv2ptb65JnCfxj/wsvYTU90BWf2nMRRpPxc1rn5D6zz8+bUDmEo2D
QxZ1psSbZ5utnxVPI2huY7QT6R8+26t65t+hsSfmyNk9pL/oKvXJ3UuloW+m
LWwh/UjYK7FG4z6N9Mq0mzbEF85sjV2WSWPN/Lm2a74yePykwsDoHxpTi89Y
9pD+912zPMq6isaO95ISj0i/LBv5mvfpLcn3sx0dwmaS36yplt3vaIQ/GSwG
saobVrh9oDE0RNu9ayLxTHjd5NdCY+DQAFPyiUGMWNmSCIrGl6/i2xnS360/
dtpM45N42nunKBCrpvz6+/wwiXfdGpb2vwxy1xp/vDxGQ9N/n5cNmR8fD70M
vj1F46u35NOjVQyUu17UFCvw4GTUUaPykkFA68RObWUeIjYrTEmUMqj6vKXx
vioPq0LWD3Ofk35e+2/n5QU80CGy/xU8ZVD7rG3EbykPS8QfqSkVMTiTwMxX
28iDXUzo5IZsMm8um6QlmPDwn9W1jcNZDHQuRmjJbuahIEv1Z1omg9azsvpC
Mx5cdrBHf6QzMAicu63Bmgdr9O6JTGXA3r7+SPQ+Hu4sd/rUF0/iYXp67IcP
D3tNfgR5XmOQuKni1FE/8jzfQZcWMp83G1nEeATw0NUUOvgyjsFtDZfb64J5
EMYsvOpE5r31RMgb+iIPpeVFvl9OMnhW9FzVoZAH20n7Y3Vk36h1idUVL+GB
I8jxSnEi80PMfWveUx481hZt8XMg89Fm6uD0VzwYbQ54y7Ml9UKZs55U85Dy
qFe9bDuDb5qf9yt38qDKqrP0NGQwWptxqrKbhxbLj54d+gymBwVfPdRD7q80
/9eulQy0y+e+qGbzoPeVLtDTJvuDu5f8yRHyfJcSZC4k+1YSr6hFig/ZS/Xe
4bIM5hmzaqJk+Tj424XINCmSn33XOlfK8zE0YVjwSpKBnb6h1IXf+aBUvqv0
TIiQ8uGUyzo1PiTEFA16RkTQl5IRu6XPx91S+0XPWkVwPalh5erOR2XcnvhT
aSL0XepLb/XgY8+X4Odyd0UISM8QOe7lw/N1edGN2yKc/qCVYe/Lx8SOyMlb
iSLc19T5ufMIHyf3yE7ujhGBXb86B9F8iLZJlV73EyFomfn0JY/5KLcW0eNa
Ivw0kXJ7kM+H77c7ews1yP5qX1PwRyEflyxEh73VRUg6Y+Gu/pSP3LCXKwqV
RHjeZFWsUs6H4aGW/hFJESbDHffOaOJD7RXNmegex8U2vzLBTz5Ot/HUBq+M
Y9TNwPb5JB/u4TkPJi6Mw7X7V2+4uABSf7sNyUSNY0VfvMwcaQFc7ZscJ4LH
0UC/tDecI0DgI4O/3DzGoSI2mxuyTIDTE2l3WrXHER7ZHrZFR4CHL2yurlo8
jqFpmbNm6AlwKD25IXTBOEplNxjdWS2Aww/3Zors7x4KPuFlmwTIFT+kvPK7
EJlaz5UlHATYda7ijnapEDNzInNqnQTIdJNrzy0SIljHyjjRVYDjGXq5ao+E
+HNV797FXgJYW9VHN90Rgl4vn7ftoADLzq35Jz5MiNVWXqZxEQJMiXM7Fm8U
IqVeu9k+WoBHDt8E+QZCTLMbO6B2XoBEo+Mhy7SFaHaMvZJ3SYCfvy+05agK
ccqrpK3+pgDeDo5tqWNj6Os9E5B8WwBJ42CHe/QYdu63mPJKFWBHYJfs1b4x
qPt3Lx5NJ+d1tAWt+zSG83T2s9JMAUIT0j+N1Ixh+NCxHVHZApK/CmXJr8fg
PGLSZflIgNkqlTK6T8ZQcUzmiGK+AHKh98/nPxrD/wDddEXR
          "]]}, Annotation[#, "Charting`Private`Tag$10806#2"]& ], 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          RGBColor[0.5, 0, 0.5], 
          Thickness[Large]], 
         LineBox[CompressedData["
1:eJwVlHk0lQsbxaVIXSFKbsktRIYGik+FTXK7RN1yKRQp0s3JVKYuPiIaRKVy
FSpUKPNc6ZWpDBmO6ZiHw3GG95z3aETh8/3xrOf541l7rb3W3r+Np7yOuImK
iIg8Wpj/76pAyd7n+bbGfvcsrh1ECXG/iSVyjrUD/p5T5zg7S4gQhYRkY5YZ
eo01kqI1SwgfY4q3mWUDdbdXrI+rSwiPw+vklFinEetKE4aTxQTbIf+ZAusC
trpYBUQ9KCaeOQcLV7MiMJeM6G9TRYTYqMu9Vax4zMRzRpWIQsI2PkLpyJt0
DB/Uj9Mxzic8pGTykptzoEm7IVunnkMUOGtwNI8WYe/fg+4GulmE8fbU1WoF
5Zg1+zU1ZNszQov/fUNa/lt0z2iIVWenEqtv09N+k6rCPYcY90m9FEKy3K7v
Q0kNcmUlTDYkJhA7j1qIFuq8h22l5fNFxG3CNX+iRHu0Hj/uOrybPhNN1IZ/
cZhwbUJmsm3jdv0g4tHQVpXZ3mb8R/ubVLWtDVEZfN3wcHUrLGoUMh9FeaOh
ZqfzPlE6riREjpyiwsHgFv0x79iOFYkZIU0aMUjtPlDjntuB7Jhm2qBIPK7M
J5YKeZ14Uxb6csvVBNDE3vqYmnXjQutewwr3JHj8nphWEMFA7bCP9mDgY3i6
WSbxBnvQ8lnn4XdhKrYekFWn7+hD2IzNrS2uTyFOu63R49OPvZ57wudLnmP0
HOvT84YBnJHiF/dZZqEr/dOOBMkhzEw9TD9W+xLV9OuL16oOo8zwk8wqi1ys
3xv9p1XLMGrbIuMey+RjySHnHimvEZgyvnyx8CsA3zLVXE9xFMcPaElPryjC
zizhJd26URgM3qDY5cVY+nwtSbgyIfaux8vNrRT9d3JN8mXGoEXwwrPsy2Gk
uKFNN38MQT92bfO0fY2fEkmaNw6OwzHOMSr8YgUqxi67758ex1Ne9m39OQK/
OJkPx//Lgsl9wzzFP9/Bsc7XcJ/5BH5kGFQZcavwn6Z/OiJZE+CcSJWiJdXA
R++WXlIkG2WHaYPS4XXIvil9ac12Ds5do5k2Dn+AX8S5GeVWDiKmZE2/BTZC
4uF0KYPOgWRRfaH6lUYkFVz1i+3kQOWtE+lyuxFVI8+E070cjLLRKcxshJQJ
k9U6zoHJ1TvxQX2NyPjp2B76gwMvYsUJmDSh18/6Za8aFyFLy1lMmY/A2e1O
d0K4CHicpSLa1oyT2Uz/PWFcrH3v8eziUDPCPt2PG7vMxTsW/cQnfjOqgmcr
9a9ysXlZUIr0Ly3Yd7tBpe8OF+xFJV108xZYvHLlqGRwkay1dSS6ogU2kokX
i+kL+gGqB5c6tsI9b9ENhjoPr++by/q7t2HudPqYjSYPmVFnvUq92nB3zX7j
Fm0eFDYNn5oPaENVaMxkrQ4PpSWkVtrVNihZrzlWuIcHn4fflPdktaGDo70p
9hAPhlKL8wsFbdircowwC+ChdsjURjSEjp6uGQUiiAe5DU7BalF0eF9P9t0d
zENLjp31kTg6kidHN+mE88CyKJZ894SOKeJ8jNINHrZ5nF/xs46O3OMR9tMp
PDTm0l4KZduheD/nc04dDz3qk56K+e3w+jrY71zPw1OO6OpNb9pR9Zd0nUwT
D3ZJtuYG79txVs77X982Hq6NLQ0LHWhH4S0dI/1+HsTWPxGNWd4ByxtFURWT
PLCdvleWnelAYNirX5sUSbC0PZ0a1TvROMQVDfmNxDpyw+Z9OzuhtHBtUSaR
ai8XV2/SiZrZf97GqZOonsv874x9J6T/MTpto0si6JaJyPeYTjzzq3zZu59E
oifxyONrJ9rP1YHjSyLKQ/VWR2sXkgxYf9P8SBTP61nKD3bhjLj4XSqAxLhp
xEE3XhemnpizvwaTkKpmR2iJd0Oxp+aWaDSJ2ZS6JgfDbrjurx5Z95CEzdug
bLsX3fiiUhlxsJqEDGOE7nCXgYrJoey2WhJrp6OSPdMYiCLmu//6QGJz5XOf
OwUMKDhC2/EjiXB33QfL2xgwvPO2w72bxB/H/QsIqR5cEanYFM4jUWGgN2Bz
swfyA+XvC+X4SHOOjWEl9ILGmLXSlOeDOEaVMzJ6Ud1uSn+swMfpsa6SgfJe
eDfU999cz8e2JIvEDf29aCjtmXRX5+NBm4/bzY19CL0zvU5xDx91xi/W/5bX
B9b+Xd6Rp/i4nMxhrRzoh6FZyNcZVz7e+PlapQj7EW/87pKPOx9Ti7X6TJcM
wETP4ooTjY8VGRdXtWgN4IGy/QMDfz5W6nvSxIMHcHA2sIa8xke8/rLEFRsH
UVpQpmCbz0fn+fOfy0OH0GB/fcuiIj4mslIW+SQMoV/k+N7sEj4ESzs3WuYN
QfTQvIfYGz5KnqRmnR4dghXPnCiu4+MP8y9V6xe4OKzS7ibfz8fucd3lzjeH
IXGPX9AtLgDJdNF/6DmCtYbE+4hlAuQQuukuISPYwrzVv01SAOmqVRrGMSM4
orNT/OpKAbrteQa7s0aQ9PGSvYGiAH1EUKfZxAh0xCVEEnUEUJ2VE2twG4VD
gLK1w3EBMiLTRbT8mWDGMFMZTgIsdpqYYEcxQUtNn7JzEeCsquWhygQmQj6q
pducEUBUf3f4m3ImHqto/bDyFoCq7a8XzjHBatmRiUgBurw/kiGxY/DdbC62
6aUABVNqhdPV4/hhJO6YlrPgR3py2WnGOCJt3udtzBeA/vSeq4Acx71Qi+NK
JQL0+N73psmzUNZhXbimUgD1E/La0h4szIXZuSzvWPj/sHil0boJXOtxr6B+
CGDw+r0VJ5GNT466f5bNCWDFuPsTJWw4DP4cDVtEYZf5bm4rnQ1t5m0J2aUU
FAKv7EmX5KCVfG2zU5bChskBf9UIDtaIyHADN1PItXdj6wZzEXa5N9hUi4Jb
wKKwK0kLXFzyVHr5VgoaK91SlCq4eLVst97DHRRsdxV8UZ/nwknONazCmAJ9
6YeQvKgFjqiVyYvaUri6PLHPJ32hd5mXMxuOUmCEmWak1JPw17I2jHegcKD3
JHsjtdCT7aMuqicpdAnPnNi+kGNyl2T27x4U4jWrA2O7+dhhfdLsRjgF/VZG
L02ZQlKLZpdNJIX+5HnafWsKS458PasYTaFAGRe0ghZ07K7HZsdQGL+ZOpvc
RuHSyaKelgQKRy54NbHNhGCOhtL+fUBB/u+fd00dhbBys5g/mUyh8Njh5C5f
IZTODap+SqVAi1ObK0sVIprMKH31lEK7s76mxGshhJ4XLCMyKDR3uBoltAtx
bNJo4MALCq1ySlvcSSHeXZDwXpVDIfzoi8+BYpP4HwOlKyk=
          "]]}, Annotation[#, "Charting`Private`Tag$10806#3"]& ]}}, {}}, {
    DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, 
     AxesOrigin -> {0, 0}, FrameTicks -> {{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, 
     GridLines -> {None, None}, DisplayFunction -> Identity, 
     PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, 
     DisplayFunction -> Identity, AspectRatio -> 
     NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, 
     AxesLabel -> {
       FormBox["\"\[Lambda]\"", TraditionalForm], 
       FormBox["\"term\"", TraditionalForm]}, AxesOrigin -> {0, 0}, 
     DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, 
     FrameLabel -> {{None, None}, {None, None}}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLines -> {None, None}, GridLinesStyle -> Directive[
       GrayLevel[0.5, 0.4]], LabelStyle -> Directive[Bold, Medium], 
     Method -> {
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}}, 
     PlotRange -> {{0, 0.99}, {-1.0247206233126678`, 2.7016972515756765`}}, 
     PlotRangeClipping -> True, PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.02], 
        Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}],FormBox[
    FormBox[
     TemplateBox[{
      "\"a\"", "\"b \\!\\(\\*SubscriptBox[\\(\[Kappa]\\), \\(max\\)]\\)\"", 
       "\"b \\!\\(\\*SubscriptBox[\\(\[Kappa]\\), \\(min\\)]\\)\""}, 
      "LineLegend", DisplayFunction -> (FormBox[
        StyleBox[
         StyleBox[
          PaneBox[
           TagBox[
            GridBox[{{
               TagBox[
                GridBox[{{
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[Large], 
                    RGBColor[0, 1, 0]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[Large], 
                    RGBColor[0, 1, 0]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[0, 0, 1], 
                    Thickness[Large]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[0, 0, 1], 
                    Thickness[Large]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, {
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[0.5, 0, 0.5], 
                    Thickness[Large]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    RGBColor[0.5, 0, 0.5], 
                    Thickness[Large]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}}, 
                 GridBoxAlignment -> {
                  "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, 
                 AutoDelete -> False, 
                 GridBoxDividers -> {
                  "Columns" -> {{False}}, "Rows" -> {{False}}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {
                  "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, 
             GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
             AutoDelete -> False, 
             GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
             GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], 
            "Grid"], Alignment -> Left, AppearanceElements -> None, 
           ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> 
           "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
          Directive[Bold, Medium], FontFamily -> "Arial"}, Background -> 
         Automatic, StripOnInput -> False], TraditionalForm]& ), 
      InterpretationFunction :> (RowBox[{"LineLegend", "[", 
         RowBox[{
           RowBox[{"{", 
             RowBox[{
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "Large", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0, 1, 0], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0., 0.6666666666666666, 0.], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"0", ",", "1", ",", "0"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0, 1, 0]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0, 1, 0], Editable -> False, Selectable -> 
                    False]}], "]"}], ",", 
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0, 0, 1], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0., 0., 0.6666666666666666], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"0", ",", "0", ",", "1"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0, 0, 1]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0, 0, 1], Editable -> False, Selectable -> 
                    False], ",", 
                   RowBox[{"Thickness", "[", "Large", "]"}]}], "]"}], ",", 
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0.5, 0, 0.5], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> 
                    RGBColor[0.33333333333333337`, 0., 0.33333333333333337`], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"0.5`", ",", "0", ",", "0.5`"}], "]"}], 
                    NumberMarks -> False]], Appearance -> None, 
                    BaseStyle -> {}, BaselinePosition -> Baseline, 
                    DefaultBaseStyle -> {}, ButtonFunction :> 
                    With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0.5, 0, 0.5]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0.5, 0, 0.5], Editable -> False, Selectable -> 
                    False], ",", 
                   RowBox[{"Thickness", "[", "Large", "]"}]}], "]"}]}], "}"}],
            ",", 
           RowBox[{"{", 
             RowBox[{#, ",", #2, ",", #3}], "}"}], ",", 
           RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", 
           RowBox[{"LabelStyle", "\[Rule]", 
             RowBox[{"Directive", "[", 
               RowBox[{"Bold", ",", "Medium"}], "]"}]}], ",", 
           RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), 
      Editable -> True], TraditionalForm], TraditionalForm]},
  "Legended",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"], 
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, GridBoxItemSize -> Automatic, 
    BaselinePosition -> {1, 1}]& ),
  Editable->True,
  InterpretationFunction->(RowBox[{"Legended", "[", 
     RowBox[{#, ",", 
       RowBox[{"Placed", "[", 
         RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
 CellChangeTimes->{
  3.782214469890087*^9, 3.7822145063382874`*^9, 3.782214630014892*^9, 
   3.7822148080317497`*^9, 3.7822149635798182`*^9, 3.7822152244400444`*^9, 
   3.782215435268258*^9, {3.7822154937377625`*^9, 3.782215544720903*^9}, {
   3.7822156122594576`*^9, 3.7822156323801775`*^9}, 3.782215951331479*^9, 
   3.7822184751137633`*^9, 3.7822185162662134`*^9, 3.7822185588943057`*^9, 
   3.782218632808107*^9, 3.7822196930539255`*^9, 3.7822199238570204`*^9, 
   3.782221947719692*^9, {3.7822220120433364`*^9, 3.7822220312653465`*^9}, {
   3.78222207922147*^9, 3.782222087115408*^9}, {3.782222119547361*^9, 
   3.78222216372894*^9}, 3.782222482039259*^9, {3.7822225459220853`*^9, 
   3.78222255665739*^9}, {3.7822229593946714`*^9, 3.782222974631442*^9}, 
   3.7822241640173044`*^9, 3.7822243438625016`*^9, 3.7822244250908556`*^9, {
   3.782287941715081*^9, 3.782287975449335*^9}, 3.782288789533774*^9, 
   3.7822906551711903`*^9, {3.7822913081643267`*^9, 3.782291322174583*^9}, 
   3.782296618392045*^9, 3.782297253796118*^9, 3.7823052364891925`*^9, {
   3.7825813621554995`*^9, 3.7825813740335407`*^9}, 3.7825833305841165`*^9, {
   3.7825833764092093`*^9, 3.782583396004898*^9}, {3.782583460894145*^9, 
   3.7825834891651287`*^9}, 3.782583538670022*^9, 3.7825836152701035`*^9, 
   3.782583675860424*^9, 3.7825837163291183`*^9, {3.7825838585338907`*^9, 
   3.7825838867432313`*^9}, 3.782583955494999*^9, 3.782584023067078*^9, 
   3.782584086548361*^9, {3.782584118955905*^9, 3.7825842168279285`*^9}, 
   3.782584299674696*^9, {3.7825843599343443`*^9, 3.7825843812968616`*^9}, {
   3.782584432244983*^9, 3.7825845067106376`*^9}, {3.7825846802976675`*^9, 
   3.782584730735442*^9}, 3.782584784836703*^9, 3.7825848523884544`*^9, 
   3.782584884050439*^9, {3.7825849159656315`*^9, 3.782584949323036*^9}, {
   3.7827568940209928`*^9, 3.782756940758292*^9}, {3.7831533103396225`*^9, 
   3.7831533790577283`*^9}, 3.783153415328582*^9, 3.7831534603661485`*^9, 
   3.7831535288761053`*^9, 3.78315358015679*^9, 3.7831539892648845`*^9, 
   3.7831540193869457`*^9, {3.78315407567104*^9, 3.783154083936883*^9}, 
   3.783154195231228*^9, 3.783154272590616*^9, {3.783154368356549*^9, 
   3.7831543820624256`*^9}, {3.7831544716733007`*^9, 3.783154526515828*^9}, 
   3.783155777834945*^9, 3.7831558816374884`*^9, {3.7831559607021933`*^9, 
   3.783156011920889*^9}, 3.7831561221335077`*^9, {3.783156296765147*^9, 
   3.783156310891715*^9}, 3.783156394806693*^9, 3.7831566421864924`*^9, 
   3.7831582194992313`*^9, {3.783158587610404*^9, 3.7831586417788267`*^9}, {
   3.783158806657195*^9, 3.783158839504523*^9}, 3.7831588901412787`*^9, 
   3.783159161620496*^9, {3.783159429892138*^9, 3.783159469496049*^9}, 
   3.7831595603609877`*^9, 3.7831596459583035`*^9, 3.78315980083782*^9, 
   3.78316079822515*^9, {3.7831624601285067`*^9, 3.783162494102844*^9}, 
   3.783163709882825*^9, 3.783166366453264*^9, 3.7831665669797745`*^9, 
   3.783166655679043*^9, {3.7831911714030275`*^9, 3.783191247336479*^9}, 
   3.7831913088068047`*^9, 3.783192636460191*^9, 3.7831929446675997`*^9, {
   3.783193018727408*^9, 3.783193027818966*^9}, 3.783193179147971*^9, 
   3.7831932562431793`*^9, 3.783193343489666*^9, 3.783193461335556*^9, 
   3.783193658649988*^9, 3.783193795386083*^9, 3.7831938847267466`*^9, 
   3.7831940468041677`*^9, {3.7831941143508043`*^9, 3.7831941236485357`*^9}, 
   3.7831944072430525`*^9, 3.7831950018340454`*^9, {3.7831951599932966`*^9, 
   3.7831951756655226`*^9}, 3.7831953096585855`*^9, 3.7831954177102757`*^9, 
   3.7832417324743977`*^9, 3.7832431846534543`*^9, {3.783243640013296*^9, 
   3.7832436564483814`*^9}, {3.7833311305534554`*^9, 3.7833311418539753`*^9}, 
   3.7838397345072727`*^9, 3.7838398083073215`*^9, 3.7838398584188833`*^9, 
   3.783839890542446*^9, 3.7838400173319426`*^9, 3.7838401330522175`*^9, 
   3.783840690743511*^9, 3.783850844885989*^9, 3.7838509205718775`*^9, 
   3.783860623772453*^9, 3.783940516425296*^9, {3.7847080319500265`*^9, 
   3.7847080470885954`*^9}, 3.784708457499934*^9, 3.784708587253621*^9, 
   3.78470869540226*^9, 3.784708740186722*^9, {3.7847087885429688`*^9, 
   3.7847088424746118`*^9}, 3.784709563684412*^9, {3.7847200566997724`*^9, 
   3.7847200706530633`*^9}, 3.784720869808626*^9, 3.7847210940015945`*^9, {
   3.784721285124527*^9, 3.7847213227155247`*^9}, 3.7847214917740593`*^9, 
   3.7847216455507154`*^9, 3.784721721840849*^9, 3.7847218696628532`*^9, 
   3.784738528103218*^9, 3.78488524187362*^9, 3.7848855270745335`*^9, 
   3.784885566987649*^9, 3.7848858402972956`*^9, 3.7848863011718693`*^9, 
   3.7848863600496325`*^9, 3.784886512219963*^9, 3.784967732761732*^9, 
   3.7849682687961087`*^9, 3.7849685802712865`*^9, 3.7849688099888678`*^9, 
   3.784970408819131*^9, 3.7849705362471104`*^9, 3.7850533332369843`*^9, 
   3.7850534154713125`*^9, {3.785058730920721*^9, 3.7850587442715693`*^9}, 
   3.785058812986328*^9, 3.7850598133447638`*^9, 3.7852340649346113`*^9, 
   3.7852343107995763`*^9, 3.786014805869358*^9, 3.786014917815103*^9, {
   3.786014951998384*^9, 3.7860149671583633`*^9}, 3.7944718536006613`*^9, 
   3.794471924896137*^9, 3.7944724331328316`*^9, 3.794472486579007*^9, 
   3.794472631045947*^9, 3.7944727452078714`*^9, 3.7944728194494762`*^9, 
   3.794472878155672*^9, 3.7944729141405096`*^9, 3.7944729867873755`*^9, 
   3.794473042851555*^9, 3.794473091599301*^9, 3.794473134204447*^9, {
   3.794473185626033*^9, 3.7944732145567217`*^9}, 3.7944732614653664`*^9, {
   3.7953329318976746`*^9, 3.7953329425632334`*^9}, 3.795333995972432*^9, 
   3.7953343554484253`*^9, {3.795334421042015*^9, 3.795334444908768*^9}, 
   3.795334587048658*^9, 3.795945225417776*^9, 3.796120000626225*^9, 
   3.796390295873082*^9, {3.7977843798622136`*^9, 3.7977843959561715`*^9}, {
   3.7977845729670043`*^9, 3.797784619577348*^9}, 3.797784765873123*^9, 
   3.7978455043835*^9, {3.7978455362336283`*^9, 3.797845549084798*^9}, 
   3.8139146039576793`*^9},
 CellLabel->"Out[76]=",ExpressionUUID->"94283e73-97fa-40c7-a9d2-e018614b5e53"],

Cell[BoxData[
 TemplateBox[{GraphicsBox[{{{{}, {}, 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[0.007], 
          RGBColor[1, 0, 0]], 
         LineBox[CompressedData["
1:eJwVjnsw1AkAx9kUlw3jXZYTW0R1WuqmG/mekPIo5SzHFZ0MkYTqanthu4SS
mErF6VCiC4s8Ej34LdbKeq/3tnbXY20/R43ezv3xnc/MZ+Yz8139e9S+EIqS
kpLn4v7nq1PUgQKOj8O9F/Ry1zVS3OTLlMJltkg34olaVktxzvBWtoPMCRca
WJ88TKSIdiDlljJvREUUzPgYSBGx10jHRBYMzV7hSMx3Ukz4cx4YymLheDXm
lFAhwYPAszN6Mja2tJj7elVJsFR88IauLAPeE0ZzIg8JfDLYJvue5WPZ6CVq
QvQYIjS0SrNfFyM+Mfh9PUeMssB1k1a+FbjMnL80rySGg02u3tqyGvyQfiL4
mccbWCvmTfM49bAVet49VyyC3vXOvO81XuHL1qaKj1QRqDXMwebKRtD8LS3D
yRHY+e6ilG9qgpHFVw3XiWEc4oxXrhe3oIgZYHd4YAhE/Dv/8UN8MOYTGHPy
QeSMbjT/OvAapfHNBlMrBvHibLL93gYBXmarm9uvGwCv0S7QmdIJSQNlMPVA
P4RTFTsXArqwv8tV/PSqELl97o2hJd2w1vdz+cTrw58Lt6tm5D3Qkq65MG7c
hyNL66MdnRZ933vIw3sRseN2XhlbCFe2bVpKaw+OhrhlyUf6oeXV+lf52h5s
dNe26LQdBDs47e6eK91YduT6uv7oISg2qGhfpnRDHC6bLeAN40llgXJabBd6
82dtb1FHMeyV2ftirhMNnclLVtFFUOdPbDl9phPG2xO9PNpFIAPa6t2/dUBl
T2C/RtQbqDqlqW1K7YDCLddlM00Mq9N1ouSVHbArmmExuGJ8aJ+zLHokgGrB
qunnh8agpWe6ddUuAYbSS37maEkgXCLKSW5sxzaaaQeDIwHtTWNhs3o7vqhl
WaXsluJSumDFyv2vUSdJCHX9KEVN/MndIQ/aoH7ARZSRKUNk3FgoldKGAG6M
vbPLOM57RVv/xOTjR/6Z7ouycbCMPucfr21F9Oa0zVkXJ6B8/PDfzZateHxV
k2VgMwkL1Tslhtd4OMEO/2QmmIQuO/ldnAoPCLM5kH5uCn4MVs+vsS0ILVVO
EVrIkcfclFQx2QzazeK5Yq4cxgv00NjIZnSFczEZMw1KvmBqubwJ+sM1TeU6
Cni0zTtvONGEqrJqQx+OAjdGbwhpS5vg/4eZp/9vb5GTNB7mfI2LpP7QOvLz
WxRFmrGL6FzMBjC8qr+9ReYG85IeMy78R76I45RJOIqtViqv5mL92HU1bVUS
1jpmBX7GXAima73ttEkkuR0vXK7PhYGS1tQpSxJMQe82lioX99dW61N8SMiS
03wTpwhoFCYU8nxJaDZwNz6dIHDS2tM+w5+EAz9nu0JGYKeN+CA9iISyoabp
L2MEprdSH++IIOF9tKSUPkTA1jPIKSWexO2OyO872ghktVv1el8kYXrtSa0q
n4DKvvdhtEQShOpshgOPQC8zOfXxlcW/GiYf/uESYAVV9LffItF1TDf1ynMC
Y+LzRzLvkLjp2K1G1BHwCNm1EJRN4sJdxvOvtQRMwkfos7kkDOLujURVE0ic
flj19D4Ju7A7roWVBGaOxrqxH5L4tkJtWlxBwO/fbcPujxb7wpFWWjmBl7Fq
x3SLSTwR6IwzOQT+A4CmbSw=
          "]]}, Annotation[#, "Charting`Private`Tag$8580#1"]& ], 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[0.007], 
          RGBColor[0, 0, 1]], 
         LineBox[CompressedData["
1:eJwVkWs0lHkcgMdg5q0cpFyStSVdSB3Xbasxv7+Qu0TDZiojrA5STNGZ7oa1
ZWsXuRXbNgqtpRls6GIKqbWWacq45bJD75ibl6EjIdt+eM7z5fn2rD96IjiG
TCKRAr7wv5vP6PWXCxh0G4YPrXN5jzC/AyfF4U7gFfVYZ8+ERHjerKCEjruD
ukQR9Oi1RJhEJ5Rb8BBoYfcfbyiUCOP3r11liUeBqpOXpdgkEY6HC8rMcDa8
CrmNW3t0C8sizk0a41zIOKBoxi+/EepKI/NW47nw9sxK1d7lIiEjl2sZ/OQu
MCuUB+c4z4Xx+ob8ks5qqOCz0quj7ghrImzktmF10FFEb25z5APdnme8qaYR
Imh/nOra8gK2qmfXlQqaIEdmx6g9KwLjbHHp1/rNwDxcFcnmS0CvMXTg1cNW
SOuRlYXdfAfOYT7kWoeXsDI/Jcp9YQSiBbKHdtK/4FAvFmoqHoUXl2fCZdEd
IK/efmrwexxuD2/fsNjfCau9DnvLh8fh2bmrtP0tIjCkGJkxLiqhvdU5woMs
Bt+5xt9oY2roVdR5LzHfQOJOvjFzxyTwevxaYx+8hewNivnlJ6cgY6moflLZ
DfLk/Mm11zWQoNuU5ObeA/NLNQWVTdMQv7eotIbbC2kHuaLh7hlIjPEtVg71
waVt/EKHpQ+w3c9os9hpAKqm+ofXWM4CJSHbpi/pHRwtGEA/bPwI0jhcU94+
CN+g+Nkm+hxI7mqcCvSGYd+5YGm02ydoEV/VNrcegSerPNNSds/DV3syg/y7
RqAVX0OQvRZAZ19En/6Jf+HHFQZRDNdFUPvyPF0spPCtghfU5fEZnH+f5Di2
SUExp2OzxmMJqOXmKmH0KNh6BSbfNyWhdzkPkMBwDPx/3c2vySMhV4t1rx0F
Y0DJ6s5YXKaFFrBi26zA93CItT60laOFno6lxXrNvYc8OstMPK2FVhzxHMkt
xOEjb/FWThQZMduSaR6eMniRankgdYCMdnScfZuOyyC70tfGx1cbJbn84lKc
Pg4zgpaI8T+1UdU1A46pvRzMn7UmXLHRQae5cZ+sRHLA1EPvk2/oIDhmfyTn
vAJsXe65AFUXxfK1sno3K6H3QWCzIkUXWeRXT1e3KWF9H9nEYUgXvYlr+/JK
BQY7ztN2BVCQyWDjy9pVamj/ueQGtY6C6msazBgCNUhYE55UMyoKT7UKCD80
ARvFjaOVXCq60hf7lJifgGV+F93CZFSkYToGNXyegOfb5u8Yyb/0QwvSS1oE
nE6em/5HQUV2o9mYEZWA4JD0BI8JKhKpHoc4GxFAeqLLt/9ARaYkQ8WZLQSY
7/JOo2hj6N6mBhMygwBDjhur3BJD+vfT7reHEUAevTDDWoehlK0BtNxwAlKu
pXLMrTDkbS+NtGYRwL57h3ltI4ZUO/Wq9sYTQFMsYyfbYcgpgOWedZmAin7B
7M5dGCruspWEpBNgOn+qQrMbQzrBH45ZZBJgtcfAr9IVQ5LQq9erfiLguL0o
xsINQxxWXV9XAQFhH2unFr0wNCq9kFB4k4DX9SyHhz4Y8o/xWWKVECA6oTma
6Ichy7ghaw2PgKKyv28NBWIoU1VR/+geAcMFJqX5QRiaTGT7cisIuBgZUBwY
jKHvplwH/SoJkDxOyqQcwNBzNnZydTUBWsyM6CYGhv4D0PhVVw==
          "]]}, Annotation[#, "Charting`Private`Tag$8580#2"]& ]}}, {}}, {
    DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, 
     AxesOrigin -> {Automatic, 0}, FrameTicks -> {{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, 
     GridLines -> {None, None}, DisplayFunction -> Identity, 
     PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, 
     DisplayFunction -> Identity, AspectRatio -> 
     NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, 
     AxesLabel -> {
       FormBox["\"\[Lambda]\"", TraditionalForm], 
       FormBox["\"c\"", TraditionalForm]}, AxesOrigin -> {0, 0}, 
     DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, 
     FrameLabel -> {{None, None}, {None, None}}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLines -> {None, None}, GridLinesStyle -> Directive[
       GrayLevel[0.5, 0.4]], LabelStyle -> Directive[Bold, Medium], 
     Method -> {
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}}, PlotRange -> {All, All}, PlotRangeClipping -> 
     True, PlotRangePadding -> {{Automatic, Automatic}, {
       Automatic, Automatic}}, Ticks -> {Automatic, Automatic}}],FormBox[
    FormBox[
     TemplateBox[{
      "\"\\!\\(\\*SubscriptBox[\\(c\\), \\(0\\)]\\) \"", 
       "\"\\!\\(\\*SubscriptBox[\\(c\\), \\(\\(1\\)\\(\\\\ \\)\\)]\\)\""}, 
      "LineLegend", DisplayFunction -> (FormBox[
        StyleBox[
         StyleBox[
          PaneBox[
           TagBox[
            GridBox[{{
               TagBox[
                GridBox[{{
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[1, 0, 0]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[1, 0, 0]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[0, 0, 1]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[0, 0, 1]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}}, 
                 GridBoxAlignment -> {
                  "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, 
                 AutoDelete -> False, 
                 GridBoxDividers -> {
                  "Columns" -> {{False}}, "Rows" -> {{False}}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {
                  "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, 
             GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
             AutoDelete -> False, 
             GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
             GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], 
            "Grid"], Alignment -> Left, AppearanceElements -> None, 
           ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> 
           "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
          Directive[Bold, Medium], FontFamily -> "Arial"}, Background -> 
         Automatic, StripOnInput -> False], TraditionalForm]& ), 
      InterpretationFunction :> (RowBox[{"LineLegend", "[", 
         RowBox[{
           RowBox[{"{", 
             RowBox[{
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "0.007`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[1, 0, 0], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0.6666666666666666, 0., 0.], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"1", ",", "0", ",", "0"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[1, 0, 0]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[1, 0, 0], Editable -> False, Selectable -> 
                    False]}], "]"}], ",", 
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "0.007`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0, 0, 1], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0., 0., 0.6666666666666666], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"0", ",", "0", ",", "1"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0, 0, 1]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0, 0, 1], Editable -> False, Selectable -> 
                    False]}], "]"}]}], "}"}], ",", 
           RowBox[{"{", 
             RowBox[{#, ",", #2}], "}"}], ",", 
           RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", 
           RowBox[{"LabelStyle", "\[Rule]", 
             RowBox[{"Directive", "[", 
               RowBox[{"Bold", ",", "Medium"}], "]"}]}], ",", 
           RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), 
      Editable -> True], TraditionalForm], TraditionalForm]},
  "Legended",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"], 
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, GridBoxItemSize -> Automatic, 
    BaselinePosition -> {1, 1}]& ),
  Editable->True,
  InterpretationFunction->(RowBox[{"Legended", "[", 
     RowBox[{#, ",", 
       RowBox[{"Placed", "[", 
         RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
 CellChangeTimes->{
  3.782214469890087*^9, 3.7822145063382874`*^9, 3.782214630014892*^9, 
   3.7822148080317497`*^9, 3.7822149635798182`*^9, 3.7822152244400444`*^9, 
   3.782215435268258*^9, {3.7822154937377625`*^9, 3.782215544720903*^9}, {
   3.7822156122594576`*^9, 3.7822156323801775`*^9}, 3.782215951331479*^9, 
   3.7822184751137633`*^9, 3.7822185162662134`*^9, 3.7822185588943057`*^9, 
   3.782218632808107*^9, 3.7822196930539255`*^9, 3.7822199238570204`*^9, 
   3.782221947719692*^9, {3.7822220120433364`*^9, 3.7822220312653465`*^9}, {
   3.78222207922147*^9, 3.782222087115408*^9}, {3.782222119547361*^9, 
   3.78222216372894*^9}, 3.782222482039259*^9, {3.7822225459220853`*^9, 
   3.78222255665739*^9}, {3.7822229593946714`*^9, 3.782222974631442*^9}, 
   3.7822241640173044`*^9, 3.7822243438625016`*^9, 3.7822244250908556`*^9, {
   3.782287941715081*^9, 3.782287975449335*^9}, 3.782288789533774*^9, 
   3.7822906551711903`*^9, {3.7822913081643267`*^9, 3.782291322174583*^9}, 
   3.782296618392045*^9, 3.782297253796118*^9, 3.7823052364891925`*^9, {
   3.7825813621554995`*^9, 3.7825813740335407`*^9}, 3.7825833305841165`*^9, {
   3.7825833764092093`*^9, 3.782583396004898*^9}, {3.782583460894145*^9, 
   3.7825834891651287`*^9}, 3.782583538670022*^9, 3.7825836152701035`*^9, 
   3.782583675860424*^9, 3.7825837163291183`*^9, {3.7825838585338907`*^9, 
   3.7825838867432313`*^9}, 3.782583955494999*^9, 3.782584023067078*^9, 
   3.782584086548361*^9, {3.782584118955905*^9, 3.7825842168279285`*^9}, 
   3.782584299674696*^9, {3.7825843599343443`*^9, 3.7825843812968616`*^9}, {
   3.782584432244983*^9, 3.7825845067106376`*^9}, {3.7825846802976675`*^9, 
   3.782584730735442*^9}, 3.782584784836703*^9, 3.7825848523884544`*^9, 
   3.782584884050439*^9, {3.7825849159656315`*^9, 3.782584949323036*^9}, {
   3.7827568940209928`*^9, 3.782756940758292*^9}, {3.7831533103396225`*^9, 
   3.7831533790577283`*^9}, 3.783153415328582*^9, 3.7831534603661485`*^9, 
   3.7831535288761053`*^9, 3.78315358015679*^9, 3.7831539892648845`*^9, 
   3.7831540193869457`*^9, {3.78315407567104*^9, 3.783154083936883*^9}, 
   3.783154195231228*^9, 3.783154272590616*^9, {3.783154368356549*^9, 
   3.7831543820624256`*^9}, {3.7831544716733007`*^9, 3.783154526515828*^9}, 
   3.783155777834945*^9, 3.7831558816374884`*^9, {3.7831559607021933`*^9, 
   3.783156011920889*^9}, 3.7831561221335077`*^9, {3.783156296765147*^9, 
   3.783156310891715*^9}, 3.783156394806693*^9, 3.7831566421864924`*^9, 
   3.7831582194992313`*^9, {3.783158587610404*^9, 3.7831586417788267`*^9}, {
   3.783158806657195*^9, 3.783158839504523*^9}, 3.7831588901412787`*^9, 
   3.783159161620496*^9, {3.783159429892138*^9, 3.783159469496049*^9}, 
   3.7831595603609877`*^9, 3.7831596459583035`*^9, 3.78315980083782*^9, 
   3.78316079822515*^9, {3.7831624601285067`*^9, 3.783162494102844*^9}, 
   3.783163709882825*^9, 3.783166366453264*^9, 3.7831665669797745`*^9, 
   3.783166655679043*^9, {3.7831911714030275`*^9, 3.783191247336479*^9}, 
   3.7831913088068047`*^9, 3.783192636460191*^9, 3.7831929446675997`*^9, {
   3.783193018727408*^9, 3.783193027818966*^9}, 3.783193179147971*^9, 
   3.7831932562431793`*^9, 3.783193343489666*^9, 3.783193461335556*^9, 
   3.783193658649988*^9, 3.783193795386083*^9, 3.7831938847267466`*^9, 
   3.7831940468041677`*^9, {3.7831941143508043`*^9, 3.7831941236485357`*^9}, 
   3.7831944072430525`*^9, 3.7831950018340454`*^9, {3.7831951599932966`*^9, 
   3.7831951756655226`*^9}, 3.7831953096585855`*^9, 3.7831954177102757`*^9, 
   3.7832417324743977`*^9, 3.7832431846534543`*^9, {3.783243640013296*^9, 
   3.7832436564483814`*^9}, {3.7833311305534554`*^9, 3.7833311418539753`*^9}, 
   3.7838397345072727`*^9, 3.7838398083073215`*^9, 3.7838398584188833`*^9, 
   3.783839890542446*^9, 3.7838400173319426`*^9, 3.7838401330522175`*^9, 
   3.783840690743511*^9, 3.783850844885989*^9, 3.7838509205718775`*^9, 
   3.783860623772453*^9, 3.783940516425296*^9, {3.7847080319500265`*^9, 
   3.7847080470885954`*^9}, 3.784708457499934*^9, 3.784708587253621*^9, 
   3.78470869540226*^9, 3.784708740186722*^9, {3.7847087885429688`*^9, 
   3.7847088424746118`*^9}, 3.784709563684412*^9, {3.7847200566997724`*^9, 
   3.7847200706530633`*^9}, 3.784720869808626*^9, 3.7847210940015945`*^9, {
   3.784721285124527*^9, 3.7847213227155247`*^9}, 3.7847214917740593`*^9, 
   3.7847216455507154`*^9, 3.784721721840849*^9, 3.7847218696628532`*^9, 
   3.784738528103218*^9, 3.78488524187362*^9, 3.7848855270745335`*^9, 
   3.784885566987649*^9, 3.7848858402972956`*^9, 3.7848863011718693`*^9, 
   3.7848863600496325`*^9, 3.784886512219963*^9, 3.784967732761732*^9, 
   3.7849682687961087`*^9, 3.7849685802712865`*^9, 3.7849688099888678`*^9, 
   3.784970408819131*^9, 3.7849705362471104`*^9, 3.7850533332369843`*^9, 
   3.7850534154713125`*^9, {3.785058730920721*^9, 3.7850587442715693`*^9}, 
   3.785058812986328*^9, 3.7850598133447638`*^9, 3.7852340649346113`*^9, 
   3.7852343107995763`*^9, 3.786014805869358*^9, 3.786014917815103*^9, {
   3.786014951998384*^9, 3.7860149671583633`*^9}, 3.7944718536006613`*^9, 
   3.794471924896137*^9, 3.7944724331328316`*^9, 3.794472486579007*^9, 
   3.794472631045947*^9, 3.7944727452078714`*^9, 3.7944728194494762`*^9, 
   3.794472878155672*^9, 3.7944729141405096`*^9, 3.7944729867873755`*^9, 
   3.794473042851555*^9, 3.794473091599301*^9, 3.794473134204447*^9, {
   3.794473185626033*^9, 3.7944732145567217`*^9}, 3.7944732614653664`*^9, {
   3.7953329318976746`*^9, 3.7953329425632334`*^9}, 3.795333995972432*^9, 
   3.7953343554484253`*^9, {3.795334421042015*^9, 3.795334444908768*^9}, 
   3.795334587048658*^9, 3.795945225417776*^9, 3.796120000626225*^9, 
   3.796390295873082*^9, {3.7977843798622136`*^9, 3.7977843959561715`*^9}, {
   3.7977845729670043`*^9, 3.797784619577348*^9}, 3.797784765873123*^9, 
   3.7978455043835*^9, {3.7978455362336283`*^9, 3.797845549084798*^9}, 
   3.8139146040254974`*^9},
 CellLabel->"Out[77]=",ExpressionUUID->"9a43f60f-5e96-4cde-b0db-c1d0f6ee208a"],

Cell[BoxData[
 TemplateBox[{GraphicsBox[{{{{}, {}, 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[0.007], 
          RGBColor[1, 0, 0]], 
         LineBox[CompressedData["
1:eJwVj3k01AkAx9FBZbGO8srKylYoT4btJXx1TTSUY9FS0SE1ZEKbXtSW4Sm6
HLmW7b2ZchU1yNFlm5+jlWXINTGOwW8wY36IjMpa+8f3ff76fN77/niC5RGo
oqSk5Lq4/8m/pP4xj+flMHfO9uWD3xVIaySVmCQN4T5+dG6UAlf003McyD1Y
l6hC5EUqEOZASTeTnnj23Y27pSwFgt3X6RiSJ/ETNRPc4a/AiC8vV5+MwORh
HYmTowK5/tETeiQb4cl6qb3KCiwTH7+vS6ZAkFVe9iJ+Fl4pbEOPVw+x06VD
lJrwGcEaWs9ymopBLT3fkvV4BiX+pqNmPmWQVu9qjOmZhoMlR29jSRVGot8H
lKpOw3x81ojLewNGdaGnB+MT9JJaues1+GhVk/PP3ZyCepV397vyGtDNKwhu
2ySsfZxVSrfVw1FJz3uINolTPEn5FvHfSP9IK0m8PYHa69O+klON0NAQ5AdM
UXjQZ7Fh/mMTjhpX8FK75fgrOsHOnRBA/f1azuOqcTTUWPvvVWnFVR+XUtNy
GbrGypwW/D7gKTtqfnm+FJxORk3Q0zYYrtsV92vBGOIWMismpO3Qv6tWlFYz
ipBlb8J27enEkzEH4fH2EQTTM7kl7C64b3o+OT4vQWjggWxprxCzv6SNMA0k
sGBob2qldWNG9Ilg00ksD0kyFYb1YLQtl9geNwwxk5zKaxAhxmpju/KLIXQ8
nKKlq/fhRuohk27lIRCtCUvWmvSjQOs1neYxiB92x7u5NPeDZTGi9jJDjKWH
/IUarAFYXMCw/sQAxg9w9tkYiPH8FeePFvsBWBdOXLaqE8NWo3zFfHI/VPPW
yqpPDaLGnBtmKe9DT/JTR57WECadQU1wemFvYNRixRsCi6ulmxEhwje1bLPE
g8NoyrFO2HqoB6+HYoL2zw1jxmenXcvqbqw6tq8/JYOE0QbWStasEH514XZ7
90lQdF/WySG6sL0xqi2WlAAMho5eXifCbO7ZZMeOILv6lplxcgeKbmteXmM5
Cr/TuTm0oHb8xmZ+MRaMYtYpao5wawPOWB5LvjKG3fXS/jTjDwh6ppzYtUkK
S80QdVtFCwzSij8V10nx1fGuXLNPgA/MOoyGy5B1z7sk06MZq0VV9aU64zBZ
sWN/vco/qCip1PfijSPrTXJP5ZMG+EYau/oekWNr+4aFe6rvcFMY9Jr6Kocx
R49MOluLKT8rt8p/5SCa7AIvHq2Fb+838TVlCqxp00Jv91psGUxS01alYFNZ
FrhyRy0Espee1toULFKy3tqr1WKNktbYpc0Urpkonjc+qsGjjZWrVbwozF0R
fWGICGgUxBQ0+FBgfg7dliEgcNHc1S7Fl8IQzWNJH0HAyVJ83CSAQsORYJcj
hQRkO9SL6MEUZEwda91IAjTXgD2J1ykUrtckQzUJZDebdXjGUtCJVLj6qxBY
6jFzxiB+sVdy9I7zDB8d3gl3im5R+Dkn7sSqbj4uB5QJm9MX+2eXt+3O5WNQ
fDUkI4vCwfLiaKVMPlwCnRcCcij42Wrfrkjkw5DZazLFoXCavrng+zA+4mX5
FS8eLfprgtPKTvIxERpxgJ2/+Mf+RrGbNx+HJ+1FjMcU5H/WDgw78fE2Qu28
bjGFsPs0ows7+fgPCvx0fg==
          "]]}, Annotation[#, "Charting`Private`Tag$8306#1"]& ], 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[0.007], 
          RGBColor[0, 0, 1]], 
         LineBox[CompressedData["
1:eJwVz3k81PkfwHGGOTA/GyIxyRnlKIzSxrw/JYpoHYufUY7NUUzl2Jb86Eej
LO2WQqRJIiktcoR+qSkj5KfGVY6I0Ljm+/0iGjny298fr8fz75fOL6fdg0lS
UlK//t3/bYil9xdXeLLUyeGx8aMC/vU2kVSYyBIkPVb721oF/AT17FsskR2s
5D3aql0p4EeyiGkjkQeYO+X92J0o4Ie7aapoiY5B2ruhfSe1BPwJdsU9dVE0
yPvXHQtkN/Dv+cfPqIq4oHh2ttH+3Qs+eSQwa70oA/yjXnWg0qd8zwyulnv9
XdiEK61MG5bxwxXXPbr1tgyuob60YqnL/Er/rZPbvKtB4vFia+LCTWDtKFDd
UvkEVFy/CU47VIIxJtEurHgOjm3RLvmJ9aB6tbNws2IDtH03X+QUCYD+xOtD
S00j/MziJM4KW4Dp7UiqMm+GYvMkYXrKGwiqGK8xGXkNJ0Knrjg5dMCrpHn2
eFAbXLT9sO9wZhfcHjLTW+1/C3aGQkWa8B28iE+zcRO0A4abnT1o2QutjUz/
/aROYGiJlmJO9EPvVPXBNd8u4DT027P+OwAFPYcaQ8u7Qe0iJTh28xBcWLtR
OzP9DsovNiwEFw0Dh/w8cq9dD6ywn++c6fwE4Q43Ciu5vTD+F7U2DhuBU8FO
vOmPfTAztmJdojMGZoeUDTstP4BPqN+SqcdnoHCubu2LHIBOwsflXrQIRsJE
c8Wtg9CmbXRGt2Ic3t+ds8ymD8Eiz+/kzMcJEHSmyWjoD4PqN+3EdvoUbNqX
4uosHAaWcNeg2ZFpkP3Jv0/x9CewqEdaz2+JAXMqsLdijEDep466zWQcmCUz
cRZNIyAgqUuKogigFmuI+UGjYMZSrncPm4GBa+WoYt0YLHPtjsVazIItQ7vD
omIM1KpsIg2+zsIKjbft0uHPkK93dOkcfw6ejZ0PPfDtM+wxC885eO8LKPjZ
D2fkiKC8OKBwMW0efJuibPbbj0Pcw1PW4xkLsKvtX93JonHgufEU5fK+QqRV
uhUveQJi1kc+raqVQOmfP8Rt2DEJXzMNiiZkv8EZbtiSbvskzPjYG233XQI4
vsPvWsIUXFfDWySSZQh9JH2p13AaINdaR71hFRjXy76UNU2DghYtPebBGnSF
NcFklBgu3W7RyKFKI5616ATnjBgYMUHMGLo0CqFQMokYMYS5Wf7uoySNFu/Y
TyzEi6E2YBIz1JRGjL7GdFKKGLIyb28Wm0mjoAOCT5o3xXBUcPaOqrc0mtd7
wT0sEMP0VEi9fIk0Uht80lylgsHte/MGyb4kxOlddd6mhkHWsEnJrkASEnTt
7cxXx6A2zy2SCCGhiNbXA39uwuBLj85QeBQJtdb2zYYaYhBmEN+fk0pC5659
02TswcB0286kljoSEh3YHZH8Cwa8m9UJJRoyyMYuYWEpCIMkhoLNnLYMymC9
jIsMxSAi9Y4cGMogZOV4wY+DgS47gRi3lEG5uj651r9hkJ//sCrGRQYdXo1t
FKdioLhX71lWkgyqraxT96zAADS5G2VxGdTqk2YqXY1BpuEeYeaCDBqQOrKv
tAYDu2JqucmqDCL9tBZOrscghSpgRNFlkfO0Pf9xEwZHKq0onsayaFivK1ht
AAOB3TLjYpgsomVhlT0UHLT9NlrP47JIw4bfzJXD4d/nY4q4EllkOpo+sJ2O
A8E4s6gpRUbu5kzK70o4qK+zTA9VIiPemzgfawYOP6Zqe3GYZGROoUndMMfB
NE3fYU88GbFjdF3YR3DI8x97GaFCQaN/jBb0+uEwaCLiZDMoiFNwd9ErEIcr
ihcnmg0oKOHNlrseITg8PqBy08GagvL1jJedI3BwTTNbqj9KQSKh5QNIxuHq
Rp/SvBIKijKyJxv8hcN9pYS7r52paNmW4ltYhkP3mNyYmzcVJXs0P9KpwGHX
cdYDUSAVZZ1zPKJVg0NPLtlkZwwV1XW7VG14gUMb7aTkdAEVfU/0CpTv/vuX
udoWskxFqX2hz4hlHH5d1b/MrKOhOV8L17rvOJxKZF9aeEVD7I8rI4nSBOSG
tX9v7aIhk9GrNGUqAVH7d2lWEzTULn7qwVQmwOEfrA0XjOTQBql1U7FGBGw6
enzLz3lyqGhLnRrJk4Afatdbh/DkkeKD8w9avQlgvw2xMimVR78Zu9hksAlw
YjyUKD6XRwd3jATqBxCQ1eG02WRYHol300sdwgmQ1TLIfmuggCxdAuwuJRGw
vcVWQq5VQDzhtvceyQQ0e7haCF4rIFn3heOMFAJI35WZhQMK6L1X2uXSPwjY
XYAfeEOio7iA6j5hNgGnqQL79650NDpyjpOTS0DAFSarJoiOnIMd1wJuEWDs
Vl9SH0tHWmEf9ecKCBAyuodYd+goRXy/9j9FBDSt6JY9fUxHM6einbj3CWgz
0V0JaKWjf87aDh56SMCz9jfu24fo6GU0LWJ9GQH4cpmt4Twd/Q/oJ3ad
          "]]}, Annotation[#, "Charting`Private`Tag$8306#2"]& ]}}, {}}, {
    DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, 
     AxesOrigin -> {Automatic, 0}, FrameTicks -> {{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, 
     GridLines -> {None, None}, DisplayFunction -> Identity, 
     PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, 
     DisplayFunction -> Identity, AspectRatio -> 
     NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, 
     AxesLabel -> {
       FormBox["\"\[Lambda]\"", TraditionalForm], 
       FormBox["\"F\"", TraditionalForm]}, AxesOrigin -> {0, 0}, 
     DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, 
     FrameLabel -> {{None, None}, {None, None}}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLines -> {None, None}, GridLinesStyle -> Directive[
       GrayLevel[0.5, 0.4]], LabelStyle -> Directive[Bold, Medium], 
     Method -> {
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}}, PlotRange -> {All, All}, PlotRangeClipping -> 
     True, PlotRangePadding -> {{Automatic, Automatic}, {
       Automatic, Automatic}}, Ticks -> {Automatic, Automatic}}],FormBox[
    FormBox[
     TemplateBox[{
      "\"F =\\!\\(\\*SubscriptBox[\\(c\\), \\(0\\)]\\) \
\\!\\(\\*SuperscriptBox[SubscriptBox[\\(\[Kappa]\\), \\(min\\)], \
\\(\\(-1\\)/3\\)]\\)\"", 
       "\"F =\\!\\(\\*SubscriptBox[\\(c\\), \\(\\(1\\)\\(\\\\ \
\\)\\)]\\)\\!\\(\\*SuperscriptBox[SubscriptBox[\\(\[Kappa]\\), \\(min\\)], \
\\(1/3\\)]\\)\""}, "LineLegend", DisplayFunction -> (FormBox[
        StyleBox[
         StyleBox[
          PaneBox[
           TagBox[
            GridBox[{{
               TagBox[
                GridBox[{{
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[1, 0, 0]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[1, 0, 0]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[0, 0, 1]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[0, 0, 1]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}}, 
                 GridBoxAlignment -> {
                  "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, 
                 AutoDelete -> False, 
                 GridBoxDividers -> {
                  "Columns" -> {{False}}, "Rows" -> {{False}}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {
                  "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, 
             GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
             AutoDelete -> False, 
             GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
             GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], 
            "Grid"], Alignment -> Left, AppearanceElements -> None, 
           ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> 
           "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
          Directive[Bold, Medium], FontFamily -> "Arial"}, Background -> 
         Automatic, StripOnInput -> False], TraditionalForm]& ), 
      InterpretationFunction :> (RowBox[{"LineLegend", "[", 
         RowBox[{
           RowBox[{"{", 
             RowBox[{
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "0.007`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[1, 0, 0], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0.6666666666666666, 0., 0.], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"1", ",", "0", ",", "0"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[1, 0, 0]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[1, 0, 0], Editable -> False, Selectable -> 
                    False]}], "]"}], ",", 
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "0.007`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0, 0, 1], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0., 0., 0.6666666666666666], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 1.35 CurrentValue["FontCapHeight"]/
                    AbsoluteCurrentValue[Magnification]}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"0", ",", "0", ",", "1"}], "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0, 0, 1]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0, 0, 1], Editable -> False, Selectable -> 
                    False]}], "]"}]}], "}"}], ",", 
           RowBox[{"{", 
             RowBox[{#, ",", #2}], "}"}], ",", 
           RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", 
           RowBox[{"LabelStyle", "\[Rule]", 
             RowBox[{"Directive", "[", 
               RowBox[{"Bold", ",", "Medium"}], "]"}]}], ",", 
           RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), 
      Editable -> True], TraditionalForm], TraditionalForm]},
  "Legended",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"], 
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, GridBoxItemSize -> Automatic, 
    BaselinePosition -> {1, 1}]& ),
  Editable->True,
  InterpretationFunction->(RowBox[{"Legended", "[", 
     RowBox[{#, ",", 
       RowBox[{"Placed", "[", 
         RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
 CellChangeTimes->{
  3.782214469890087*^9, 3.7822145063382874`*^9, 3.782214630014892*^9, 
   3.7822148080317497`*^9, 3.7822149635798182`*^9, 3.7822152244400444`*^9, 
   3.782215435268258*^9, {3.7822154937377625`*^9, 3.782215544720903*^9}, {
   3.7822156122594576`*^9, 3.7822156323801775`*^9}, 3.782215951331479*^9, 
   3.7822184751137633`*^9, 3.7822185162662134`*^9, 3.7822185588943057`*^9, 
   3.782218632808107*^9, 3.7822196930539255`*^9, 3.7822199238570204`*^9, 
   3.782221947719692*^9, {3.7822220120433364`*^9, 3.7822220312653465`*^9}, {
   3.78222207922147*^9, 3.782222087115408*^9}, {3.782222119547361*^9, 
   3.78222216372894*^9}, 3.782222482039259*^9, {3.7822225459220853`*^9, 
   3.78222255665739*^9}, {3.7822229593946714`*^9, 3.782222974631442*^9}, 
   3.7822241640173044`*^9, 3.7822243438625016`*^9, 3.7822244250908556`*^9, {
   3.782287941715081*^9, 3.782287975449335*^9}, 3.782288789533774*^9, 
   3.7822906551711903`*^9, {3.7822913081643267`*^9, 3.782291322174583*^9}, 
   3.782296618392045*^9, 3.782297253796118*^9, 3.7823052364891925`*^9, {
   3.7825813621554995`*^9, 3.7825813740335407`*^9}, 3.7825833305841165`*^9, {
   3.7825833764092093`*^9, 3.782583396004898*^9}, {3.782583460894145*^9, 
   3.7825834891651287`*^9}, 3.782583538670022*^9, 3.7825836152701035`*^9, 
   3.782583675860424*^9, 3.7825837163291183`*^9, {3.7825838585338907`*^9, 
   3.7825838867432313`*^9}, 3.782583955494999*^9, 3.782584023067078*^9, 
   3.782584086548361*^9, {3.782584118955905*^9, 3.7825842168279285`*^9}, 
   3.782584299674696*^9, {3.7825843599343443`*^9, 3.7825843812968616`*^9}, {
   3.782584432244983*^9, 3.7825845067106376`*^9}, {3.7825846802976675`*^9, 
   3.782584730735442*^9}, 3.782584784836703*^9, 3.7825848523884544`*^9, 
   3.782584884050439*^9, {3.7825849159656315`*^9, 3.782584949323036*^9}, {
   3.7827568940209928`*^9, 3.782756940758292*^9}, {3.7831533103396225`*^9, 
   3.7831533790577283`*^9}, 3.783153415328582*^9, 3.7831534603661485`*^9, 
   3.7831535288761053`*^9, 3.78315358015679*^9, 3.7831539892648845`*^9, 
   3.7831540193869457`*^9, {3.78315407567104*^9, 3.783154083936883*^9}, 
   3.783154195231228*^9, 3.783154272590616*^9, {3.783154368356549*^9, 
   3.7831543820624256`*^9}, {3.7831544716733007`*^9, 3.783154526515828*^9}, 
   3.783155777834945*^9, 3.7831558816374884`*^9, {3.7831559607021933`*^9, 
   3.783156011920889*^9}, 3.7831561221335077`*^9, {3.783156296765147*^9, 
   3.783156310891715*^9}, 3.783156394806693*^9, 3.7831566421864924`*^9, 
   3.7831582194992313`*^9, {3.783158587610404*^9, 3.7831586417788267`*^9}, {
   3.783158806657195*^9, 3.783158839504523*^9}, 3.7831588901412787`*^9, 
   3.783159161620496*^9, {3.783159429892138*^9, 3.783159469496049*^9}, 
   3.7831595603609877`*^9, 3.7831596459583035`*^9, 3.78315980083782*^9, 
   3.78316079822515*^9, {3.7831624601285067`*^9, 3.783162494102844*^9}, 
   3.783163709882825*^9, 3.783166366453264*^9, 3.7831665669797745`*^9, 
   3.783166655679043*^9, {3.7831911714030275`*^9, 3.783191247336479*^9}, 
   3.7831913088068047`*^9, 3.783192636460191*^9, 3.7831929446675997`*^9, {
   3.783193018727408*^9, 3.783193027818966*^9}, 3.783193179147971*^9, 
   3.7831932562431793`*^9, 3.783193343489666*^9, 3.783193461335556*^9, 
   3.783193658649988*^9, 3.783193795386083*^9, 3.7831938847267466`*^9, 
   3.7831940468041677`*^9, {3.7831941143508043`*^9, 3.7831941236485357`*^9}, 
   3.7831944072430525`*^9, 3.7831950018340454`*^9, {3.7831951599932966`*^9, 
   3.7831951756655226`*^9}, 3.7831953096585855`*^9, 3.7831954177102757`*^9, 
   3.7832417324743977`*^9, 3.7832431846534543`*^9, {3.783243640013296*^9, 
   3.7832436564483814`*^9}, {3.7833311305534554`*^9, 3.7833311418539753`*^9}, 
   3.7838397345072727`*^9, 3.7838398083073215`*^9, 3.7838398584188833`*^9, 
   3.783839890542446*^9, 3.7838400173319426`*^9, 3.7838401330522175`*^9, 
   3.783840690743511*^9, 3.783850844885989*^9, 3.7838509205718775`*^9, 
   3.783860623772453*^9, 3.783940516425296*^9, {3.7847080319500265`*^9, 
   3.7847080470885954`*^9}, 3.784708457499934*^9, 3.784708587253621*^9, 
   3.78470869540226*^9, 3.784708740186722*^9, {3.7847087885429688`*^9, 
   3.7847088424746118`*^9}, 3.784709563684412*^9, {3.7847200566997724`*^9, 
   3.7847200706530633`*^9}, 3.784720869808626*^9, 3.7847210940015945`*^9, {
   3.784721285124527*^9, 3.7847213227155247`*^9}, 3.7847214917740593`*^9, 
   3.7847216455507154`*^9, 3.784721721840849*^9, 3.7847218696628532`*^9, 
   3.784738528103218*^9, 3.78488524187362*^9, 3.7848855270745335`*^9, 
   3.784885566987649*^9, 3.7848858402972956`*^9, 3.7848863011718693`*^9, 
   3.7848863600496325`*^9, 3.784886512219963*^9, 3.784967732761732*^9, 
   3.7849682687961087`*^9, 3.7849685802712865`*^9, 3.7849688099888678`*^9, 
   3.784970408819131*^9, 3.7849705362471104`*^9, 3.7850533332369843`*^9, 
   3.7850534154713125`*^9, {3.785058730920721*^9, 3.7850587442715693`*^9}, 
   3.785058812986328*^9, 3.7850598133447638`*^9, 3.7852340649346113`*^9, 
   3.7852343107995763`*^9, 3.786014805869358*^9, 3.786014917815103*^9, {
   3.786014951998384*^9, 3.7860149671583633`*^9}, 3.7944718536006613`*^9, 
   3.794471924896137*^9, 3.7944724331328316`*^9, 3.794472486579007*^9, 
   3.794472631045947*^9, 3.7944727452078714`*^9, 3.7944728194494762`*^9, 
   3.794472878155672*^9, 3.7944729141405096`*^9, 3.7944729867873755`*^9, 
   3.794473042851555*^9, 3.794473091599301*^9, 3.794473134204447*^9, {
   3.794473185626033*^9, 3.7944732145567217`*^9}, 3.7944732614653664`*^9, {
   3.7953329318976746`*^9, 3.7953329425632334`*^9}, 3.795333995972432*^9, 
   3.7953343554484253`*^9, {3.795334421042015*^9, 3.795334444908768*^9}, 
   3.795334587048658*^9, 3.795945225417776*^9, 3.796120000626225*^9, 
   3.796390295873082*^9, {3.7977843798622136`*^9, 3.7977843959561715`*^9}, {
   3.7977845729670043`*^9, 3.797784619577348*^9}, 3.797784765873123*^9, 
   3.7978455043835*^9, {3.7978455362336283`*^9, 3.797845549084798*^9}, 
   3.813914604100298*^9},
 CellLabel->"Out[78]=",ExpressionUUID->"ec972c9b-0fee-435d-91f2-4679034ffa99"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"c0Data", " ", "=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\[Lambda]", ",", 
       RowBox[{"c0", "[", "\[Lambda]", "]"}]}], "}"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"\[Lambda]", ",", "0", ",", "0.99999", ",", "0.05"}], "}"}]}], 
    "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"c1Data", " ", "=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\[Lambda]", ",", 
       RowBox[{"c1", "[", "\[Lambda]", "]"}]}], "}"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"\[Lambda]", ",", "0", ",", "0.99999", ",", "0.05"}], "}"}]}], 
    "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"form", "[", "\[Lambda]_", "]"}], " ", "=", " ", 
   RowBox[{
    FractionBox["A", 
     RowBox[{"B", " ", "+", " ", "\[Lambda]"}]], " ", "+", " ", "S"}]}], " ", 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"c0Params", " ", "=", " ", 
  RowBox[{"FindFit", "[", 
   RowBox[{"c0Data", ",", 
    RowBox[{"form", "[", "\[Lambda]", "]"}], ",", " ", 
    RowBox[{"{", 
     RowBox[{"A", ",", " ", "B", ",", "S"}], "}"}], ",", " ", "\[Lambda]"}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"c1Params", " ", "=", " ", 
  RowBox[{"FindFit", "[", 
   RowBox[{"c1Data", ",", 
    RowBox[{"form", "[", "\[Lambda]", "]"}], ",", " ", 
    RowBox[{"{", 
     RowBox[{"A", ",", " ", "B", ",", "S"}], "}"}], ",", " ", "\[Lambda]"}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"c0", "[", "\[Lambda]", "]"}], " ", ",", 
       RowBox[{
        RowBox[{"form", "[", "\[Lambda]", "]"}], " ", "/.", " ", 
        "c0Params"}]}], "}"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"\[Lambda]", ",", "0", ",", "0.9999"}], "}"}]}], "]"}], ",", 
   " ", 
   RowBox[{"ListPlot", "[", "c0Data", "]"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Show", "[", 
   RowBox[{
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"c1", "[", "\[Lambda]", "]"}], ",", " ", 
        RowBox[{
         RowBox[{"form", "[", "\[Lambda]", "]"}], " ", "/.", " ", 
         "c1Params"}]}], "}"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"\[Lambda]", ",", "0", ",", "0.9999"}], "}"}]}], "]"}], ",", 
    " ", 
    RowBox[{"ListPlot", "[", "c1Data", "]"}]}], "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.7959452188741336`*^9, 3.7959452192772093`*^9}, {
  3.796120004787733*^9, 3.796120072005212*^9}},
 CellLabel->"In[80]:=",ExpressionUUID->"b6b3df82-bb04-4b75-90c2-4822cb97152f"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"A", "\[Rule]", "0.40156232674312964`"}], ",", 
   RowBox[{"B", "\[Rule]", "0.3608666363924336`"}], ",", 
   RowBox[{"S", "\[Rule]", 
    RowBox[{"-", "0.11622819122358424`"}]}]}], "}"}]], "Output",
 CellChangeTimes->{3.7953343697158833`*^9, 3.7953344317206726`*^9, 
  3.7953344680187054`*^9, 3.795334596509957*^9, 3.795945235173668*^9, 
  3.7963903110654497`*^9},
 CellLabel->"Out[83]=",ExpressionUUID->"2b6f0152-833a-45ac-a6bf-9c213a4cb9b1"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"A", "\[Rule]", 
    RowBox[{"-", "2.484114434188893`"}]}], ",", 
   RowBox[{"B", "\[Rule]", "0.7018835340998008`"}], ",", 
   RowBox[{"S", "\[Rule]", "3.2750969417696245`"}]}], "}"}]], "Output",
 CellChangeTimes->{3.7953343697158833`*^9, 3.7953344317206726`*^9, 
  3.7953344680187054`*^9, 3.795334596509957*^9, 3.795945235173668*^9, 
  3.796390311085396*^9},
 CellLabel->"Out[84]=",ExpressionUUID->"f884e0bc-1e3a-41d5-a928-6c3c88668dc4"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
       Opacity[1.], LineBox[CompressedData["
1:eJwVk3k41HkAxidSIUdG2pEtgw7ts2mUJMarmq2ombWlFKVTOqhcnVsheTSh
aKVlV3KMUiQ7urCuqd8kV8PMoIxb42i+RWtRWPvH+7zP57/3+TzPy9x/You3
Go1G407m/xatr7dh9WxzbGTSzWgigrs8E6EnYwWMx4/nPyskGG5/3mbF4MDh
7J3BwHwCi+zIYQbDDTZP5h8bEBCsNvikrsc4CPPVtkw9PsFLUdpVTUYQjMM8
Q1+5EmglX6icxgiHs/aMUfNWFbL5vX4ajN+QWs4Vbp2mQvmF5GM+n9NxQbPZ
VcTtx3Vdoe/57x/hUdt3c8qkvVCFRq5lXxNC9C8t+mpYD4Ze2CxQDT6HaNbC
w0orJZaaMnJW0orh7lO9OnzmB3TdLVq/w6EMeYKv4hJlF+qinL7V9IlgY7i9
gtnaicZoRTjdj0JDXFdKw2gH9FUFz05YVOD20i1nLtM74HVQWJyQXQnfqoBP
Li7tqPrrYtSoZQ0sXu0OS4xtw0oWR81eVQu/Ph0DfVkr4m7KMr2WSVCiEM82
tm5FRMaMtJjoOtww8ZEWGrVAK918yq7OejTrazmXdTQj8cfKjXoWMgiMDYKt
ZO9Rfsiwu/qiHHVBdMeEsncYXtLrG1TWgKts0fKemia8TN7jvJDZhICobMtb
8kaYTRRFBp99h9xcuxnnPjfgWu/9x1kv3uOBwijVbGEDoq/YLOs3UmDvvKBI
s21yJD3g3abvasHGEeX2qX/IYLLnHsuX2wrHARd7ZyKFrdNIqdtoKwI4HwK0
2VI0dOtvyE1qw9Pzh7YUJtfjJ+/hodhJD9/SnjLdvtZhdKfbjrVD7WDv22qZ
tr9u0uvpHO9bHahcHHXpUZMEDoIjVnqcTpz1mK6l4Erwesws44fuTmiaB6qc
at8i+Y1rpdGVLpioubDWebyFkz9vXiSrGzcW8R7eb6mFz3sDb19JN5KPfY2Y
HVALz/mZMlnIB7iGWPAcaLWQLlJjC82VqLZcZZy8ogYJgrdue8uVyE8JT4wI
qsaCsZMJcSd7EN/0JfzAwyrYMeTVtga9WMccONkzXAmGjg7rQGkvXDMZ6kPs
Sqw5/ZSz268PicetrTKi34AIFnMrdPqx8R3/oQupwNGcIyFFBf0YrB6c2e88
yef975l7fYRhYFiBVf5r5P39MXTH2EdQuY9XHV38GlSjXQQ9SwUqP7NdN16M
/S82X1qziUB6ZKrDLn0x8tw3WM/iERRRHsrZumKo/7Omq3XyJxn2xf012mKk
W9luCtlOUMg/PMaZLkZ3OnNO8T6C0EBHh+XjFI5eH8pxOEMgHtA2Ne2nEHAw
RWGbQYAeyRR7MYWyKUmx0+8RxMRVRU28pEC/E8+RZxHkBcf7icopCBv5Wady
CUzXbVj2czGFIV7wqfwCgpKba58dfkLhnJ2L7nLJ5N4GVvmDdAoVMk6pmpQg
erAkNTiVwtwgBEnkBE2b1eVIoVCYs6LJv3mSf9nHliZRGDefL8hVEtjOvTWh
fpMCr5SxM6SPIFNDEVZ7g8IdL8OZrioC94KtHn/GUHD6XTOADBLotfhqrOJT
iF05dUHxEAFXoN2oEUmhvW5cHjNCQDe7Tqu/QsHaf4Tv9Y3g9hL3X1MvU7is
+4W9dIJgludmF/9QCv8BGudocw==
        "]]},
      Annotation[#, "Charting`Private`Tag$6839#1"]& ], 
     TagBox[
      {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], 
       Opacity[1.], LineBox[CompressedData["
1:eJwVlGs01HkAhpmy0iGFVdPadSul3dQkrBavNFubYbI1taxSySVipUTlsmO7
HIRKtZLOpMWQcklqK8kR5h/GpcEMyp3JZcwvl+YYR6z98J7n6/PhOa+xd8he
X5qKiorrwv5n1c4WK8bwfgdO3A55YT/BfbZBiSd9K8zircMn3hNM973o3URn
wiRb/PuPLQRr8uOm6XQOOENejIYqgm06nxZp031wPu612JhPUF2VGa9BD8MB
5R4T/wCCpbxo4Vf0i3jGqV/lOSFHfsJIsBr9JjqiirXOaclRGc074T+eBb8x
HXr6DhmuLisJivy2EPJdvcPCihHIY+Oc7K+UwNs6otolYBiKl1Zr5ZMvkJLf
VRSsNwQLI3qBtUo5wnLuspjjUgzeL9vpbvcGZ83vJkY1DqI50XG2cbQKOmqr
PKZrBtCe1HVRN5hCm9P8NZuhfiyXlz4PWVMLml3OjL5aP7x8SspT84VwVjZk
j6EP9U9iEmfMG+E2yzzEuNILawaT9pO8CX7q7V61zT1IuSHO8dosgtGT1bER
lj24nL0kMzmpGfO3Y1e9MurG0ixT1YMDLXhoHzmxcaoTdzYKf9FeI0bIWzXT
kdEPqPTTkzbESFCm6pDG7nyP6Q0jQWFv2mAeJREnyjtQzTu828y4A094wdqF
ynaYzJfFnTn3HjeuTvEt9NtxZeTB47yXH1Al1Dmd6tKGpEtWm2X6XaCEfz2t
jpIg/SH7tu7Bbgh/fZppUCWGweFcRpBrD9R7Ml85rhTDxlFZwZnpwTZLtTAn
n1a0SZfvKkrvReOjJeySqhb87DutuO7ch2vJLOdjhi2Y8eC4Oyn60CetjHK+
2AwrvYgC37/7YX7E6hlfKYIdP2CTNnMAx/eNrogIEKHmi0n299IBaDpzTuwZ
egdenZtQ/9IgDtXfoXP/eAfHUPZ3cQwpmtsbDXxJE/w/6PgGiaSI2uPXx4pu
gqdhjljM/Qj2TFHutq+a0LqOZl9iOoTLWkmVrtaNSOW/4xypHIKZktd9/0QD
1n45mZpychje6dyBS6n1sKVLGmx0RnC3QfNoaJsQdC0txrGFrlJihnWjlwux
PeJf5qHgUdilRdrT9tWB8Ne71mrJcK3OjqaVW4vAggBuWakMGzrzvn48VYPA
yNBcU68xOAQsLuTtrUHx67FY9y9jEKcoDROevwXVbntZN0+O4yzfwFj9t/B+
6fLndhaBnGWnN3yBQvFvu7asYBP4pOfu9omlsOjz9sEeNwJR8oPm7hgKWZts
WNwDBCltZoOScxSkWcYry48S3PzBYbYuhELgVUWB3VkCdqm/rNKTwimfjC6b
bAJ3HnV0wpLCG9X06+q5BJ+KuzXOMijo3rvFlOQR6HhwF89ZUChpT8gLLyJw
mVo9vnQDBQX7TPjTUoL18ZPZ640onLd1XmYpIpDJNp88rUmhVsysoLUSBIrY
tnMaFL4JQ5hIQvDo1ud98eoUXhVs7QjtJGB68KIzaBTmTA35RUME/K3/ZIim
BWBX0D24owR+LJepwwoB7nnpabrJCbrGVdLGJgVwTNM4RSYJwvVYrRpEgOvW
i9eWKwgUGyuCbssE6GuekyQrF35oxaL960YE2BKqTPCaXfCnqyY/+yjAhWVT
9hbzBMKMhyt3DgrwH+6Xc2M=
        "]]},
      Annotation[#, "Charting`Private`Tag$6839#2"]& ]}, {}}, {{}, {
     {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
      0.012833333333333334`], AbsoluteThickness[1.6], PointBox[CompressedData["
1:eJxTTMoPSmViYGAQAWIQDQMHZK87Mhx5bz9rJgistOdn4otePPc1lL/Tfn69
sL6S6wt7E2MQOGzPcCj7W2z7U6j8Sfu8d2suRjg8toeYdsF+yonrHpJhD6Hq
L9vnSvlJfsy6b5+eBgLX7PUdpSzVFtyB6r9pH3hkX9U101v2Z8+AwB37GpHt
Tt+lbkDNe2BvrvK7XtXpGlT9Q/uAi5En9yy4AjX/sb16c/o5fb3LUP1P7O82
Nz3ufXwRat8z+5eBnrYauy9AzXthH3cwZMLshPNQ817a11xZtVuv7izUvNf2
70KWf68/cRpq3ht7y56E49xWp6DmvbNPPqN3Q+XcCXsAeTeUdw==
       "]]}, {
      {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
       0.012833333333333334`], AbsoluteThickness[1.6]}, {}}, {
      {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
       0.012833333333333334`], AbsoluteThickness[1.6]}, {}}}, {{}, {}}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0.17887188106329288`},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0, 0.9999}, {0.17887188106329288`, 0.9965438512410949}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.7953343697158833`*^9, 3.7953344317206726`*^9, 
  3.7953344680187054`*^9, 3.795334596509957*^9, 3.795945235173668*^9, 
  3.7963903112828674`*^9},
 CellLabel->"Out[85]=",ExpressionUUID->"e79edc4d-bcb2-48a1-a9cd-318735c1195a"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
       Opacity[1.], LineBox[CompressedData["
1:eJwVjnk01AkAx5nKRkyHYqfsdlCbejnK8RT7dUzYioicrSIqokxvVHikokfC
o1KxjY7BOKOmhDTPtXKsGJqpyBWzDOZHmGbkx9o/vu/zPn99vpv9zh8JoCgo
KDgs7n/W2XYaG44c/d29QinAXMznPXbU4nrTjOA7RTWSNPN5soHyfn0aHXJC
sKygiM/TKYqX0WiuMHy8/v5+Bp+3d83EkpU0fzApT+tJWTuvvu5pgjKNCXOB
Qz1TpZ2nwopqUaLFYgeMktlBrbyim+KQZbQ70Og2GFJ0aeDVRrHOnp5k49or
RbpksJSXQuUGR/7yDDMbWEdfKGVCcjXe2iKRi7kmP8a1TVWQVhhvlUyVI962
iprb1gi9TbRiEwUeCvYmlK1vbsfQ4ypbD/MaBLh5nSXfCNBxy3Lu/WgdtJLC
fk6068KnpJ5Y9ZAGnNipnG5P78UqSeXr8zpNiJyoLL9T2A8ffy7vXlELytpU
G/ZEfMU/L6Jvzeq+x7PLuk1l24dgYkin7JO0YSZyNzVpSIS024JcHwM+DqV2
8QoYw7iRvfxpclIHNMXdWm6qYqiwtRWPDXZCaFMzbJ88ioxdLfYrdQQ4o5/B
NBseQ+2ptaLWaCEY2QuccGcJZDvEwcyaj/BzfsJ8kk6gnnX8j22bP+OtUnhI
eNgEtixUxYeFdyFwVEBMaEwiUZxXml/RjcK8SAcZZxJJccYGYxo9sFGLms+1
/obMAsf76sd60ZwQ8WpD6zdoHecYBjv04YBeXZ+DyxRMLeXVrrN9GL/MqN3S
N4WPolV2JZn9SD85fc7zxDT2B8ikqQcG4JS4ML5ieBqznq4e1tIBLF3h+1Ev
aAbGay8VB6R/xb2cbdVzfTMwzwnUX0kfROf7bxyD41I0kluyd4oGoRsXYlvI
l4LV7NSiETeEvz5XeHRafYclw/HXeEMRQv29bexef8fp7jUBwXwRvNhnDvfq
yOC9MVcgiPkXsZknlVn3ZfjwG8WCqz2Md9Qu9gRFvthtdz1RO4yOV1d2sgLl
2EqG3ksLHYF9aVrlUaEcZjRhq+kaMfqzwx5amc+CpqZmeLJajK+bfrhrcmZh
damM/mfIKEa+V1OjVv0AkbPdoUltDF0LJtZZoT8QVBwYU1U5hubGUFmycNEj
GRxtn3FklF5RiTaZw/O341c9yHGUHOm5ez1tDg2fzG6o50twqvS2076ZOfhV
HLpidZDAtka6grsTiefudrtXOxJ4mBRcMOpMYsmM1VCfE4GM9HmbGBcSbH3T
gzFuBNoo5y3y3EiI2Js1eb4E3CJ6nWePkQhKkRabXyZQZylZ8iCQxAX/Rz2m
2QT2v1Fjv7tGokYxM/UnDoHb81KKdywJ9ay7dGE+AVor9/B4HAnup5v5F0sI
3FCufL46gYTUMeziy0oC2sYOWZ4pJCLMDlD38AnoXvVZJ8ok0SSgV1M+END8
ss7l0kMSG5hg8oUEzrI+RC/PIvGm2Ogz48vi/5qIRzuekJjX3phTMkyAm/FS
9RyHhGM1zTNmlEChh3LlfB6JLJ+1qk4SAiO50e4pBSQsHyhfIKYI7HLv9iop
JpFqsnQrT0qgVvSu2rKExEDHvDBZTuDv5YMa7aUkdjPkN33mCAyVb/fyfUHi
OnXaQm+BwJ0gXuIkl8R/RSuE4A==
        "]]},
      Annotation[#, "Charting`Private`Tag$6944#1"]& ], 
     TagBox[
      {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], 
       Opacity[1.], LineBox[CompressedData["
1:eJwVx3840wkAx/FR1+FSQnW7KJofuS4svx5SH2r9UFly6ijkiqh4ikN3Sc1F
50p5SFY86MdoieXHUkjz81wSSyLOysSMaV+i2dZ3dXd/vJ/X8zY/eNw3TJtC
oXj/1/82b+l2oo/t2aBzi7/Jc1QouMk04e+nOsKgg+kmfy4UKIeqxXZUBiaX
yPpu8IUCi9JUJZXqh21JWfOX/i4UuBlOzllIDUVEfpPeVlOhoKX59p+61FhQ
cpzTwu92CPTyE9vnUZMR4i5iHU5/Jii9MB71FTULrL8+eLcltAiaEvOPhU9x
EBJWzPzuUbkgfQE/MsH0PlhZ2Z1dezIhT0rduP4iH5QiXWlUQDUUNU6W8ulq
sNgZCrfgVtiaUXnOFAHsvQqZZlFCjNys2+Lv3giPxN1f6n1e4WWaB9kpa0ZE
juXIUXEf+i69STaKakX9ZMbOq1MiGMhrHx23aENJfqFvoJEYwaF8Abu0HRaz
/jTR9BCeV55JU9t0Qtg9UBn0cBjOdIb2OrkQf4ssVY/SJMi80nMn2L4LyRvW
VWfZS3G+UOf25UsvYbKzOdp2ZAx6HJpW4HA3WCxjDp0lQ86a9m0LLXpQlrXK
4eHkBJoOG0s6zvRCqXZTOkbLofx+PDK28TUi7uxbfa2NQEv+AS8r837IGwJD
T1+fxMovdalxv/0DY63ZU42bpnBx/G55cc0AhHLn4xTRFC6lONlPLHmD5Mdm
WvsTPyD3HvOaUeBb+Cuf1kj1p2FygEuP9B4EV8u7dB57Gi4eqgY/9SDawtOa
xFYzeC0x2FqWK8Y9oUVtPXcGm8OUioztQ6ilB4wq7T9CHeDnv1ExBKlh3sU9
FR/hZHySF5b9DnNHqmY2WyvgXnTEbiFjGDF26Ha5pcBTzcrC1ZJhsPMPnz23
aBb5z3zal6SMwLqikZuUMAuPaObyVLoEu/W+PW0nm0X4gGFYZJcEtNtPnA75
KLF/xZ2eHtYoAr3C/JQ1Sryy1l7Pp0nxVrbJlLdMBXbRC7+QJilse+I+K06q
YKk5wc48MYbFzBKPgD4VXKm9HS6G49Dhbmh4SleDqq9PP9Qwjrz7eWyDdDU8
Tz5kBEXJ4Dv6i8pKqgZRtMq7TX8CJpwr5ctdP+Eo7wirrnYCKx+k7Cu5/N8n
RHNpwe8RZROxK2XgEyqevE/y17zHqiqHVG1rEq19rueNiuU4++MUtz+OxMGa
nWc9dxCocvbV5tSRqPhp69pFTAIF+mtqB5+QmPPRc2TQh0Be0LivaT0Jjp3L
DtZeAsofzFdkN5KQcMyXCn4mYHPXYPX5VhJH0xU8918J0NJOLw55QSIm9MYb
l0ICWkjw/zRMolErN+NrLoH+gYJZBwkJo4KrjN5iAtE6O+IjR0nw+y4Ux5cR
cGF4GYrGSCiYcfEPagksrYxpeSwnccp1+wKHLgKtVmKTeCWJth5Gg/YrAibH
nlWVqEgsi0VsVy+BuPI0+3dqEo95jv3RIgJd7tymXRoSn2krisqkBCzFHRHW
2howG6gBLBmBW52kVtAcDQqCjef7yAkUZdskZM7VwOO6bgwxTUCTckVfM0+D
DOe5lgIFgRx2v9VaHQ2GXn7uvawisNfP0SxcV4O10aoLwSSB7bxCVa6eBucW
zKy3/ULgj2yHSuE3GvwL3tl72g==
        "]]},
      Annotation[#, "Charting`Private`Tag$6944#2"]& ]}, {}}, {{}, {
     {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
      0.012833333333333334`], AbsoluteThickness[1.6], PointBox[CompressedData["
1:eJxTTMoPSmViYGAQAWIQDQP/XN1f2ry6tH/WTBBYaS/5KSfidfFMKH+nffnn
f86h0iftTYxB4LD956cuMqLpN+wh8iftHf7M/rvW7aE9xLQL9iqOfw/82PIU
qv6y/fU5TrLXFr+0T08DgWv2XvypB3P03kL137R3UUhhyDL5YH/2DAjcsV/J
/meS2MaPUPMe2N+cd2g/q/BnqPqH9pce7creGvcFav5j+9A6qR1rp3+F6n9i
7xjzQ3DfgW9Q+57Z/9j4207zzneoeS/sbzIxzT76+gfUvJf2/9f/ZxT9+BNq
3mv73Ifrj4S9/QU17439DZ4076kPf0PNe2fPrSzSu+HcH3sAyCydsA==
       "]]}, {
      {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
       0.012833333333333334`], AbsoluteThickness[1.6]}, {}}, {
      {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
       0.012833333333333334`], AbsoluteThickness[1.6]}, {}}}, {{}, {}}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0, 0.9999}, {-0.29554662576530205`, 1.8566756686110795`}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.7953343697158833`*^9, 3.7953344317206726`*^9, 
  3.7953344680187054`*^9, 3.795334596509957*^9, 3.795945235173668*^9, 
  3.7963903113826017`*^9},
 CellLabel->"Out[86]=",ExpressionUUID->"51e7946d-1814-4894-9169-e98aa477985e"]
}, Open  ]],

Cell[BoxData[{
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"plotMagnitudeNCurvature", "[", "\[Lambda]", "]"}], ",", " ", 
   RowBox[{"{", 
    RowBox[{"\[Lambda]", ",", "0", ",", " ", "1"}], "}"}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"magCurvatureRelation", "[", "\[Lambda]", "]"}], ",", " ", 
   RowBox[{"{", 
    RowBox[{"\[Lambda]", ",", "0", ",", " ", "1"}], "}"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.785234096563614*^9, 3.785234105468805*^9}, {
  3.7852342720772057`*^9, 
  3.785234275841044*^9}},ExpressionUUID->"1d585772-a2c5-46bf-930a-\
49ed015e1b39"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"c0", "[", "0.5", "]"}], " ", 
   SuperscriptBox["\[Kappa]", 
    RowBox[{
     RowBox[{"-", "1"}], "/", "3"}]]}], " ", "+", " ", 
  RowBox[{
   RowBox[{"c1", "[", "0.5", "]"}], " ", 
   SuperscriptBox["\[Kappa]", 
    RowBox[{"1", "/", "3"}]]}]}], "\[IndentingNewLine]", 
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"c0", "[", "0.5", "]"}], " ", 
       SuperscriptBox["\[Kappa]", 
        RowBox[{
         RowBox[{"-", "1"}], "/", "3"}]]}], " ", "+", " ", 
      RowBox[{
       RowBox[{"c1", "[", "0.5", "]"}], " ", 
       SuperscriptBox["\[Kappa]", 
        RowBox[{"1", "/", "3"}]]}]}], ",", " ", 
     RowBox[{
      RowBox[{"c1", "[", "0.5", "]"}], " ", 
      SuperscriptBox["\[Kappa]", 
       RowBox[{"1", "/", "3"}]]}]}], "}"}], ",", " ", 
   RowBox[{"{", 
    RowBox[{"\[Kappa]", ",", " ", 
     RowBox[{"signedCurvature", "[", 
      RowBox[{
       FractionBox[
        RowBox[{"W", "[", "0.5", "]"}], "2"], ",", " ", "0.5"}], "]"}], ",", 
     " ", 
     RowBox[{"signedCurvature", "[", 
      RowBox[{"0", ",", " ", "0.5"}], "]"}]}], "}"}], ",", " ", 
   RowBox[{"PlotStyle", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Thickness", "[", "0.007", "]"}], ",", " ", "Black"}], "}"}], 
      ",", 
      RowBox[{"{", "Dashed", "}"}]}], "}"}]}], ",", " ", 
   RowBox[{"LabelStyle", "\[Rule]", 
    RowBox[{"Directive", "[", 
     RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}], ",", " ", 
   RowBox[{"AxesOrigin", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"0", ",", "0"}], "}"}]}], ",", " ", 
   RowBox[{"PlotLegends", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
     "\"\<\!\(\*FractionBox[\(0.3\), SuperscriptBox[\(\[Kappa]\), \(1/3\)]]\) \
+ 1.7 \!\(\*SuperscriptBox[\(\[Kappa]\), \(1/3\)]\)\>\"", ",", 
      "\"\<1.7 \!\(\*SuperscriptBox[\(\[Kappa]\), \(1/3\)]\)\>\""}], 
     "}"}]}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.7850586826791425`*^9, 3.785058706106489*^9}, {
  3.7850588493122644`*^9, 3.785058953256242*^9}, {3.7850589878407965`*^9, 
  3.785059057833702*^9}, {3.785059111125242*^9, 3.7850591328630953`*^9}, {
  3.785059187977996*^9, 3.7850591975185394`*^9}, {3.785059233155842*^9, 
  3.7850592740501623`*^9}},ExpressionUUID->"873b05c5-a2e4-433b-ad63-\
163b54f96abc"],

Cell[BoxData[
 RowBox[{
  FractionBox["0.2904398222319384`", 
   SuperscriptBox["\[Kappa]", 
    RowBox[{"1", "/", "3"}]]], "+", 
  RowBox[{"1.688122969516487`", " ", 
   SuperscriptBox["\[Kappa]", 
    RowBox[{"1", "/", "3"}]]}]}]], "Output",
 CellChangeTimes->{3.7850586887508764`*^9, 3.785058908297144*^9, 
  3.7850589553476505`*^9, 3.7850589909614415`*^9, 3.7850590230187397`*^9, 
  3.7850590584690013`*^9, 3.785059134511677*^9, 3.785059198006222*^9, 
  3.785059274492921*^9},ExpressionUUID->"5a3f1394-96c9-4cf2-b40a-\
49eca152e9a4"],

Cell[BoxData[
 TemplateBox[{
   GraphicsBox[{{{{}, {}, 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[0.007], 
          GrayLevel[0]], 
         LineBox[CompressedData["
1:eJwV03881HccB/DvVz3GJp1K6AcjbCtloh2q9f5sckVRO7SS6VCZK7pQpK7I
mlROoo5c6fw8W5IMw0lqSD+s82N+7+T8PuXX+d4X92O3P96P1+P5z+uv19s8
4BT9mBaGYe6a+z/ls/6BLFEVuKlKpCkPCLA7ZvAq/GMVhFJqzAv5BJxsrbeN
1BWCwCh8tCGLgL4n1iq2ixB8HnobauUS8PLUbNr1CiHUUx7QrhYQcHf0alMe
vxpYxkyP9icEbO8tcuo9XQPTOn0n/eoJQP0qbauEWmBjYVzHSQLINfTZgsg6
OLiz+fxRuhwe65rePW/RCO37hjLbi+XAGRx61it8A8FFc4ckFBImrvqorenv
4DXX99emCBKM5pXnkiybAR9oUjiISIgysMTUJq0g/iXZVM9+DsazdzdQl/4D
If6GCRk354DBWT9m0NsOxxf/68cfnAO9dYnG6uZOODj2qPoEzEOlfmFWUn43
HA7geFKS5yE64nXISFgv7B7MijUTz0N47Mmd7sfEQBdJoHLzApTLjm7bmNEH
Nyp8q6QXFmC/0qvLgfseAv07TM6/WYBw9Fd6PqcfJqb8GeXGCjAsXhbPPCOB
Dr/virf6KcD7rFl0yakBiPncfP1CvgIMgvUy9h0aBEaC9Q4fqQJYj6tqTx8Y
goguVmmbnRK87UZ1SI9hsIrdE5YYqYTK9zK2iDoCeyfvWTLLlCAcrCVt7UZh
5RWvy7Q5JewwCuFL1o4BkUHVvkZVgVsclzmvJYXJ2tRhzmkVTDvHOXEVUnDm
5n6IfKyC1Xbu1PjBcaim2fRYj6lAHNHhqHz/AUxMghwLvlTDpun+w+2dH6Ht
qzNhWoFqWOC9fri4dgJY1uHj7HQ12DdV4j0/TQLDQTEsaFGDYEDlLG6ehKXD
lo03F2MoIO3ynVSXKbiva1t43BRDTGJIuuT5FHhZOpjobMWQ/YmtHTbUabj4
LGxTmCeG3K6FNqz4YxqIDbQnvFAMmT9Lds9aPwOPhPoH+PEY+jZFJunnzQBT
Sr/QnomhfH1H9tAqGWj3lcw8r8CQKIdZmMKRQaOv05YcEYZcJey+RXqzwFuy
QWwrxdAnNe8svkiYBcS2kM8swlFc8XLVlGIWgmmdqrrVOPLw+KY7JpqA7jnl
Gid7HHXiu/ZVTBAgO+DS2eCKowJ6Wkt2gBx+f+sblXcERw3ur3x+EMuBHDjE
WRuJo9wj0iiBJwmFOWWi5zdwFO15WVbkTYIh30m+LlHTv2sVq/xHEuq0NxvH
aUzY7AqqP0xCLFza68zBEU2V5T0QSEJynODiiyQcjfB87Mw0u49h5H/64haO
rLsapdxUEuwtVj19moYjrIkRlHmHBLfkLZ6m6ThqrZX356WR8HVqm4St8YUC
q65SHgmys7/Jt9/F0Zuo2JctOZr+mEejlRk4CjVyyqWUktAlui0vvY+j73Xf
mRmVk0Abd3VZmYkjQ/VxnmkFCWs+u8GJ0LhmKDVlUzUJ234WrrB/gCP9ssnY
PXUkLKf3jBTxcTRQEK+kN5BwcCNlBSULR3/eMz3n00hCt0OrY6jGjCt7WcFv
SciTG0ZuzMbRlnMSKetvEqhlt5Oua6wTEh0UpfnrW5WC7DGNexjLJJdaSOAn
7C9xzcFRsZfAL76NBBtB4lOBxv8BfctxMA==
          "]]}, Annotation[#, "Charting`Private`Tag$92237#1"]& ], 
       TagBox[{
         Directive[
          Opacity[1.], 
          RGBColor[0.880722, 0.611041, 0.142051], 
          AbsoluteThickness[1.6], 
          Dashing[{Small, Small}]], 
         LineBox[CompressedData["
1:eJwV0ns0lAkABXCPihKpZsOiHcnutlOyY1ckXYseW41EtlJKD4SERR6NiFOT
HqzlRI3qSMKe2qisPCKdMh6tt4qaM8wgMyPGmMeXeXxr/7jnnt85989rcyzK
N1hPR0eHMZf/Wyk/ejy6uw7NRiIje44Q9GBKW+xkHXjB9mttuoQ41dfskGBU
j+IzelYmA0IMPaZpU7bUY/tVbl6/SIiWKHnBlZp63Al9YGJlIsJN4aWO+0XP
kULr5Gf7ibCJ+8iFG9OImM2dfL9BEdz5WgO7zCZ0uNAHjQfEICx95eUJr/Ha
2rbxUNtnVBitvHnWthUNuwyDI0OmkDU69oJb/waBNX81Z4ZLMHUpgKT5doFR
F3G7jzoNs1lNUvbqHlha5Xp5NkwjkbJah7TuA4Xqb3AiUIqJ4u0cJ5O3WDRK
DWuZkiIoa42Iwn2HTcq0wLboGRivumZO9gygzMeNlyGfQa3pw7vZpR9guPyg
OzNChuS49sjx37lgjfaarh+UIfb8KS9GMA+3nl8N2MOQo1p2wnUtewhbWQ65
rKdy+Gj2Dm7IH0ZP0csSN6oCse6vbpRm8aF0vD1me1GBFZVLWeHxAix61zBi
wFfA/ww1+UnUCI4oJqsveyhBCTNm7z4wikj293b8G0pEV9Q1xfw2hhJdXceX
ciX86UJDwvsTetO6jA8xCNQOy1K6ncbB/IWVICokUD/aRDjQhejfmEfKJQQ2
m0UWCaxEaF/8zPus2xfsyMgPn9UTIz6+p5Zz8Quknhku+Wox6ofTw872fcHX
dIYTa3QCcdZ6D49azoIX995ZM/wZZ6wDJNkhs1gn5R98NzAJ3+hwR87fs1AV
tj+Y1zSFdgrorZJZOHbU6n4MlODA1Emt0kmFshGtJ69HgpxXu79zTVDhWEH6
9bwt00i3MPvTskqFcMWYePHLaVzre0MxVqrgGLHxvb2TFA6Tx79Jc1Rjx+XT
nOVPpXjKdts/HquGzYscxt01M8gU3y5d+EgNt1yZgF84gwrZZzeLcTVKTZ1T
xixkKK62TdW306D7XvjD3CwZnGsMk1SHNPhVkDKkbyxHwdA+SlWBBgsau2y/
zZSDv3mveUyPBhmVy7TTajn+YJ98csFAC2/vnz+kJSvQwjbmebhrMaC7bXfN
lAI0X/355+K0KPct6C0+psRjpk3pglItOIy2gD08JQIb+n2oXC1KjogTy/wI
CAvcJ6UmJJL90mWP/AlUHhaoOpeQ8N5mEV29j4DplU2aB6YkFPbbQpsPEqCK
zT+ELCOxVXvXf+Q4AR9muf7gVyTGCwPo1Li5vdf9hQ1WJGiDreL8PALSZq6M
+QMJnY6g0DvXCXxszGPup5Hoa1Ly7xcQWDDfmXBcS4JZbjdYNfeTJeY72kXr
SLxJPN/Se4/ABKdtaN+PJE6buZQsqSJQ5F/Rtt6ZhIdRF9WsmkAqS5qzyIXE
CjKkcGUNAVqEK2N0zo1jebnrnhOo6/t056YrCdN/JOd3viYgl7+vmgcSI+Us
jS+HgN25c9a8OT+7tTIpoJXA4ZYNSTXuJIIu7IoO+5fAztUTi097kPgpSSCO
7iTQEi/y2u5JwjAyOTSxm8CwoX7MKi8SH4OWClJ7CbCZG3LUc67cW3aY1U+g
MCqz5O0WEv8BWACMhA==
          "]]}, Annotation[#, "Charting`Private`Tag$92237#2"]& ]}}, {}}, {
    DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, 
     AxesOrigin -> {0., 0.}, FrameTicks -> {{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, 
     GridLines -> {None, None}, DisplayFunction -> Identity, 
     PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, 
     DisplayFunction -> Identity, AspectRatio -> 
     NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, 
     AxesLabel -> {None, None}, AxesOrigin -> {0., 0.}, DisplayFunction :> 
     Identity, Frame -> {{False, False}, {False, False}}, 
     FrameLabel -> {{None, None}, {None, None}}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLines -> {None, None}, GridLinesStyle -> Directive[
       GrayLevel[0.5, 0.4]], LabelStyle -> Directive[Bold, Medium], 
     Method -> {
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}}, 
     PlotRange -> {{0., 1.5521310812430404`}, {0., 2.205399979303386}}, 
     PlotRangeClipping -> True, PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.02], 
        Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], 
   FormBox[
    FormBox[
     TemplateBox[{
      "\"\\!\\(\\*FractionBox[\\(0.3\\), SuperscriptBox[\\(\[Kappa]\\), \
\\(1/3\\)]]\\) + 1.7 \\!\\(\\*SuperscriptBox[\\(\[Kappa]\\), \\(1/3\\)]\\)\"",
        "\"1.7 \\!\\(\\*SuperscriptBox[\\(\[Kappa]\\), \\(1/3\\)]\\)\""}, 
      "LineLegend", DisplayFunction -> (FormBox[
        StyleBox[
         StyleBox[
          PaneBox[
           TagBox[
            GridBox[{{
               TagBox[
                GridBox[{{
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.063], 
                    GrayLevel[0]], {
                    LineBox[{{0, 10}, {40, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.063], 
                    GrayLevel[0]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {40, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    RGBColor[0.880722, 0.611041, 0.142051], 
                    AbsoluteThickness[1.6], 
                    Dashing[{Small, Small}]], {
                    LineBox[{{0, 10}, {40, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    RGBColor[0.880722, 0.611041, 0.142051], 
                    AbsoluteThickness[1.6], 
                    Dashing[{Small, Small}]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {40, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}}, 
                 GridBoxAlignment -> {
                  "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, 
                 AutoDelete -> False, 
                 GridBoxDividers -> {
                  "Columns" -> {{False}}, "Rows" -> {{False}}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {
                  "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, 
             GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
             AutoDelete -> False, 
             GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
             GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], 
            "Grid"], Alignment -> Left, AppearanceElements -> None, 
           ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> 
           "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
          Directive[Bold, Medium], FontFamily -> "Arial"}, Background -> 
         Automatic, StripOnInput -> False], TraditionalForm]& ), 
      InterpretationFunction :> (RowBox[{"LineLegend", "[", 
         RowBox[{
           RowBox[{"{", 
             RowBox[{
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "0.007`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    GrayLevel[0], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> GrayLevel[0.], FrameTicks -> None, 
                    PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 
                    1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])}]], 
                    StyleBox[
                    RowBox[{"GrayLevel", "[", "0", "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                    BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                    ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    GrayLevel[0]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["GrayLevelColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    GrayLevel[0], Editable -> False, Selectable -> False]}], 
                 "]"}], ",", 
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0.880722, 0.611041, 0.142051], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> 
                    RGBColor[
                    0.587148, 0.40736066666666665`, 0.09470066666666668], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 
                    1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])}]], 
                    StyleBox[
                    RowBox[{"RGBColor", "[", 
                    RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}],
                     "]"}], NumberMarks -> False]], Appearance -> None, 
                    BaseStyle -> {}, BaselinePosition -> Baseline, 
                    DefaultBaseStyle -> {}, ButtonFunction :> 
                    With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0.880722, 0.611041, 0.142051]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0.880722, 0.611041, 0.142051], Editable -> False,
                     Selectable -> False], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Dashing", "[", 
                    RowBox[{"{", 
                    RowBox[{"Small", ",", "Small"}], "}"}], "]"}]}], "]"}]}], 
             "}"}], ",", 
           RowBox[{"{", 
             RowBox[{#, ",", #2}], "}"}], ",", 
           RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", 
           RowBox[{"LabelStyle", "\[Rule]", 
             RowBox[{"Directive", "[", 
               RowBox[{"Bold", ",", "Medium"}], "]"}]}], ",", 
           RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), 
      Editable -> True], TraditionalForm], TraditionalForm]},
  "Legended",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"], 
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, GridBoxItemSize -> Automatic, 
    BaselinePosition -> {1, 1}]& ),
  Editable->True,
  InterpretationFunction->(RowBox[{"Legended", "[", 
     RowBox[{#, ",", 
       RowBox[{"Placed", "[", 
         RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
 CellChangeTimes->{3.7850586887508764`*^9, 3.785058908297144*^9, 
  3.7850589553476505`*^9, 3.7850589909614415`*^9, 3.7850590230187397`*^9, 
  3.7850590584690013`*^9, 3.785059134511677*^9, 3.785059198006222*^9, 
  3.785059274566754*^9},ExpressionUUID->"bb414af2-c21c-4dd1-b7bd-\
17bfbe15e303"]
}, Open  ]],

Cell[BoxData[{
 RowBox[{"Clear", "[", 
  RowBox[{
  "sectionFormPlot", ",", " ", "sectionTable", ",", " ", 
   "sectionsAnimation"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"sectionFormPlot", "[", "\[Lambda]_", "]"}], ":=", " ", 
  RowBox[{"ParametricPlot", "[", 
   RowBox[{
    RowBox[{"sectionalForm", "[", 
     RowBox[{"y", ",", "\[Lambda]"}], "]"}], " ", ",", " ", 
    RowBox[{"{", 
     RowBox[{"y", ",", " ", 
      FractionBox[
       RowBox[{"-", 
        RowBox[{"W", "[", "\[Lambda]", "]"}]}], "2"], ",", " ", 
      FractionBox[
       RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]}], "}"}], ",", " ", 
    RowBox[{"PlotStyle", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"Thickness", "[", "0.007", "]"}], ",", " ", "Red"}], "}"}]}], 
    ",", " ", 
    RowBox[{"LabelStyle", "\[Rule]", 
     RowBox[{"Directive", "[", 
      RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}], ",", " ", 
    RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"sectionShow", "[", "\[Lambda]_", "]"}], ":=", " ", 
  RowBox[{"Show", "[", 
   RowBox[{
    RowBox[{"sectionFormPlot", "[", "0.0000001", "]"}], ",", " ", 
    RowBox[{"sectionFormPlot", "[", "0.9999999", "]"}], ",", " ", 
    RowBox[{"sectionFormPlot", "[", "\[Lambda]", "]"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"sectionTable", " ", "=", " ", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"sectionShow", "[", "\[Lambda]", "]"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"\[Lambda]", ",", "0.001", ",", " ", "0.999", ",", "0.01"}], 
       "}"}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"sectionsAnimation", " ", "=", " ", 
  RowBox[{
  "ListAnimate", "[", "sectionTable", 
   "]"}]}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.7850533521095047`*^9, 3.7850534019117765`*^9}, {
  3.7850534575191355`*^9, 3.78505347297007*^9}, {3.7850535076129875`*^9, 
  3.785053543398841*^9}, {3.7850536401047645`*^9, 3.7850536840566387`*^9}, {
  3.785053753979801*^9, 3.785053788716823*^9}, {3.7850538392969713`*^9, 
  3.7850538823655853`*^9}, {3.785053913573464*^9, 3.7850541636491356`*^9}, {
  3.7850544239903436`*^9, 
  3.7850544264996357`*^9}},ExpressionUUID->"0bb446de-aece-40ec-b255-\
dfa62df76193"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Export", "[", 
  RowBox[{"\"\<animation.avi\>\"", ",", " ", "sectionTable", ",", " ", 
   RowBox[{"ImageResolution", "\[Rule]", " ", "400"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.785054187955009*^9, 3.7850541958451257`*^9}, {
  3.7850542505612745`*^9, 3.785054271400675*^9}, {3.785054613786873*^9, 
  3.785054616119646*^9}, {3.7850556478462214`*^9, 3.7850556480137615`*^9}, {
  3.7850557987248254`*^9, 3.7850558239136653`*^9}, {3.785055972093776*^9, 
  3.785055979815134*^9}, {3.785056254475032*^9, 
  3.7850562548799486`*^9}},ExpressionUUID->"909c9ec3-14ac-4d91-ad27-\
62b3d29842bf"],

Cell[BoxData["\<\"animation.avi\"\>"], "Output",
 CellChangeTimes->{
  3.785054317522847*^9, 3.7850546227175193`*^9, 3.7850556546819124`*^9, {
   3.785055813502927*^9, 3.785055827031302*^9}, 3.785056207825571*^9, 
   3.7850563149810658`*^9},ExpressionUUID->"fe83ab12-1e56-4405-a116-\
f7b943c677fd"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"SetDirectory", "[", 
     RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"meshDir", " ", "=", " ", 
     RowBox[{"FileNameJoin", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"ParentDirectory", "[", "3", "]"}], ",", " ", 
        "\"\<With Arkhat\>\"", ",", " ", "\"\<Meshes\>\"", ",", 
        "\"\<Tops Open\>\""}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"stlMesh", " ", "=", " ", 
     RowBox[{"Import", "[", 
      RowBox[{"FileNameJoin", "[", 
       RowBox[{"{", 
        RowBox[{"meshDir", " ", ",", " ", 
         RowBox[{
          RowBox[{"names", "[", 
           RowBox[{"[", "beakNum", "]"}], "]"}], " ", "<>", " ", 
          "\"\<.stl\>\""}]}], "}"}], "]"}], "]"}]}], ";", " ", 
    RowBox[{"verts", "  ", "=", " ", 
     RowBox[{"MeshCoordinates", "[", "stlMesh", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"minx", " ", "=", " ", 
     RowBox[{
      RowBox[{"verts", "[", 
       RowBox[{"[", 
        RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "//", "Min"}]}], ";", 
    " ", 
    RowBox[{"maxx", " ", "=", " ", 
     RowBox[{
      RowBox[{"verts", "[", 
       RowBox[{"[", 
        RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "//", "Max"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"center", " ", "=", " ", 
     RowBox[{"Mean", "[", 
      RowBox[{"verts", "[", 
       RowBox[{"[", 
        RowBox[{";;", ",", " ", "2"}], "]"}], "]"}], "]"}]}], 
    RowBox[{"(*", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"verts", "[", 
           RowBox[{"[", 
            RowBox[{";;", ",", " ", "2"}], "]"}], "]"}], "//", "Max"}], ")"}],
         " ", "+", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"verts", "[", 
           RowBox[{"[", 
            RowBox[{";;", ",", " ", "2"}], "]"}], "]"}], "//", "Min"}], 
         ")"}]}], ")"}], "/", "2.0"}], "*)"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"centeredMesh", " ", "=", " ", 
     RowBox[{"TransformedRegion", "[", 
      RowBox[{"stlMesh", ",", " ", 
       RowBox[{"TranslationTransform", "[", 
        RowBox[{"{", 
         RowBox[{"0", ",", 
          RowBox[{"-", "center"}], ",", "0"}], "}"}], "]"}]}], "]"}]}], ";"}],
    "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"sectionFormPlot3D", "[", "\[Lambda]_", "]"}], ":=", "  ", 
    RowBox[{"ParametricPlot3D", "[", 
     RowBox[{
      RowBox[{"Prepend", "[", 
       RowBox[{
        RowBox[{"sectionalForm", "[", 
         RowBox[{"y", ",", "\[Lambda]"}], "]"}], ",", " ", 
        RowBox[{"minx", " ", "+", " ", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{"1", " ", "-", " ", "\[Lambda]"}], ")"}], 
          RowBox[{"(", 
           RowBox[{"maxx", " ", "-", " ", "minx"}], ")"}]}]}]}], "]"}], " ", 
      ",", " ", 
      RowBox[{"{", 
       RowBox[{"y", ",", " ", 
        FractionBox[
         RowBox[{"-", 
          RowBox[{"W", "[", "\[Lambda]", "]"}]}], "2"], " ", ",", " ", 
        FractionBox[
         RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]}], " ", "}"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Thickness", "[", "0.005", "]"}], ",", " ", "Red"}], "}"}]}],
       ",", " ", 
      RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"p", "[", "\[Lambda]_", "]"}], ":=", 
     RowBox[{"ParametricPlot", "[", 
      RowBox[{
       RowBox[{"sectionalForm", "[", 
        RowBox[{
         RowBox[{"y", " ", "-", " ", "center"}], ",", "\[Lambda]"}], "]"}], 
       " ", ",", " ", 
       RowBox[{"{", 
        RowBox[{"y", ",", " ", 
         RowBox[{
          FractionBox[
           RowBox[{"-", 
            RowBox[{"W", "[", "\[Lambda]", "]"}]}], "2"], " ", "+", " ", 
          "center"}], ",", " ", 
         RowBox[{
          FractionBox[
           RowBox[{"W", "[", "\[Lambda]", "]"}], "2"], " ", "+", "center"}]}],
         "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Thickness", "[", "0.005", "]"}], ",", " ", "Red"}], 
         "}"}]}]}], "]"}]}], ";"}], " ", "\[IndentingNewLine]", 
   RowBox[{"Show", "[", 
    RowBox[{"centeredMesh", ",", " ", 
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{"sectionFormPlot3D", "[", "\[Lambda]", "]"}], ",", 
       RowBox[{"{", 
        RowBox[{"\[Lambda]", ",", "0", ",", " ", "0.99", ",", "0.1"}], 
        "}"}]}], "]"}]}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.783161990839325*^9, 3.78316199302623*^9}, {
   3.7831621307866974`*^9, 3.7831624171472673`*^9}, 3.7831625185788336`*^9, {
   3.78316258981352*^9, 3.7831626440358934`*^9}, {3.783162678861041*^9, 
   3.7831626843942056`*^9}, {3.7831627264841366`*^9, 
   3.7831627932805414`*^9}, {3.78316286272641*^9, 3.7831628801532807`*^9}, {
   3.7831630134333467`*^9, 3.78316302240856*^9}, {3.783163153392202*^9, 
   3.78316323695158*^9}, 3.783163299760764*^9, {3.783163344783633*^9, 
   3.783163416487537*^9}, {3.783163475503996*^9, 3.7831635103508368`*^9}, {
   3.7831635412663593`*^9, 3.783163589841338*^9}, 3.7831636399932327`*^9, {
   3.7831640706671705`*^9, 3.7831640810733423`*^9}, {3.783164173259684*^9, 
   3.7831642533846865`*^9}, {3.783164313993409*^9, 3.783164333863246*^9}, {
   3.7831645666552525`*^9, 3.783164600167647*^9}, {3.7831646464466558`*^9, 
   3.7831646784061856`*^9}, {3.7831647312232475`*^9, 3.783164731623205*^9}, {
   3.7831648242157555`*^9, 3.783164825335086*^9}, {3.7831648662232895`*^9, 
   3.783164875070651*^9}, {3.7831649156391425`*^9, 3.783164936758503*^9}, {
   3.783165070982968*^9, 3.783165098532585*^9}, {3.7831656435605717`*^9, 
   3.7831656579103923`*^9}, {3.7831656974405575`*^9, 
   3.7831657008656087`*^9}, {3.783166293499981*^9, 3.783166294468505*^9}, 
   3.7831663294564056`*^9, {3.7831665623477273`*^9, 3.783166610783389*^9}, {
   3.7831667686610823`*^9, 3.7831667841746626`*^9}, {3.7860147616901703`*^9, 
   3.786014774831731*^9}},ExpressionUUID->"73bc39b9-2d5c-4280-9d50-\
f3c18b724be2"],

Cell[BoxData[
 Graphics3DBox[{GraphicsComplex3DBox[CompressedData["
1:eJxtfXdcze3//0GLSlNlHzMj45aR2ZGRHTKyj3VnZIY7hGNvRUa32zj2yibZ
x8xIRSiEI5EUpaGS9Hu/n893nPfv8/WPx/28L9f7ul7X63qt6/V6nRpjpvUf
X1qhUKwwVijKKPBHPyjdTOXYsOGn7+veXxf+W/vtSYq7iOvNy4n4PfOjSSKu
vhWXKuLqxUZlVY0HDeo7tNRbjK918bOIaxuE2onjnR71TxFx3c+V30Rct8LZ
XsRDy434iHn+/jtLxBXnD2J8gFNlfnfwA+C69/aF7qlPn65c6sR1mIfcEP/W
+HctEnHPq22xDt2Q3Iv4/0M9OL5zf66jj2op8K5LS6vCfYZMiT98VZxfb9Qc
/06/cXgZEe/588Q1EdeEOOHfKS8Gllap126pEPttNtb/2R/jtRmH7FRPjhwJ
utL1Nf79Yv8c4J417EXcS/EEuNpZC1w5dZ+dSlhP5Dnle+zz1rhs/L1xYa67
SIfwuZ/x3UY1pmH8pN55Ip4w9j1wRXTFje78Psa7LcoE3TSWXtcxzygfa9Xs
SZ/Plr6bif8OOZKEdWWNAm438h/QUdOvO9almLDXSsRDDrbEeaijRrwFvuK+
pUj/iK96zK8vWAg6qB0vlBdxt8+VcY6qc/eAqzY9xHgfn+vgB9XJzV8wvrkm
z12gQ8zdqvie6uOJZ1hPw/G5wI8MiJf2ib9V67dhfEZQGYzTVVv+CuPDLlmL
fNV0VIsEzK+5gPWqDj4AntlqyxvQp7kNcM2u3jbgw7RFz8E/R5Zg30o/N+Jn
2oA/VZ4zOU+r1RVUwvH6/Wiai/Nt2wf8pYtYDzw99Nd30Hn5UJyb0qmCg4j3
+mc6cHV/54/Y79dKFVTDwsKsS3+PwvilTb4DH7Sggvhd6/AaWL9mzYZc0PlO
EMYrUgZHY56afhivj/7HEes52Psn1tnF8zn25T0LeHrFzT+wr/y/3oDfHhZz
Pa5zgKs6fOL5hr42F/nNc2BFrFv138A07Gt+VjkRT1lgAlx77DjOUdNRby7y
rdXhUPx7XetaX7H+aZl33EX+z+88H/wQW/OydE8vum/u03vBsneH3BV//uj2
dAkHPnLDXkNcM7rZeXe/02dKdwvcd5334fTv+yuey6utOC+lmy/4VjifIneR
PpUngp4Kj5hkrOfG4UJxvHqq6hnwZwHvsN4870JxvCbn4CPgiyZhHsUOf0eR
/trt9rGYP6tjHuZRnAR+atIQ4Cq70X9wYR4fpUUk6Hz1BnBl8lJHUT7s2Z98
GeMtSueDfvkzHER6+s5M4n04uRn3Wuu0DLip8jL4Q9HsI+SAel8pR4y/l0k5
0mEw5cPFnxh/qN5z8lN/Z/CJ9rVdOfGeZodvyJTkCe6H8H2c46Fd4bhvisR4
nlvjr8Cdn/jg/FSbv4NPFEdP26gOeHu/DZwVA7p35TqVsz1sgZfdGQX+OzuE
cmz4NRuRH5qMmgT+U8xrifHqKXfMRX5bFz8Q90Xr0mkd/v/XtHIiHjapOOc6
z3UZvt+4GLhFYiWML/mjrHof80RVminDVQfLFYvnO33JonjwW23yqSCfFeJ5
qWtcAS78e+ItKxWL567bOoznfifoA777NsYCcjss0B/32rQ99U5enIV4jv47
3K5L9xe40v2upYgvXZ4J+a/4MJpycfEyBfSg2Z4kCadczxtXSsTzVWaQh0pv
Y8gxdeeJwAOC60J/CXoB9FcP6A95dSq6DuSVsvAhzlNb6oq1ON7ML+i9tP4M
yo2rNpCr7r0wv0B3nKci7zzwiD3D00D/Jf3SyG+dbaFPHdtTj3S7/kXir3fu
wr5e6PdgX4KcfQL6fDbSu2tnTfock7wQdNxyJhb08Tj+wv3UnQfl9getxfx1
kh/i/w/1yBf1jk9WZJrsHOstLBDxgPuT0w1x9ZsZwBP+KkrFfmeXvoTvzvUp
A/7sWh770YaPgf7Sj5pTGvy8bTDWrU9qifG6Rd0w3vP5Cdwv/bXyWKemm7sx
7pHnsM8Sf8ZTLtU1AT6mgPexkg64bkBHjn8Wi/lVdxMf4e+1frATTI++hBxR
H25BPdWtMewK5+3fyE/5N3E/tAsLf4i4b5Wn1Ac1qnM9PT7/EvnWutUF6Bfl
0HHQp+ryjezE+1XddQK+p4j6ivulX7rLTtXj0MFfMSeuAD/dF/ddFXMQ43c7
d8Z45WXKAWW/oaXE8QtfF12W5F2KJGdKi/i1xa9JL8e6tMd63ovEepa1hZzU
xTU8j/+fXXROvC+n7nWMkvj2LMavcAsXxyuV0+IMz1FfuuwlEW/6ddVTGe7W
pUDU115OvuBv5asCyAlh38AzjJNBR+WFx4n4+4Qn7Bkf/xHgZ8EOoP0W9tBG
lANXajzOBN9WtoT80184ST6PLp8B/t9X6hPwrp2AO5X7+hX7uuVBfX3dxQ76
8XAK5I/SL4D6sUol4L0cjkPOqEr1TgC99xwC7jfkPvX4iESsX79mAe67m/U0
3CNtua6PeO7ziZcJor06LfOZRLdicV9O+7+TzztVwX3RWUf+An51Iu9v5vLH
XKdfaazzVy73q98xA/Rp2Q74lYFJmTI635lSWrJDZLh2pTHs8wSTOZQ/C9dR
nzdwKgs58L4h1q9vPxd6UHOtOnC3w70+SvQEnVVX+yfjHCttoh3be4wG63ld
G3hMjyuU/5kOOuz3V6dPIm419zLOVXNoMPhOa1bZTFxnlQF1v2GdpRtSz1S2
LAt94fgjC3jtetfcyXfAw15oMF6wIzFeVc3BDHbdPTvadTtcaZ9MsMF+8z19
6RdMtcW5K1c6FIl0Ply/H3Bd0F/xEh2AJ0zyIL8NSsf8ijtW9pADE31oh48K
hV5TLakJfKV+OenS4RPsRsHegN1u+qEH9Xj8PvojPVvh3PPfdv6C704uC79D
uW0R+CTC+g1w9bMUyr391eHv1GvsgHUqi2tI391rJ+43uG0g5IZ6+z/Us+Pa
mmCeVamYR1/zFe3iYUpT4Geng/8Vl17y3vm0xni3WW1x7oJdS7vbMwt61iVr
Ge6F/kUY1/O8iwXuxZMzcv2bfxN4VMZnGa47GpMGOX/kX/CPYBf5gl+yqn/C
vQ7YCP2oOfUOdBDsQOBuC+58kPFz84zPmKfjPx9l37UbXVqkg85hDuxAhWM3
noNvZ+BqbV3YaZra23DuihFTSol2Wl+PsrCftTHPOH7+LRv4Ox0O0J80P58k
0ccWuE02/aAtnXD+ujkdgPuXmks7zFIPumm1AaXE7yrfx0F+Km+ugB7QBgfB
Dsm8NPA1zn1BVcwv6DuMj/XtC77VZJ3ivduw31bEp69+Q3tmxhqe+8hLtuL6
9S0/wG4R7h31Qj83jLdOqIbxgnyhn2hdH3jTN7tBB924o7TfHCbBHzRrcwT0
F/xkyCvBXoK8jVhjD34T/Erwv77gF+XD1kPgE12rfKxT26YU/PqISzGUD913
Ug6718a9Ti97DPdX52xF/dOss7G4HsXcFc8lfqA9+2O4EdZf5iDt8+iKxI81
wvhT6waBzwU/hPOPmqMQ9VeHWRswr7bTWuDKjjMUsN9W7ZkLfq6SRrv4lncp
4rfmgG7u+8kP1qng23VRWshJ3cwJPEe7WODtuoVQLqVeoN/5er8l+N8pgfiE
mgnS+otEe2ninc20l9b6fZDkYaGIH29sRLuxYhL9lHwPI8hh7x+gm3J4EO29
Z75lYAfOXsU4iUcH8qGlGniC3xT67xcnY52a2LPfRD2rbV4V5y7wLe61LioK
eHCAI/hNs2NvHObZNTJbxE/5dCEflt8BXNh3GdF+GNW4OewVQa+kSvelNOz5
gpm0b2yzaNec61Ya9sm08Ghp/7QrLm/NxfyNroGfVc/vQH+pBjYthD+o6rcA
+DJL3iPTq+VBz6LWoKdmQzLooLt1E3jUP2/BP6oWI5+TH45bQf9WaZwNug0d
R7n9JbDIXbRnHIMvgI5lC+j3HVUXwS69W7gU43vMx/r18+yLsZ41iwLBhwmj
wCcan3rGsKudwt5L8hDrFPwSnFfoY0fa5wGp5H9NXYxPaLOS+uLCSdhvytjb
luI9zbRcDTmjMa8Nv0DwtyxwfxsNAy7YdbDnBbveUuRzVUhX3ovVp4gX1zAG
335fhTiSYA/Ablf16Wci+h0Vly9GPEqx3Yz+XG4PE4zvcGEW9nvCE7jyQj9r
4JU8ZmL+4b8gz7SbLlmpdA4NG1p4+2H9929Rf4l+hzB/I9f74GfBzmE8pN4v
+GV+x8NwLpp5B+j/1XwFvewy7TbOUTeiJ/2Ce9+BR7Vqi/MSzg/2gPB/YI/V
+yzF64b/wn5Vx+vTH0mgfVLi1yhPZZlCDqR9BZ/rVhwCHdTpTUxBT58k2qUr
HbjfTlUwvu+LyRivrdSE/s7HqtSDHrcpx5r+S35bbwI7IcDtC/WjdSr9gjsx
8LOcYhYwrlXzFebXBPYFnvBkHO2HyWWxTo1fCv3cBd8o9043xv3QBwj7Eunz
YT/ooCi7hna+xzXYsS4TxgPX7a4EXGvVBuPXBRlDn2osvbAeveU1K+gLswjc
X0EvgG4a9/NWsHP+60F/8NY4+EnKSb1BZ0H/Ms728QTpvDkcdPbJ3EF9eukl
+W3DeeBOzxNL7ED6j3OUdlIcD36cOmoE95sUaW3oL+vX1WMcY6rAPwZ+ilab
D/7R6y5aiXw190QvxkvXbKBd1DbaSjxH5avbOEfB76Ye/jXAGvGx1CXQdzqV
FJe72ZX70r3j+uN60y884kE8J+uztC/6ebabrRCnOtdQOtcg+ukrIoi/PUM7
dlA66ZMvyB/Rju1jS3z0HsZHRzkhvhcWaAc+15+oQzovXAfcYq2K5/umNONm
3Yn7Nfbg+NQtUnxsein4a+rVUZKcgvzRnrsAfX3qhDfkp8CX1Nf1rvFedJiK
c1TW9SY9mzdhnHzvw5I4KulZfkd56NOYzYxbZm/geRndIT5xJ+SMKiET+9Ll
Hi6PuGJ0MuSSfrE/6eN4gfzWxZv3bk8XxkMqPrYRzzHV4Q3iWoK/CTtEV7+N
jaGcEfiH/DC9PcaXWXMe5y7oC+C6EfTjLG4E4r5oN4+nvjvQHvwfNv4hcMH+
TJLkNt4LtH+Xwfr1Rs3p9/s4moF/TrWnXC3QEs88Z2sYn9Gn6bhO0X4ziG9o
reYxznaHdo7TsYGUAztcKR+sTR1A/1JxwFUZboz/2BfjfAMfzKY/sswSdFYt
W4/4anr/F/TX7HnvBD/IGvjkXnnATTJX4Fy6XbeS5CT9ypRC2MOapSeBpyfm
A//9Z144x9f6KcN1fY+RH2qNxjq17Vx4fzu34f2dkvhF4gfKycv0Z39eof8l
2G9897itBG4R06YA62xUIwjr394KuMuOOfmYv0wK7rcu8TzlVVg0cJVZmB/m
n1oL9Om1zQNxZk1HNf1ip2X2GH90H+ZXdfG8CbqVsmT8XHUH49WdJyLOo+vv
wHuXVA73S9N1M99Z3FeAzmHuAVzP5a3Uy6V+Ao+aeQy4otlH4LqtwRVwjj/8
QR992A/KTzFOLtJt6iXaVz6HwQ+Ka9OB1zuuoVztOYTxlkeF4Ac3j4G0E1xd
if9oBL8ss7E57p3gj5D/FxZynfbf4E/pZoVQLh2dgfj8uq7xOEfBDqB9u2Um
4/bKbMYlgrU8l/GryIdLJmCdgp7FOlW+y4B/Wmn+XuIfxmPHmzkY+o+C/Cf/
31riIMq3jGV9YFcJ+p3vDooMB8R1b/1Dv3rwMMaxxTizMP5kaT++K8Tb5v3+
rig/lfspJ1O3cJ5xhcBjhscy7jnlDnDVu3mOKk2jQYPuPRyOfbVsl8/vnnRU
+Z0+c/PCq6M4FzFuWIKL9smO7HE434RRwPWWvxzE+95Us4R+nJMR19OuyAF2
VOl7lA8XTvK7dWYjbq9vbE7/6Pd+T4LOYU2CwG+KK8ZvZHjRYfCnYo5ej+/a
8lxc8iLAV8rqOfTjMpfjfF32PeP5Vuz3WYa3PftdOnf6KT3ID+smPOX9XXGf
fmhf8m36nFK0l1w6Ua+VI59HXX4Beahu+5Z2iPtsrKfKparUL7VNaGfmzQbf
+hTUZbyr6b/0X+uWBu6WYEo5dnwicNVjG64z/mMh9uXmy7hljfIOUrwF70qa
ft2vYv1Fcxwk/gSut6+KuJzuZTmOv7+N9/18hfjffCLOHzaK49cUPaLcmE06
mNrgu/r4xdTPPSvyvs8+B/qo9r/l/U2vRn1q0SVfWg/9oIIg4jFHiG+byveL
RZMcJT/iF+jQd/IarP+hNXCL9ZN/GcpPTb0pPF+vLBmuNNoKeZXeNJFyaVbt
lZhH291esut+yOTwM46P8v0uwxUB5rQTVliAr3SLupE+S/ZivIXzLKxfn9Ty
OfWIJeJRAfWMYHdpbuYynubRoRB++r6VtNO2f8S5CH4/xuc/avpV4ueZv89d
fA/q7ob7o7JpSX/HyBi4XacXBaDXrXHUv5HzHPAuvCOa9808hP7anuUV8P7r
HPXTnetsgH9X0R/42bALwH/TzakC8Ua9Zbi6e1Xg3jMSCrGeb2OvSPIhT4yT
p7RtRXuoxSP49+rQXgWIt7cqw/h5VkfIJ+W6HsB94w4wzlZ2DfSF9nioHeZf
7oh9ae4PIH+K+QPifq+3+UE56HGVcvs4x6/p+UO2zt3HgJ+d4SnDlW1sK+A9
ouJw2nMPmvEd2Wg58JSJkXxHOz6RdoI4XqT/ySYc96I97AT9IRMHQ3tJvfEL
33MLFjqI9snROvMQNxDkL/E0jQPk4YDFkyEfzCpD7ul+mlJun1rO94lPLzBe
4SHcC9GvTx9H3CyM8vC5sQPeBUobkW+mZRIX3xEM/Va/FMa3RDtBlKtLR0Cu
qgPm/clbEP2sSZ+B6zyOUx/1DcT812YV4VwFv4DvpKMi8Z4+PTyYcQlLL8qf
KmkOqoQx45cPOLrlOvkJ4/V1v4l0eNGi1HvQQbA/iXutr4D4z5BM8o3LU6xf
c3HyC/GdYmiizY3r5CfKsQZOL8S4hMbT6jHuy8bhdzFP2Ql6cXxm2toY4CEr
QSd1M4FvRTp/+ncacMtr1BemGyqI51JqcUPGc+KufCefCusRzzHnKM5R8POJ
P2pgaujvKEJfU253tTdTGcSFlEaD6EdcdjZlnOoD/amWlchH5QZbg9+OvqTd
lryU9+O4D3DTIQroG90Hd9pFhQ+B+zpKdoPnO9obNYtwr/19p//C+K3BuC+a
ovGQA66LbwDXZJ2in37amnjLCcWG/K9dSbmRnT9ChqudtYiHp+wbwnf0KYMY
nyy4hnyS7PXN+C71lxnjA1G9GHf9z5b8OioU56UJjMV4/7nLiDc6Az7VXQrA
+u2OFQJXPpmGuJPatgzWc9Z9NPm4cTHjV+bneX+3TKP+80th3s6khrzvHavy
fqbxHV7wf4HHeWvp7/VexvNadxF5L3HHXtD/HPuV8ajvXbHOkP7etPNeh/A9
d/J2+FOr/M6AD3VzrvE7u95Y4BzTHmJenXUk7Ye8ZAusM2o133d/DGc+xtlC
5GM4B/bgOsaOIF29TpJuz5fgu5ra2xh3ungFuPfoDN7D7A3Up9vNit0N8ouU
r2vznUt8nxLtwMSVtOs2JFP+5/gB9/r7Psc9b4759UbnyuNdtdIR2jcR1Uj/
l/9ZqZhnxThLjQ3AVXs53vf63+TjYx2oR0T9KPJDGTvGtfv+JH/eqk286R36
t+3nEg/dCdy7uhJ0LPGjlUOTy0POfFzJ/JLcHoxrhSeVVynEwF/j8pCTS/rx
/B2GlDGMp2n39/ks6QEj8T7GxzviPqpun+a7caC7keF4xa+nHP/3M5x7XP6I
HOn8+G75VzfQ37X3qRzpfKnHH7UlX+m+Q35penxmnNXhKN8R+hRRvky5g3iR
8sBVW0nvABf86ucSH4KekXUe8Zy69QUdNDv2gv6HxnYlfaOiaDd+rAq6hUy+
+13iW5ynxnw/+d/rFdf/LEXyj6xJ/2G96M+s9XsvyW/O4zEpR+JDyB9d0F+I
S5glb2cc71M3ns/G4Xjva1K/8TPyWeEDnM+Hd2UR9+hRnf6F3WjqwYJf5YBf
1D6U7jXjMGK+isifH2wY17aYQX92VXN7lUI8+F/tJPlOeasR9JdwjkMSExlf
iqyPfQj+ir14Hw+2CMV91FcOZJ7MxF12kPNN702V+ITjDzlCj5uut+E7Yrfr
5KviYOCeU9eRP9YUEfd1NYPcG3D0g3R+HygHKpXFefWpnySdE+XSPlvgJXaO
vvcYye87g3y50OMZtM+vL6C9U5X5dfnTbzGu1ewj3zV63gOeUI/+7O+4+vvN
FeCXncwj/ff3IR8Z2wKP2a9kXCO3HvPK3pQmPvffeEkOU07XqA66aTcZUz+e
qEO+KPUIcTlN1nzGW8zP877O6GEj4sGvXIHrulvwfre6j3jyxfLNcL+0Z4ir
f4byXXUJ/V7BLiK+2Ih0rmGWIslhylfPPXxvLZuUKvEJ6T+9Pd/LbvfhO9q1
3bQrLG7C3lC2TmKe2CG+z2r3R9vg3JNfT8T6g7zp73t4lYbf1PUY31t7zGec
tn5P4BGL1zAunemAdx91pjH1UY1E6rn7tygfKm6EveffxZ/6K282/bvHEu63
n/ZTwijK0e4joK9Teir5PjR/KfWPsr81zsW7K++tpRful6B/8V3vO5d5r6vn
8D7uMaa9bc68EHVi15L8W9qfVyX7Mn4x3/3/2UF7uNICzuN+l3Klx2XIn+z+
N7kOfaOSewDcdQrjsLoRPXlubltpz4d1o79QsJB67ahgDxjkn6h2avj9NwIO
O/bOePBJteWUf+lNqK9PJJXYhfSXc8JsJT+FdI6tyXNZ0Bjj7S4nky/vmdIf
XMp5smdd576yOtLPUh/Au7znx22fpXGUV/uaAl95oALtgCavsW99E4EOjGPw
Hf2ZZM9caII83phzZSmXlJT3Gu/mxL8nIM9BleGWI32X8/S4gnNUTZzGuG6n
HZDbKbav6Ec4XqC8nWefiXybk9F81xhf8SXGH7EDPiD9hw73/dw94IL+TxPf
Gfs/uIf7JdhPzF+aZWeCeNSspnj/VSzeAv2sb/iB8ip9JePUB+eCnrryVYjX
zmC+0/GJzBN4aA088urRzxKfYx/6mq+Yr2J2i/LfpRPuhU61pBT00dRC5Edp
RjdjXsHnZaWQ/5y7FvTRZ1Unn/R3NpbZw7tG8p3rUVtjUZ5Mt+3DfNc9z3m/
xHwGcf5uh8n3iXyv1zdpi3V6HvmJvB9hPZS7qXUxfmXsDtpPZ+d/lOQ35wnm
e7aq1WrKmzXVi8X3xF+jzcm3mx5Cngv+TZpI/+CnT/n+npnzXPpOOvJRLRfw
/Xra4qe8F88zRFzfIYf+UbPbz6R7ZgE6bLxOfjALo15rdAb2YUrZfsy/XZJE
OuTftMJ767pFfG9LmcR3urgrVvCDlvS6IvEr782mtfDLFK/749z1o+ZQ3+3d
Zy/S2fKAN94NlS3b0V5+bGOG95oMzRWJPlyPeQtT+I+RI2mvFNegHdqyoSns
rhU29L86fCK/uLoWiPTRGxXjvJSvCri/BvVNoI8GhryR5DnlUprKGHRo5sx8
sKU6nssLF4yfduQD86V+dfos8Snel/s6mMKP017eyrwsjxi8a2cOu4r9ate+
SqAcmw98+n9ZzA+J601+Tl6KeYIVFi+wzhrVcV76oR7IA1yZ2CRJuo987+77
E+sJUnQsyc/7RDoceynySYeOwyJ4zz/cwzwbh+vxHr3nJPJm9P0ioiX5mSba
RdMSbpJv8v8CrltQNd1dtH+GNACdVd/Gkn8OuCD/MGV7DP29kfXxfcEfNAJ+
JYp6cHka6KS4YwV+9r3LvE+l05bY3/dFtD+HFmdK39NJ3zeB/JwZzveJl5V5
/l5NjA3rDpSTepMfR7YBfTy3ffogyX/eJw8vI8nO4TpLXWEeRcIo5Gc6j+b7
jab6WMZXgzzKQB5usiA9m2s4fyUV8jZN2w6hHbPiEPc7+BXuhe+42szPXL+N
3/mRWIJTD8XbUq73E+wlET+5gPJhWSD/3aPL5aG/fj6jvjcdBTooT0TCv3Md
NjVHkieMG1zeaiXFi2gPbSvGeH1SOOYJMeX7QUncWDv4gSX0V+1bpPO71NfS
umDvebpcTeV920g9+6oA8upQqQM8r9G3mGfyxbIszmtXgfRe+538c0GH+e08
m2RJ8oV53S5P9SJfnXQ4Br7RDbgBflQGjk4W+WpU4nzGW2958P3F6gfW4xvj
RXmuNyf9ZxYQl+JpGocXtFvs3jE/fEcV5s+d8GS+hydx3x+SXH65BvOor+TA
b42MuYb9CnY457lnSnnrPQJyTdCzCRKfk6++fMe9UnStI+UV7oV9Eve9GeJv
6t3HuP7gIPqD8THAVdOjcS66ijawi+LGnyvkfQhi3or9Ttpd53IY5/w7j3mI
uywx3rVCd85TzaEk7xp66mRq/nOJzrwHTyth/Snll3OdmQ54F1DYDoA/6F35
AfX9Mkv4N9p/hwB37VyX8aktnaBPkI8hnuM/n2n3zPFayHugIK7eS7tR+qOq
pCN/Bi2S4fqUo3aSnQm7S9FwJfNxRL9GtH8mlsuT5ADloUMD+pudutHP8UuJ
l+THaUFuu7xNVdOuyHA7//s7gjxXf60DvOSPst/LyaKcn7Dd46YhLui3xyKu
zGkFu0W9tQbjbPPsn4j2ya9/9tC/njiNcrLJ5W/IC41YzPMOdGceWmRoNuIV
9fpSTn7qRjsrYj3woHe9aA+3L8f8zOY2xVJ+NfPGBu4GnTX1pijAn1fbfjGk
m2BvAD80PCXdEBfuzS/UhfUKYhyjjyoE9KnavQzON6BVpmwe6wTIt5QJqRmy
c3HrQrn35Tvudcm7gy6uoRn4c9t25ltI7yzqn0687/1mU69L+Z8a3QOsJ3Jy
Vprsu739ua+1AynvGtVAHE/wFxWG8aLf+zK9yjqvgrZ8J1N/CAadU7dkI189
gO9Y4lCs81LENxE/9DqQcqrXQaxHsaI77LqV7bMpnysUgn80s2fgu5EuLvQr
Hh2lvd3nMfI/Q7cekudtdvgE3O3kMRmuLzsBdFtZkE+5MboZ+EGzfCi/2/At
/SVnLeL5yvH/4j1l3bMGrGPq85j2QuJd5Om5jDZhvcnDRXw3CY0C7jfGW/Zu
LsgV5Jv5zf1PhmunMz8tfeNuvkM1ONIJ+3asizyodc1v5cjuRU4686P62Mvy
YBU1i56I9kast00i1jPxDeqYdOOOJoh0uFda+U42vvOPF7CrV/vIcG2NDYhj
Z750Zv5exPpwnud41I84VYpnHYd0L9RnJ7He5JsP4gPqQQuQR60t1xV5CGGN
xuXJ1l9vobW037z/iw5hY7Uy+ijT9vLd/3AAxmv31uK51OsA3KKCGuP1W87Q
rqnTwlaqm+P8lXddo15T8P1uWV+8Awp6cwvok76L+QO9UoGrT1+HfaLeuqe8
9J4IOgt+Pe2ZWgUc/9oX86szlzN/L61fGRHfETKMeQ5XZqGuU7NhHPDA9Jnf
DPcl2LdGmKfHNRmuW+EMPDFhL/MVS/IinLXZhnwu+ONYp7LNJuA+Oy4yP+fb
WN530+hvIl5v8EzWB81r+VDSO8i/Db3RWF4vM7UW89YGlWH+4eg9JXnO8O9K
8jy1lZqwjiOuHfK6Pzmtwfza28qPkryEfZ547QXiYBr/rtRfIUe+ibi69zXm
X4Vehl+pe6z4JMrt9xe60C8LHE15HGz1CfmTJ3IWYv78v5jvP6Em6vKmLzvK
/KX6bd5I8v+uaA8vdJrKPHKXp5CHgr91A/az2uuPvlHgHRt8rlpzhXGbhevA
V6q9596KuGLkJ+YjGdvexn77OxegbuXdYead2o1mvty+6Xmw8+OGMA/wS2C8
JC+BN9U/YH5UhXWobxLsYuQrtqu7lfnAD/bQvtqp0YvnsurRDearJ2ex3tbK
/B3Oq4Lte5l8mx6djDoC7cJkmZzpvhO4UydX5vceVZ+T9AvynzP7mnH9qzsy
7pHkU8owf0mQ77S/xHcPUZ4M/4910+1cQAdF7XrJkA+LPjAOdnEy3z3zvDPc
DeK0mhftgWtjnoEPAz42/yjdF+QdCXaEHvNbOXI9lXTMsz5jcR/zX1/9UiYf
Bu5+CHz9vleye3QzN9a9b5sWuaetUB+iUy1Bno/SL+AJzt0kjd/buJDvvAHz
MuB3V7Xhu+xnI/p3oa/TMH6yEe6VZttU+nHL09KY37tuCdZZJoDnbl/VFHKs
ZjXmC3lVWyHxM3CXjTcoBxTTWE/UsqEJzt0nkPmrs0J01DsvkQee/vMB6xPr
fWH+w4GrllK9rVweiu8vfPen3Kv7F/2FO8eBr7P+j3ph0ST4ZWplR+BhS1nP
KJwjcKWllH+1YAnzCUdMoX0eftZWyj8Erte1Zj2KaH+K808xwzyCP0X7s8Uj
a2m/zCtb9ALrV4yLovz/3p3rsU6lvtieB/qEjZ5NuvXrvh7jGzUzlfLBsmV8
/u4H8bhgGa6tddFKygdj/tIXS+bBpg6kflm0lnQ73Zf2sNEgjHdZnCCnp18E
9hs1XUP6uz1nPtHXodZS3j7yYZQbZtPPahLF/HDP86x7CvKmXZO51cpQbqsT
u7JuXfmEdGj5Vabv1LmtcS5++2vmy/Yr6a/0cV8wXriHuzHPDlfqwTsdZeMV
104x7/fOExmuP1GHdWdRVtSb51rx3J+c5H57+bDurMER5rf7SufufYH0aXSG
dnJsTdajbR1XIJu/+TTOP+amDNesu8j5/02UrUenugk69Ap+L9f7b6/RLmqx
R24XjayPc7/i+oF07lqHdYe7RqJOIb9LO9ghJXEJ3QjGz30K+0Gv6c8vw35V
ZfJRJxLmUEVmR6lfVmbe+DsXGa65OdtMyquU8Zs6Lxl51zv2daa+LruGciAg
FfUpAf+egv3zu75ArGcXz+sD83hV5+7Rv1hvwvqszWm0l4z3LQG/XeqOvJqI
oG5fZfz5lxnH/7TMkNGnS0vIk15OCVmy9ffrDtyvu16G606WYb3zwTegp3qU
KfPypnQxkvJ+S+w33CP17obGhvnqym59KU+CWFfi9PEO67ksSlPfWXrBbrny
byLPa0YY5e1RNetKOn5EXqhg/8E+0d3ywDp/5lEPCno9SpJXxjivnGoldTHs
I/EsAHW7EXEerPNq8YjveP7xObDzx/X/LNvvmEWoP/K5slaGayeOLIX7Ej1c
VreovrMQeGD/STIcfRFE+hwMls/ffyvsroBasaky/NcZ4PkdXstwdecjzEc9
70M7v1RvxpN3bCSe58x7GvOM8UzPmdCn+Z6+KbL5Z04AHrq+KnHHbvCzVH36
gf8TDr0m/3wYTXvmrRfyuPITPtAODKtC++q4D+oBnVrMBl/pt3+EHFaveq+A
HJtYQ0YH5aEJsGPbrVvPfOPYsxcp/3sbyerd2rkw3iP2ORHX0+TJR0P5rPq3
AfjZZ5+TjJ/VI4ZjPaGzjsr5fFMb5puV8pDdC02IE+Z3+qv6F9k8zQbyuyfa
yXBBH/0EPr68bB7ds0GFhnH4krpUbcIo9HOY3mcq/aBxRxHPUTTneUUdrwy5
pyx8yHiImKdEPcX85OMTqY8yZ6FONuptKZmdr7ran35B0ykyXHt5aybos9Ho
kww/nhAp2s+qKuGIkwh+8S2c14dY3Ouo/RshrwR7nfbYlOYmUt6vTA6oz35O
cSedZfWPmlSpziipN/MAQ5xYdybW361FPaZcfi424nctzslw3Q1H5refe8v7
vmsk80zelGb9S3431ne8P8C4bC7rQ3/XnUWvKsnDhD+SsC2HecjOVrRDPGLo
d8/IAB/+rosU47Ti/A6Z+K424xDfW769h30VdqJAXjda8TFwF2sX2iFF4xnn
mRfO+rvicdkyPfI2xhz+UddK4E/4CeLfM+cqRP6Pbd+Z7xFH7BgPnj9TIdrV
DRu4871s1yP6R2J8XjzfFNrzGvcW8E8VifFp4LfjJrSHH2/ke8jr2vDrp+8P
ZD1FeDbtqz2+ePeJvToS9nlJHaVSNwx1qadqN2e9f8t2fO/b0qyMysCeF9aJ
+jXt1Ruw8zNz78B/0dTexnm+b4O/o3zZnfVie2sxr6dGdfg1inPf+e5T89UL
0OHHF9j5gl6Q8a0g/2+LfDtd74v3fW1xMPar7xcBf63DmHl8D5D+CH5nMvj8
alX4ifqUSagf1BjdyRDjzG/rT6P+UC15LvFVJvJALoUhLq0qF4/xqpi/y6gM
+q6oQ3uxD1OzzqCD+t9I+net8unnnrv3BPMP+P5A0ivIa4XfJsa3bSMeGK5T
1fenXsSrFzy7j3nHLLov7SsZ+6qxmu81/w3EetSTt2egr0X29QDgCZm4X+gb
JPDJtJATzFuok4z+QsJ6v7mLeezWHQbhvHL8+A576t0LfHfhDeg/wU5iHNK/
62axj83N7bYHDOmvLzsh2dB/UTptAZ2E+fLwfvS3O+lva097tfeyXHeDdzrB
vmL/lor98uCPS3V/gr5nPtjwoGx3g3xFhekovkvPLPiB96ZK45iH824e4gA6
0/aFiLv6mNMeCr1Me+mDO/xKpYcf/XHJThD87k+g58N59A/LpPDdasfeFMxf
6yvl7IH/aN96L1cgT3XYQNBH8PtYH21W+RP6sSz4xDqv7CLMo7Walyyuv32V
xcznuZkLXHGtaRHoPPw219F9J+VS3zTYe8L9TZPkBuM/W25BPuTffUw8bC3j
l8t+Ak+4/xL2gK51LcoH8Z1RrOeNrsb6oDIpoJtgDxaAzk9iAkAHk8XvpPUX
gD8nqenvie9/4t9X3puLcqZ7du3rEj/zPadMfjkRX75hHvflc5jxYIfP5obv
3SW4xntWLr57dNd03JdRpox/6x5wX2WmsO5j1Vi+F4dngw6HW7dh3ceQFcyj
2/gL4wOm1qfcXnGI74d+wnrE+WNbYP6SekDFh3fmsnzUefasC3uWUhZ2heoN
83yk+kdBDwIPq3PyhrR+1m+KfRuE/e7u85x1WFfeMx/w29g8kc5B46uRP6V6
K5XKrljE7+elsv50jhffhbd//In4f0Qm32Ui64POmouTwbcx21Q4J+2jo7in
Wps6qAO1zr7C+FiXcL4P7O+D8xoVtYnx5apuvC9pSeZ4B6/7H9+1Pxt9k75r
Dr69aMX84NbneF7+g43wjvkxA98t4R99oDvftbPVfJct0JLOkW2MVQZ8q1hx
n/m5E0diHqtvd/kOXduE4ycJ9pu4zhYhzIs1ry3l9/bE+2nGsCz2H7l/i3wr
5jGKcbaGaukd9yTtvarOxsBzuhCvPxx8oimwMpP1O5oVgnPRj/puJuOHa015
vkv6mSDf4KkR8yLumTKPNbEF4pDa9oeYHy7VkekPVDbD+ivc4Hvq8F/sL/Rj
eBnQ2SuP/v8RO77PPrYxwfg95jHSPeS7xxVj8JVu1kjmmzl2Y37jbWU5lUIU
cNNaYf0zJ/B+LRmDunWvjrcoH1c9SZLOEXkXXhej+U6QuZzv3h9iLZFvUOMb
z0uqy1btfws8yHg2+arK0JJ625I8TNYdSHmhAl+xX5P5DdYZNdewHudWMu2f
vzbAzhf89i/S/MCdbu5kffGkhqRDzEfc3/zBfVlX3q0x+9V0t4B80D4vpv49
O4TvzNlF5RAH3nqN9nDbPl+kewe879i1PJeG31kXOe0t6ihjW0xiXwWJzqoW
b7hOy79ZV5K65aPEv/DvDt8awvpT7WrKeZNMzK/I+Jv9B1bc5732vW0OvE8x
cdEeEsfXvYk6d2tVR9bHlW5IvuqjKy+9X3D+iz/ZD3DjccZbdo9gXG5RN9BB
s661nRSXYH8AqZ5FF9qW8Y1vFTh+3FHifdOwnunthrI/TID5n7x60W9K/UG/
u/5Dvnete4B6aqd2T1kv2biYeZ39XlpgnloptAPbXSUf9lEhXrRjxkh+t+Qd
PKoq64YGGDGeM3gY7b2zFYlP7kU7dtoonm/uYdZXmudnSfSkPOkXUdJHEfpL
sBuZX/14I+u+fVsDF+Q+48P215H3GFqzLPNhwscwfzI8CevXHcpBnpKgVyjn
K5615X23gxwo6TuH/kgG8llvm0Xc2Qr5RZkfEhl/Xn1Kymcbznr5DC/GAe72
5DukGG8U8YX7WHcv5WPo9Q+BR8SHfpW+y/Ma8ZDxvbONSE/Huox/TmyC+hTV
xDbMB2t9jnmUUxnHc1kzJkc6L97jKYMwv1t6V8Z/olcxrm5EPOB5T8ap/jKT
8tl3kZ6tFpbcO/YZGNfW1nAewX/mPf1x3Nawr5S6LPuH6VtWsjf0HwX7nPkO
Yt26yJ/qbVinVj2AcezhMVi/n/N7xjPX9aDddZL1wi6xK9nv4kU041p3joNP
wtI207+L30f7Zwz7OkbNLcf3Kb8U5jGK9Q4inUsrsS9tOxf2sZx4knXBES14
3y+cpDxpvY/+8uYH7GNgzLwa9SriYdUP5khymPJhcQXW60n1rZqhcdL7RSjW
GbX371zp/rKOQMwnF/G7G75L58X3f3M7xlva90a8RTfnGvc7qqWdYfxK+7Qs
7Zk5SvRH8un2nOebdYp5lNvzUOcbkDYhRbqPzEPetBa421Y3xmfiepNvrcxR
J5v/jv27lKPZB0PQ/6wD1VmiblHR/j/GM1vXwnfdsg+w39fCQtLtUj7r+673
y5bmoZ6NdUX9lF797ZnEP8wjrXqIdP6cwH39+y/lXtROzJ8QvIV2Wijz+jSV
1wN3WlLA+1LRn/nz9jtxH3XL8yjnFxsxX6l4T3nYLetG0G/sdZD1Z7oHlsAz
69P+adKLecWXHdB3NHjEXL4fBcYyr/XUHt73iAbsQ3hqJvNcMiIskQd4bg/z
DwsWUt+lXrCU2Q+9l3H+4wkWsH+2t2f8ek0R5c/pWAvYAyb3aXe5unKeKQ6o
X9vdqhH74I2Ywnxe/23ol9tkgQ3jm8uHMv9XrKMU7YfMS+ynFteQeTeT2tkY
2nX6O1OkPkgN7AzrtgT9mst1tbc1xLW+Z3leiwU5KdpRaZf5Dl0xifUTDcPR
D3P3wqbMT+oSTrqlPcZ3O6T1oh/4oj3l1couNob9+vS72jHvvWJN7OvkGjX9
r92VmJ/v2I3vREMdGPeuWcQ8yoYrK0jxZPZ3/RJIu+mxjn1FUmJwH9VvZnC+
Zp2B9zqj/y7JN9ZLOhF3GVBX9i6gfX6O301uIce/8J0r7KabHFc/Zb7EnlU5
kpzhu//t09RrXxuzPtd7FuMnN01Yh7vsXRHWeak76RpUmnW4toNldbiqwZVx
fyMqh/Bde1Mb0vPuWtwLs8AAxm1mz+D5Gjmw3r+CLfvp3ZH63oh1BOL8BxSF
svU7GTGfZNxCGa4eUQXj/Sy68D0luiLjeGK/BXH9LzOwL3Xbt4yHh3H8ugez
5XXBDxiHjDo3T4aX1JtbzB/MOusmvRj/l/D0Kf9gPaqr/RFnUO1UQM77tVMU
SOfOvjHHQ+2lPAHYA4Lf/k1aD+iQcMSMekryXwS7GrhPSBP6xbW3sU4tuQz7
Az99Tbm33Wwyxo8KZX337HM4L8H+GwT+vZBBvfP6OcaXvD8qBm3gOhNcWTcd
UY3xwIXzeb4TxuN8lcU1rsr2+9UC8yv2bXoiyUngvaq3Kpad1/QFnKdiOMeH
vmYexaJ/uZ7PEl5C/5O3uK+9eXJc7Ash4iuHYP1K//gxhuuJ6rMU61Q9anvN
EA/LqUb89um7hrhL2UeYX5dbj36PE/szRHzVU79sK2a9TOWfxLcXEY/tTL7d
shnn4vRPZ+Dq7ezDrd/F8W7ztzNun7yUcjiBfSoSih14jtumZv9ejyP6yrLv
68rlMtzHqwX7Tz60pnyLX4y+CplfwmlfmUZT3op13KKcH3Ge8tP//Hfp/qJO
OfLrKNbDLmLdsSbaDPNojwVwnvcH/tQjs28z7WeVHetU5gRhv4d/3ad/VDmw
JI8S/Ry00XUYX81w+9O3QewXneB6Ev9d0y+fcj7Q0dD/Fe5LPuXodsjVIPPv
fCfekMy65o4zMH/TzLP0g36upB6ZvxS4+vJt9pHYN5158uUcUf97Q9mVcaHX
IVK9dgfohV8JbuyHsuLQn3MR5Xm/yiXvcH/6RYv+/vof4G+tXawMn/Z9Iuuw
8mYzf/OAwOei3jz/inGzQeX/9McQ9cu/myk3FdP+4KJ+32YLvlSe8ASurGvn
aNiXSfXpxZ/vCvuyOfH6CvjHqxrpmWaD89JWPsp4bEXWx6lWl0I/jczHO+Fv
qh80+3Muot/nOxP9YJWXnWV9szVlKnCe+VmsR0tkX45T1RW0N6qPJV/FGoH+
p+x7sr9lKOsRBb3B/icTc9nXYlYI+xG9t+d9/7GbeqfFo1QZn1eu/UGS27mG
eEk+jM5ixh9cvL97jlJPDY1LkuENH5TkrSXL5MCRO+zvIfmbv+XGwCTavffm
IF9YFe5PfLAl34OOT/xqON7igQntRjdfGb6upzn9wTXVMw3x330/9ObfZPfd
aiPyBtXPUmjPmIdAvkWZjfxpKPdK5LxgP8hwxZStDtK7kkxOqqcsZ371oaXs
h9DsI+OQqQeRj302xZl5yLk9GHcpX4V1r2fcmHfd/j/k9an272b96fbm8n4L
EdWYz7x6SoEhrhy6H3nL3j7jKR9NFkv96SswP9zBmOMzHaR38JvIk89uVZt+
b68KxK0TUGftfW048/9X5bBu+NdTCykfm/m3k7fTXm75k/0ugr6y30XzDOYZ
Di7nINXDAtfU+8L+CmLfJ3H9z78V4b9L+lpIdX9nL/hhvOqtF+vZ/79+GiV/
tOfymJe+pqe8vl6qc7dLOI75S+yr33X9nbphHl3EetoPvf0dpf1y/albaAea
LuD4uotQ76/3Wo9+JvroC8Cz337+JVvP81nsAxA3l/fTnn0GBLvSUcqfZ92f
VMequmpL+nS/X2Q4j6b9Gu73xlPZfhW/7JnPH/IM/CDYb2ul9fN80xYUysZn
OthLde4y/tH89Q/WEzLlN/35PnB6Efc7NFi2L+UB0s313m3MU1KvhL5SIh3q
WGOd6pRCxhN6VmTd5fknsn2p/mlEPi/ayP7+301gByKfR/xucFRJfv6K3/dU
nGdsJcwjyNsnhrjruPwiSd5FGeLZxh3Y72NEz0+GeEjfevkSP1D+xPF3ASI/
D2dcoC3rf1W3Z0C/eOnpb6t+sB5Uu2ke5vFv8EzOb0FLHAz7hyi/WOL7CvPZ
/D2C+X6Mq0r6UXOTuPPC2axLj7fNNlxPyq2GjC8PSqd/bTMH4yMr8XdTFNMW
059qPYv441Tu51L3P/KZ9VCQvwrrVBnu+dc3vuMeGkw9tckc311pzXxKfeER
zp9o4mBYz6huNvCPXWRAH0VzmzzZdy/twXuDcgv7jahmFrBO/H115r2rB7DO
7tMqzn+3Od+5qzmQzsFW7Jd1bxLpf6wD6Rb/hP0uej2hf/LPDtahTOmCfgIh
y1pjfXofx7ey/TbYRL2SkJljiJsaV+U7wfAg4u/Z3yNkTDva99+3Sf0P89nn
Z18j+glxvfneIdqBopzxLcV4QYjTN0leORj2r9CWusL1WrFfkN3cCty/1G9T
ecKU/Jw7h/7whI2Mb6wIID9b7MyR7tcX2b2YN4b24oSan2X833g744/rTb4a
4mePrqOey6rOeg7lJspb25O0m7d/ZNx7dA3iS4fRb6yTTDvBWQnc9VZwliSf
ub+ptuxn8obvNIKcJP2ctrDPj6NVST/0P/Ye65ELJLokydY54SpwZbe+Mtxu
ogvkj7bWRfKXGI8Sx897zPeGnFfsCyL2czOoj9ZWGco6zbasX04J7/lVkhuk
T1wgv/tmJ+NHLY9J9SsayucO9tSP/91m/VnLQNAh7mN3nnez2+xnGE494v/0
LuuwRiRSTj7dju8estnAePrgYYzzj90JujmXtuf6/s6j3bLxC+XtKiXjcWUC
MF5nbMvfMcli/Euwe1lfLv6ejniPWoSX1KfQDjxfoYJ0f1lXqN8h4/8SuaTO
ZF256mA53rs+zakXjffxPg5fiL4HQRGZvG8B8/7IE/Fdz6IT667F31USv9Oj
AX5/4Vr793xHCzDHeMHeR933ybFN+B535T35a+1/9tK9pr+xrZjx0tqHYZ/4
X/Yuie8gT0wTGEv7ZLkj5505YbEkR1lfv2EP7XhJT2kObaM+XfAS+lEX1/CR
IV+FzOpLe0P6PaDf/LZ/B+vd6sx+Y4h7z0jg/PUWQr6ir5R4XntCiD+0pt21
d1YJf1KPp15gn3BFNazH7pvyh+y7NV2oxzX0xwT5zL4ojzeSPvlf2ZdMytsX
7EzO0/ci+3RJ/fkVZcuRPwc+5PxLkvhd2zPsL+TYP0/iE/4R+yeIeIsCWd2c
9tM91G/6uyjkeKWTwO0ycnMNcXX9h5aG8kfwm+jn/WrGPgnObUt+D4vvL0t1
kNvZc7PJ9/XZ30Lhxb4Egh1F/ijpV1mH/ViyIy6W9N3Qc76dtB/s1udJ9ET+
vOavVvxuwlpZ3xhFSH3eu6VHeI+8GM9XnK9rL8klyhOvatTDi13ZZ+Y8f99I
uL+Ma324jvXH7fXiPbE5QPv22DX2t2nG/o/KyEvsE7WdfW9Chr0uoSdwVQX2
dxLsZ9m5KLe5A/fXvJfh6mmZ5viuSRXSJ9iKdXBD4/B7RnG9OmZL9GSexQQF
xme7SP2dJHtJEXKkvGQPsw/+oPLsQ17Bgvs6ckL2Xe2SfjbSfWHfYel3oPRN
2tpCrj5Yw3rjNtSH+q63bIDH2Uu/98b3SqXVQ+DOtkXsM17ynrLsCvt4ZMfw
3kpxNnXZi5jfdNYufu/QXeofszDgzrVt+M73ln0/hL9RZ+28kb93pR+9h39H
t+LvxDnn87u9x5AeljGog04ZNYrvmi+iqdfmRqI+99D0uvzdoAH9+S6jeEN6
DqnB9TXXsI/Eu1T04Wny5mlJXhffbZ+WBR5z/RrraduXY3+A6Hvo/7yw5nPG
i2Jrst/v+wHWiEvcz48y3C/eAUXccZj0uymFWdI94u+LWYyPl9ZD/TLUjnH+
GX0Z777H/gY6a08bqb8N5Yv0exzoFyTGSTarmbcg2WOKnkNwLk3KDn8mySXS
fyD1qW/jT9QvkfXJRxNqlsO+RnSl32g6iver8w/gv5xe83cOoqKIi/3DRTvN
hPyk+/sZ9bhYFyzi/zjQXs1hX3Hd/DPgn0OFtVhvbLKY55DZBbjvwWzqtZeV
+Z5y9Qb269UvjO9nL8Lov5pGc1+7y1MfHfiP+rR7L9LnwC/239g4nPi9luTn
aH1Jnxfabxf6cT0ZwcxXKBdPe6lpA/QzsarSh/XDYp6Z+P9ntgYetC+O+Ygr
Hf70f6adzH5hd37RPlF2JJ8ndeS+pN9z1NvvZF+UZ+587+/XPU3iW/Bz5JgJ
JX1aSD9LL97rL8yX0u9qV9IfiX26kqvRvt3jy7yvATe4X11N1ueqlnyW5LCt
VBdc0m+X9o+rK3Bf0wtcd0Q19k255GZr6Ecoex38KtGP87w9RLrtPUf7dlQk
+/idD+I8h1uQHpO3s+/NAR/a+evqsb7+rtTHb9h2qQ+OH+2p1AvsY9A/mfKo
UTD7roxZlO1ukM+jUn9g3kqpK+hnbnXXnXlTF1Tkq4bfIVddt76hXmh5jPyy
LxP32krdjXGc/lvJn4vusa/CYUl/SL+zpplgYwo+dGhHPd3sI+327XmQM6bv
cj5I/Mz8q+fn2O9uyzTamV/vU86opN+nW7eX966wzWfpfqF/hXfWFPL92leM
w4QnoW7a7vZUSS6XQZxHUbMIuOvLBMqRMzuvS3RFHzyrBG/2YXldO0k63yLk
lS17y/xIlR39vztWZcHPY5LYR8vmwBdJzrGP2a7SjwzPXdlmUy7yEkPeMF/r
1QTKRe9ZeciH9P1EXKpj0iRFov49o9pgvivf8uDfc65lYx7fucwjfd78Ffm2
I/pj+G4tx/4pg9JJ7wHvM5D/dmIV8+ClelLdmOvsS7BjlEzfoc5F5P/4Sbw/
7i3Yh0TCnS3vky5V0p5L8hC/a5ZSmf3ZS+o9df0dzECfH9dfS/K05Nxl/WSU
xTUot+t9wXir8YHUg1s6Me/o3wbAM0yteC6vCujHnT+YJvu9MN0w2hszwrKR
d7q3GusBh8bx3P4biN8JFfiQ+Xwl/U8ml83C+NbVGHdrlc/6VvF3ZcVz+Xkl
WuIf1hsumoR6c9+MGuTzfhH8vTvFSNb7T2PegzJ5KfM3tjz9hfzPhbtJxwd7
3v8+d5GeZf2l332Rfg/uW3/Ws9ccSP1uFsbfg9s2VWHY70VRdg3zc30754L+
I5ozz37xFtYXPEuBvj4bdiFLOhfWOxxPyMD4zNfIT1XGdka+sz5Nlwa8/yLK
W6nvhCBHP6F/wvH+7wz5RPDDgHs+qi3D0c9HHG/Xg3JsXFvGSy3VsE8OpbUp
0Rfk37mexpJfT3uo72T+/texRrRn/vrG+xOs5b32HI1+C3FmnvJ+CwE/IK+8
Y6fnGOLK6jnlpLixDNc3z0C/Bf/Zjamf3s3D70sqd42EfDgbtTpbdi/mZ2F8
9nuVDBf8Hsifs9OqZBni2ttaE8mO/SbDz1gA9143R3pPXboB/990FPtiLWnz
VTbe6gf7OVR5Ku9TkXuR517SV/ChNX7fRr/Yv4zk78jooxx9C+duWsEkWYb3
OpjubtDn6vef6IpFEs57K/W1VjRqRj6fUlXW10JVZTLW71y/i3z9n7rxdxj9
m8jGK7Wrwf+eRW8/GeKaEKfv2JdpXRmudmwFPnFVSPlJZmGBlLdrjGCfO76X
7VcR5A3cu32knA5V7+O7kcaFsvm1b6/lSv00UmR84r4ffTBS8mg36BuOnwg+
/XUGfTBWKnySpXsUin+nfJKJ+5L9j4zOgt0BfGViEzn9q+f8dGf/HFkfD0H+
8XckLZgP9/tPWBWey4X68vH1vlDfvX4n59sHNcpJ8ToZ/+telgMe0jNHPn6r
Nfk2ZpOMb5V++aB/3NjVMlyRynM5W7m1DFd3r4r7YjczXHYvBLsP+NnM0/L7
4tIJuKsqVj6+yWvYM3FPysn8cWXxHr4rlb4ri//ryrNvofedy3L83RHYUSE/
O8veBVA/53f6jMeAhSeuG+5r36aX0PtTtj2V0bn6WOAnr82Q4z6HP0DP1lC/
leGzZ7yHXVHvXaKczsHvoI+CZ76U4bNCwG+mU9w/yug57DT4LbLOIxn/qI+q
8buKVtdZT/X7T7OPrH9pOuqhbP6fK9GvwGnk4yTD/eq91qOfjO/+e/J+MiXx
osdXsyX9Sr+w5B1zsCXz0ya++fPOKNK/5QTQX9OkF/an7RL+Fn0GTEJl39U9
VvH9pWNV+ftLcQ3ie/VF/7Me1iPzPbfT2s+y9fh+Zx7UrXGwE/Qpk9AHPqV5
QqpsnlVj2Tf+61MZLtzfeHfG657I1mO1lnJ4oo9MDgt6E/OU9KUp+aOaXp78
Vn6I7L1Sv+8U+2Q2TcmX8UntbXGoL1tcWW9In9/vyyHp/J2Ce3NO4N9VroY6
614dm2f/z3iRbuHV8V6jD/txxfBcXGeGA9c51t2Hc1m5nHijN8X/Q2cx/6Fy
W+Zj1Jkte8cP7h3MPg/m5//g1FOs6zhwNUv23XGsb1GnFPLdQL9jI+rFrnd7
KLt3oSPYz/PuvzL6CPITeJzlfDleeAT33bVanOy+a5c8hh+RXcFZFq8T/BH6
F7FvZfJQYWuP+2jVKv2FbH6xb6vIJ6dby/Sj4D/CXvJ11CbJz3Ew41fncuTx
K8keE+Sb/LszwhA/DEmcKV9n/CbgrrsnyPDf+Ujjh8ve5XVtNzC/dMhQGa5t
5wL7xLVm/az/OV9H/D4U6wssrzEOnRNmI+Vl5f8PX4nje2zi7zJHV8w2PN+z
g44wPtLuKs95ShfI7ez+N3P/57uiXX1hNuNx+kaM75bqTT2+/pZcjysYL417
2kJ27upMxoG9C+Tv40qfi+z7GjxCJudVNuHst7A4Qd7fYEBH0Cd7cov/pQ/j
aZAjyhfRlH+pF9BvLXv/vO//M16ks3ov5VjXOnfwd+I2B6netuj/omfAmVrM
u9t9jN+fsJd5g+ll/jcP0OD9VJdb7w/927TIHbK2tEL1/48X91tTJcuLU42J
tZHy5eR0cKwLe8Pz5jSZvaF+fwD6KDK858f/a7/e8THU+9Lvm2v879pI9oDs
vFRmLugPkP64k7yu2bQP8Kjg/jJce4x57OlHbWV00Nc9jX4Ffs/N5POMSMyW
+pLJ1qmtxd9pjWsS8Gc9/w9qOurD
    "], 
    {Hue[0.6, 0.3, 0.85], EdgeForm[Hue[0.6, 0.3, 0.75]], EdgeForm[None], 
     Specularity[
      GrayLevel[0.2], 30], 
     TagBox[Polygon3DBox[CompressedData["
1:eJxNnXW4lsXWh/d+wkDsLhBbQY8JBhaoGAcLEzsQUUIxsBWwuz8DRUU5IDYG
xjHgmBjYHQhiYWH3t27W/V57//G7ZmZNrVmzZs3M887M2+GgQbsMLJqamqbM
3dRUhtscIIy/CtSBOQJzBuYKRLKmNoF5Am0D8wbmC8wfWCCwYGChwMKBRQKL
BhYLLB5YIrBkYKnA0oFlAssG2um2179coENg+cAKgRUDKwVWDqwSWDWwWmD1
QMdAp8AagTXFv6StFVg7sI7uuvrXC6wf6Cy6SNsgsGFgI4F/40DXwCaBTQOb
BTYPbBHoFuge2FJsJW3rQI/ANoFtA9sFtg/8O9AzsIPt3TGwU2DnwC6BXoFd
A7sFdleWewT2FHtJ6x3YO7BPYN/AfoH9AwcEDgwcJA+0/+DAIYE+gUMDfe23
wwL9AocHjhD9pQ2wnwbal9Q5KHBk4KjA4MDRgWMCxwaOCwwJHC/wnxA4MXBS
4OTAKYFTA6cFTg8MDQwLDA+cETizKXXvrMDZgXMC51rOeYHzAxcELgxcZD3o
5cWBSwKXBi4LXB64wn64Ulwl7f8CVweuEddKuy4wInB94IbAyMCNgZsCNwdG
6d5kv94SuDUwWuD/T2CMchobuC0wzvaeYTtvD9wRuDNwV+DuwD2BewPjA/cF
7m9KXX0g8KBxbeyzCYGHAg8HHgk8Gvhv4LHA44En5IH6nzQ/5UwMTAr8L/BU
4OnAM4FnA88Fng9MDrwQeDHwUuDlwJTAK4FXA68FXg+8EXgz8Fbg7abU3XcC
7wbeC7wf+MC++DDwUVPq+MfmpR+mBj4JTAtMN+7TwIzAZ5ZJ2Z8Hvgh8Gfgq
MFNevg58E/i2KcfRTuZjDH0X+F46NGzKrMAPgR8DPwV+DvwS+LUpxwNj4bfA
74E/An/Kz1+Bv3W/0f1HP8raHCias17qZGyUzdm2qjllUoc7R2DOwFzNqSuM
g7mbU0fahDtPoG1g3sB8gfnFAtIWDCwUWDiwSGDRwGKBxQNLBJZsTpn1si+W
ak4bSjuXbk57uUxz1rWs9bULtCddc7addndoTpm/Y1lf2Af4GZOMYfR5+Ui3
QmDFwEqBlQOrUE9gtcDqgY66nQJrBNYM/CuwVmDtwDrNacvXDXc9sb60zuF2
CWwQ2DCwUXPWuXGga2CTwKaBzQKbB7YIdAt0D2wZ2CqwdaBHYJvAtoHtAtsH
/h3oGdhB+e0Y2An50Y+BXoFdA7sFdg/sIfaUtlegd2DvwD6BfQP7if2lHRA4
MHBQ4ODAIYE+gUMDfQOHBfoFDg8cIR1af92DTc8YGNCceozbXp0eGP5BzTlv
raUsmb/Ie6T515JGmkGG8R8V7uDA0c2pj+gxtuuYcI8NHBcYEjg+cELgxMBJ
gZMDpwRODZwmTpeGbcZGDw3/sMDwwBnK88zAWYGzA+cEzg2c15xrg/Obcyxf
0Jxj6sJwLwpcHLikOW3wpeFeFrg8cEXgysBVgf8LXB24JnBt4LrAiOa0U9eH
e0NgJGUEbpKnmwOjArcEbm1OmzCa9gfGBMbKJ2XepvzHNafsh4b/9uacs+4I
987AXYG7A/cE7tUlPD5wX+B+deGBwIOBCYGHAg8HHgk8Gvhv4LHA4+ZHL54I
PBmYGJgU+F/gqcDTzTnfPBPus/Ydffhcc64png93cuCFwIuBl2zjy7qER5tm
iuleCbyK3AKv20dvBN40nnRvIYvm1JF3THO2cnw38J5+3PcDHwQ+bM75+qNw
Pw5MDXzSnOGpxqE3pGWtyDpxWnPaaHilf6YHPg3MCHzWnPMLc9Ln4f8i8GVz
rjVYV30V/pnqyNfNme6bcL81L2H839kf3+ufZRj3B/0/Nuccyfz4U/h/lpfp
+n8J/Br4rTnXocxLv4f/j8Cfgb/sz8f1oxt/B/6hz4pchzYXuRYtwi0DVaAO
zBGYMzCXYfysE+CJtQJ8zh20NoF5ilwrtg133iL1c74idRQ/tPmLXCMuEO6C
gYUCC0tfJLCoLuHFAosHlggsWWQ98NbgcW7TLhVYOrBMYNlAu0D7IsfkcuF2
CCxfpIzR+RWKXEOvaNxKRY7zlcNdpcixtWq4qwVWD3TU7VRkH9PXa9gO+Fyz
SLv7r3DXCqyNLJFrkX2/XpHrIfKsbxmdi7RNXYoEfmzUBuHfMLCRIA7axkXa
i67hblKkLULHNw3/ZoHNBetnaNhUbOsWRbrdivR3D2wZ2CqwdaBHYBuxrTTW
8tuFu734t7SeRcpsB9OSZ8fAToGdLauHZUDbRf5pV69wd7Xe3QK7Fzk+WO/u
Ef49A3tZT+8i50vmzb2LXO+z12Atuw+yDuwn9i+Sxr7ngHAPDBwUODhwiOgj
7dAi9wZ9i1zHHBZuP8ugrMMDRwT6BwYE2IgOKnI9wzroSNMu35T7waOQc+Do
wDHiWGnHBYYEjpf/E4rcO50Y7kmBk4scd6yJTylyLJ9apH05rUgbc3qReybG
5dAi95DDwh0u2GNCo6/PKHIOPVr/mYGzAmcHzilyvX9ukWvg88I9P3CBuLBI
2kVFrr/ZC1xc5Dqf9f6TTbmuZy1/SdAvLXLfclm4l9vGM5TzFUXu2di7Xanc
++kHV0n7P8qwTQA/bbumSJtxrTJAHtcVucdgr8HcMiLC1wduKHK9xN6LvRlr
efSgW2BkxN2oruyrjkC7KXBzYFSRe8Zbwr01MDrwn8CYwNgi67hNjJN2e+AO
06IP6MKdYn51hLLusuy7w70ncK86xNqYdR/1jA/cF7g/8EDgQcE6GtqEwEO0
u8h1J+tP1systx8J2qNF+kn/3yLxiDR0ewH1e4B1kO4O9b6fev+Y7dlf3X88
8IS6wn5pRKPd6ECR8/nEIveP0CYVif+1opH+KTHJvE+H+0zg2SL7iH6YSl8W
uc59vkhMLpI2Vpk/ZT/Qzy+IF6Wx52P/9lKRLmXjfzkwJfBK4FXDrwVel/4G
eYu0J6yz+Ub0VoTfLnIf/06474q+0rBDPbVFI2zT9eogfmRGOe8VOc4BYx4a
4+P9wAcCuwDtw8BHRZaNDcT+fSymFknje8Un8vGybaIf+BYxrUidH2KZfBeZ
Hu6nRbbhHXmfrhyQwYzAZ0WuO1iPMnYo43Pl/kXgSzG9aOmfr+wf5IXcZhaJ
r6WdqE1tyO0keScv8V+b9hvLY6/PeubbIr+fTJfX74psF+1jrHwf/llFlvVD
uD+KwdIY9+TDpk9Vdj/JE2373H5BNsiI+Y958Gfl+aRy+VydIN90eaLtlAG/
hC+0Pc+pb7+oyzeoU7+KF9RX+u1Q++5V07xsH3wi/4MN459hu441/Qz9Fynb
4xxfw9U3yphoHXzDO9TwhcqlYRdP0DZOsX74YB6lvWONZ62KzLHpzAW/iWuk
vaasJiqvidY/wzD+34v85sX3Lr7FYA/+KBJ/FkmD9w+1LYwd2sG4vF73BvG6
fPJd4q8iv018YN6/LetM6+BbEXMWc9c/RabjYzHflprL/H413PTMf93l70/5
OkBac2ab/b0PO4+N59vUeMspyuzz7k0tNqwsc46pygzvox+3LlNPpmqb3pSH
t0R3dWiqZZGPcvk2SLmlZUKrbcd9yhf5faD9e8tynrYsypmqzaVe2ky9b9r+
N7WZtGuOMtPhPmMZfyl35Iy9R7fob9qPHNgnogvYIuZkvtPR9/DFNxnWN3yX
Id8Q9fIb7Q12Z84yv2vOVeZ6grE5SD0coi5Oc0yitzc35V5ylLaO9GOkUQc8
oqNzR3ltylyfEMYPjTUK/nnKXIew9sBWEIeNbVvm+uVRbQR+7DP7HdY9rJ/O
1s86inXYOfI5b+Sdr8zvtU8qD/ihvvnlZS/HGm2k7CHWxXqJtdKZjuEh2rEF
ytyLLShfbW3DZfrbGIb/RjtoL2253Lb9JBYqW2iXW8ZY20F7WMddqLwulZ8L
Bf7zdPvoR4YHGcaPSzuQ68Jl7j1Ywy1S5vp00TJ/P2BNOti9COkXC/riZa7z
cNkX4ictvzOwX1lCuS6pS3iE45RvfoXuOP2sWe/UDiwVaZcukw8wTBoyre1P
5gHWoKw9lwn6smXu/dqF2z6wXKBDmflYm/IbDr/lLF/m/pZ97gpllkMZzCkr
RnilwMplrl1Zx7NfRzbEH266TfXDyypl7rFZ689wrUs/oyPs65HzFsoYd2H1
GJnuqqwWNg1lrxr+1cr8rQT5r64u4icPYfYZ7OOp91pl39H+6FSmnz0+36LX
KJPHU01/qjy3t2zKRIf5bsb3eL538c2b7+x8g2YPwryOXrPXYc+ztuNqAfuE
34QYV4ypueyfWjkgA75xrGkbaMu/1CvC9Bd7hPaOG8pcR32Gvyt0zyxa/MQx
Nue3Dfj5/YK2TXf/tIU6zhplYlOuWR6xT+ibn+zfNeWROPLC05ry+C/9pKMN
8zt+51L+jMG1rIP10BNN+RsA3//nVNaUuzZtCqxbpjxpIzL61D1je/sIma0X
7vqBzmXq4/q6K+unD2gPcl/PPF3C3SCwYZm/s2Cvp9hG2jRDW4cNZv/Fb62s
I7HpfJvluyy/y/B9k7wvOxYZu4xHxsRG8tDFevhdZ+NwuwY2CWwqD13sR/SE
ffFm0vjNkt8uN9O/OTrP+DM9abuXOX7QX8bTdcqonXrWbJoty5yHmIO2Cmzt
mEEv2W/zWyXflvjO1EZb3F15baRLuEeZe/kTrR/Zrm/cyqbldzLkxTfglY1b
v2xJR77O6sA2ZX7H3ZY2lvmNa/tw/x3oqbtDmfty7CHlPuB44rdd2vWMNH6D
29H0+HF3Mn6iaeirkc7NfMucw/7EPV4/vwmx/mJ9sLP6sUu4vZT9rmX2/W5l
0vm9jbJ2LxP4G987h6gnXex/+pEw+kN+vknuUeZ3yfdMP8XxgPz2LJMv6ibP
XmV+p0Qu8Nzb+L3VjQ1sM98P9ymTvoG6tm9gv8D++nH5hgpP8MZvj3zz5fv0
AeoLv7Xe1JR1dFMGjE1kwxqK3+IOLPO3g82sp4sy6mb93eRtb8ukPNZD1+ne
ZFvpW/oFHYXO9xjsKr+rfebYYdwcpHuwfvjBThxS5tkFvts/oWw2t/7eurQD
Xvooly1MQ/jQQN/AYcb1cdyyDuxnHdgA9JCxfpjp+X3xgVb6yPejts4l2GVs
F/NBD8fZzU35XYd1FDbmDnWHtSLrSdbjPRyryIBvzuj/CMcAZVIe88f10tso
yzbKbW3ravCEO6duD/20ZR7LhB94wdbBH9/zd9A9uCnnKdrZV1kWygMbjb3D
7s2n/n/muvd928JvsLN/Ayiyre9Ja+hvX/uAzQhrcNbS9CVrnHHKBpvTw75m
fKJ/7L3YN7GnOluZYZfomzu01+wBXzdtD8cq5S1pHy4hz6SnDvh937TwQXlN
1k8a1lx8xySMnz3J36ahLvYF7BPYn7E3O9l0z5mPdTzfFVkTs3Ym7QTjmuR/
snmfU0ca60HyPWpe+ot94EX6cRv6xHgaZZn/WC72jD0Q+yP6E5s/VB1Cl85R
Lw+2zw8vc8081nF6k/pBHOt29iGT5WGCMmCv+pf8X24bJpgGHolnP/aX/UKf
/K4c0Dv2Ea8owwmW+7vlvWQ+8l+u3P+x79kbUhZrC9YQ/9V9RJmxfqAttAmw
N/ncMO17UxmcJe073Wm6pMXP2uxn9zo/uT77udVajbXO1srwZts0ynGELTki
0D8wIDCwzDMOg8r8fnpkmW2kn2jnM/rpL/at7IXZi7LXZU/MvhV/bZjxiD1u
nGEZbxr2ruSb1JR73FPsK+wkv2Xzu+omjuV+juc5HN9ra1MZg/AIr0cZv47x
B2uL+2kH33XM4z8rVa9psLZ1Y93ByoIzaZxHw4bzzfjocI8x3UGmW9v6GfOb
yM+62gb8XbUHp9k+8h1rXtrez7YcV+bZKc5NDQn/8YETGG+M7TLPxnW1fOo5
2zLZe3HmhLMojXMnzHece+GMzgD7cTHrRh78NnxymfNQX9t8hG2ivfA3h/a0
t7QB8n2K7gDb0N+8tJf5Bnn2N+4UMdg8O8rnx01ZP8zDA26hv6v8UB7uYfqx
v/DaR/cI/X3kYUPzdbV/SvmhDfA/UJ4nWg/1nVrmmZvTzN9ffjfUZc3BuTHO
j50e4aGBYWXuo3a0HTupI4tbB2HiPxP4WSPQv8MDZ5QZ5jwQ64Z+1n9mmef/
WOP8bdmcdRoqH/BDf/5pPZ8qS/yk41wO53M478aZSdYX6AC/qZxV5m8o6O/Z
6jDlnmN7OGtwsGPkYMPoyznyPMy05DlXPWWcnVfmeSbC5xk3VH4GGsbPNzt+
b5nUlGefjlQex8jPOfrPUdcpi7F8vrz0c6wMdByca7oTzYcsj5KHwfq/dyzh
DrMd51gfbaNc8nNe6oIyz099b38Na7RNPk4y77n233DLGaou0FcnGQ9/8MQZ
DmzGMfL5kPVRL37kMK0pz4FxHonfHvjd4cJIc1GZfTa4Fe98+7y4TFmeYf1H
m4b42fajTDvI72fYjkvKtCVH2WecN+N8FGejLi3zeyzfVSlztHpysfI50bZw
7ovzJJwr4ZwL574473VZxF9e5vlf6MRjq68I2pWBq8r8vZjfZzh7VdnvpX74
PEoe/y9wdZm/0XFelN/p8CMbzv5xfvQa0wB+o0Fe6Adn3jiDhkzRL2TOb4nI
cZRp6MNryyyL3+8o+xLldYv+EwxT3rXqRS91ijLoow5N2a5ejt9GHPVDW1Bd
us7yjrecE3SvlXaB4RHhXh+4wfTXysMg3Wst/1r54mwz5/RGWic0zj3eaF9c
Z3/gr3Vv1M95Ps4z3qSuX26ZuF82tfiJoxzsyRzav9HqAWdaby7zTBr2alSZ
/b2UtqfS/vyhflTaTuq/pcyzUu+oL5dZL3XiR6e+NA7/76307HfD+Cn7Vtt1
nXEN3ZzDuqhzdJlnazg7B7+XaMM5A/afcMfYDmik+c1yKI98/Vrlpc3k5wwc
ZzM5T4Wt3k573ZALcWdaLvk7mPc35Ye/kbaDPOE/07xjy+T7tjLtPfMVNp/5
ivXQM5Z7T6s5A5c5DJvPvL+s/cX8Snr4o4y/jGfeIs0/zh87OleQnzr+NG0j
z9+2kbz/mJ4zrZy1ZQ4dF/TbyzxXh/+OwJ1lnsHl2+NE7QKyfUZQDzTKpN5v
lS08jzYfPE10DiPMt0zqfNUyOU/FWSrCfIOiP+DjW/O+bjz9zfdP+Bpnv99V
5nm6u/Xj3lNmGbSXs4YAP+upcbZvtu40Nc1er8DrV/JSOB7oB/qRc3fNrmvu
LdP/rH1G340vM4we3VfmXYH7w32gzPQPBiaULecF0ceH5BFeOfvK+YPlnUOw
qQ+XOUdO0hZiX7Gz2DrOyzxS5llW0pP20TLtJC62kjMJnLG5Sfdm/cSdpS3l
rA2/o3E2gTmK+YfzFMwdY5w/oGGD7zY/+f5bZnrqZe6CR9b8zD/EcfbiPvFY
mTTO/MBT44wE5zg4J0Fawo8JzmxAo+zjLB95HGd9o+SNMuHn8XCfEAPkkbgx
lsPcw3zEnHCHtMbceLdz8HzydLvyQC5PlukSh/9J0zXSEK6Vz0XyyZronqLl
3H1dtqQjfL90aLdb993O17j3tvKfZbnMmXfZ9w9Low+Z++h7+pv2Macyl95i
my9RJx42PfGcd5lY5tzLWWjScwaduYTz1vTRw+rLQ87d1E3eY8yPSxx+8jNv
D1G+hPFzBnsSbRacx4YGX8faH+gu53XQ5fXVf87ePBVxT5c5vzxTZvgWeSbv
rKJF1+GTsz7PRvg5MVDaLPmeqKz627bpyqzRRsLQF7X96OfzET858IJ4sUza
hKIl7UTD+ElLGD8gDWU9L534WcoeGmcuOHuBDLazvhfF9tJYG7wU4ZcFZ+Sh
kXYJ28e6gzmbeZOz8ZyL50w8NOKusJ+pj7p2MB/ha+QJGuvUj/R/ZL/iZ220
XFOuB1j39ZRnbM/eljmlzHUha8KelrWD/d9Nnjo0ZTrO8r0S7quB1+R5C8vu
pn9TgV5sZl34G/S9tX3EvR7uG4E3y1xDNe4D4BJmbfWWcciEdnAXhDTQt9Dt
bnp4JMz9iaWNa5QxxfRvl9m2HvbRO2X2E2HuHLwb/vdM00j7njzC6/uBD6S/
Kc8fltkW2kmZI80z0jTvCcr7SHwsjfS4U8U70j4pc18wTT1gnXqlfUVb6BPG
HGOPex3IhnRX2T/cGZluPxGeLq2N9FuMY4xyF+TTMu+VPCWNdTD3TWaE+5n4
XBp3I74o837Cl2WeMecOwlfhn1lm3NeBb8q8Y8I9QO4DfltmGvJz34E7Jtwv
+a5MfF8mbS3L587JrDLXBpy5/yH8P5ZZTqM+yuG89gpR/k9l4m1puD/JHy53
JfBzH5A5fXPdn/X/aTnkZd3HevM2y7vbMrnHwZ2MNQxDv1c5cI+D9csvgV8D
vwV+t11/iD+lcb+jj7Ik/i/b/oXy+cowdf1dJtZUZoPM15DTj8rqH+W+orJA
7rSZO0Ms/ulf7pc0V3mXkjsoRZVhsJ40yiN9484Pblml/KETj41nXX+LtNL0
6CF3mBinM+XtC/vsR/UDPpHzaN0/lffXxo2V95n22Uz1Bj9pHzf9P7aVMr4x
31PqADTKQI9HqIszLRdeqirdr+WNcr6W/rV6S/toJzpwuu29zXqou7E3QE9O
L1vK/cFyx1rvbcrrKf1PGfeD6Rl/AD/1fmMaeGe81lXuSbEJ2APubyF39lbY
Y2z8HFXKnTHOeP9FmYywLZTFuJ4u8L9m+TdIQ0/mjHLmqtLeYE+Yh26QF9Jw
f4z7Xax1qYO66GvKgqdXBLyxJ9za+WNLbQzthH++d7S1rGUti3UMcyG2nj3l
q5bV8N9q3Ku6P5mHPTTrH9LeaDrOArMuRy5go1bpCHc2TL0/Kz/C+Gk766DG
dxP4X04sb1rmQuww8wy0LpbLGoi5HrtMftp9lWVR5od+K9nSeOYn0i+jTDfQ
ntPnyGcT0VaZbWS7Gvf5qGfuKtGmShplwU9jHuwij/Dc4HdF889TJdpWLbQ2
0ja0Xuqc1zBpuM83Q11EJ+G18Q1rQ9MS/6lpGrpLv48wjL+N5ZOfvOTje9jG
ljGfmL8VHf8CVc5Dy6lT5P/Ecqm3nXT4pH54W8W6VzJuJeOaHH/LOQabHL/Y
M/zttZ+MiQVFKZ01AOsj1gVv6Gddw3qAtQBrWdYF0AbpJ26hKrFwlTSAfxHx
hjTWiawXWU9SFutt/Nyd4d7MolXeAVusyvtwi4e7RGDJKu++LFXlXS/uxSxd
5f2bZcJdFvnRBuaEQIcq70lyX3J5/StUeZeSOO4Lni5WNP1KyA17FVhV2opi
NWncJVw93I5VltspsIbYzbrWDPwrsBbzh+WuYp34ubu4qmWuU2Wb12Wuskza
sL7oJK1zlbLoYpkboLvysRG6FOha5T3XTaxj0yrvR3IfdrMq78RubjrSbBHo
Fuhe5R1A7oRyB3TLCG8V2DrQo8r3B7ap8l4naVgTdLTc1S2T8rYV21VJI+/2
gX9bJ+Xg7ymtEUe4o/XyzgF5dwjsWOW9yS3lZScBv1sK/LyR0NU6yd/ddDvb
xl0Cvaq8R8h9Qu4Z7kp/2f5ultHd9L2k7V7lvVHuHqJ7I9U/7pHuEe6eVerC
XvbBRvbH6oL43mJvaeSlXPLvE9g3sF9g/yrvIXK/Epf7lvgPqPL+Jvc4Dwz/
QYGDLedMyzok0MfyuDt5aJV3I/etWu5WHmJ7aTflcL8YXne1HPSau5IfmP8F
5UTeydaDHLjP+YJl72k7+laZ5jBl1k+e4IfxdHiV+t9oP/mo7yzH0q7KnPwv
WjZ54QN+jrB9k62/f5X3Wblv2828u1rvgbb1EGl9dA/TD78D5HmA4cN0d9e/
j33ST+DnDvU+lgEPfUwLT+h1D3WZegcqa1ze8sC/jf6B6mNf+e7Vipct1UN0
uJe0w8yLDvSwXMohXTfD+Imn7Y073/3keVCVOnSkLnd4j1ROA+V3G3mljPul
H6juoXf/s40baAd6mJZ4yt/esrEh7GvYLzyqi73gTRbeZjnPsY19OCowuEq7
hB05Wh7ZE/W03KMtG39P4x417SDTH20c9MG6PaVTNvasv/ZvsGHku6E2Ax6P
1K71NM2q2ree+re3zQfYx9jYrvpJR5i9DvuoNQxjF9kzddLFPrI3GmhaeOqj
n7Tsn0jXaMOh5mO/dUyVoAxopCVfY49FeDXLpkz2Unz/nf0duDn3c7y7Ml6+
VrM+ZNJfHtjrcb969v37Kr8T31+2vAXQRxn+ZV18V+Zb9H3Kj/zHOTfgsodl
b/OV9OOqvH/N2y9Dqhzj2Bbm7eMDJ1Rpb5j3mf+5v8s9bO5jY7NPNJ65nfnx
pCrnQezKyWIDacQvbxpsHfbyFHG4NOZbbBNzbi9t6+HSCR9u/Lqt8mAvNxan
tqL10n6eViWv2EnWM6dXyS/xzPHYWvyU2QjPnvuLbDdtHFplOVO0y9CHVbkW
okz4Pd28pCMNfsogvJhlDA+coQyGSn9VOQ6Xxr1l4s80zL3pacqeusjPfeZ1
9A+1fae1op8m/ycat45+3KHysLb1nKR/OeW+tuu9ofLQuEeNy7qNNyxY57HG
W8m+ZV1zkv27p35c8ndQ3shnJcOnVy1rO9Zf6+lvpFnPfubO8lnhni24e72L
fMAP5XMHm7vYvC3AuwxD1NWl7SPScQ/9nPCfK86rknZ+lXMzbxpwB5x1DXe/
eVeCtUXjbjdr21usc5h9ta91QONdoAuqLI93K3i/4kb1ZLh8UMaFVb6D0NVy
kOPG+pdWn4bZJsbha7aHtywYm/hvVv77WM5F5utsHHTquMhyGvW9bxtwG29d
XBxpLqnSHWUZN8o/a71Lq5zXL7NdNyqnyyN8hXmvrPL9jCv04zbikR9pLjWe
dLwNQXm8o3GNftYMvMNxibJnjXmJNN4PoM4u9s9w++hG091kHuqiDu63X8W4
EVdLGy4dP28G8N4BbwBsYNno1TXwErjOtlEmMmvIiHZdZTuubFU34S6mafRD
Z2U6yvyUM0LdW0bdhper5fF6adhW5M87KDdUqVvIYiR9Q52UX+V7HS+rH+j9
1cqyv/Ik/SjqrfK9hlurfMOBOYe5hHnnAsunHuam8c4zrDnJN7rKc9f/qfLt
jTFVvs0wljoD46p854TfOfn98vYI31Hlexf8Tks+znFznpv4O6tMA+40LfMZ
30U5k8V7baTn3QzK59z9XaanvK+kcy5/O/OMd048pCnnR/i/u8q5jXmNtRIy
Yd3O99gtAvdUOTfe4/wK7q3y+yv0u4yj/NOsgzmVuRUa7YUn+IH3B43/WZc0
zKvwBA+8MYVMxisb2o2f34IfVDbj5Z22wAvrg8b3YML0G7jXds3v2o23Usg/
QflSPucc+M0aPy6/hxO/mW2n3vvkm9/Fx5l+Xsu9r8q0E0zD7/rIm7sQ90fc
A/bB/bq8eYOu8XYLeR8MTFBHHwr34cAjVYt+zFRutHVz63lUnXjY/P+tkjZe
+rHK4BDT39Mq/g7TPOYYedz6ngg8WWW77pO/J6Xz1sxE8/B+EXxARz8YY5Oq
HEP/q/LewQRpo6Q/YtmT9OPS1s3Vw48sE7dR3wPqKW8Z8U7KU1XqyUfqCr/1
8zs/63LeS2JtzXr6XnWafkdX71FHZp8LaMSXuc6fZX7Cs4wn3UP6cY9zfOBH
NuzlsPW8v/SQ+aFzF4Px2NEw8jtOOX6sH1vD/uYg64bnofI9ST/2ifeTeEeJ
fTT7avaQT1dpe57R1syvPsMH/FymLSLuAvn8wDjc/eX7PnlojPP+reiEG/sr
3EnifGVMW+Eb/3lNLbLf37JmlyNvo/WPVg9wb9E/QT1B5x9XD5+tcm5mLh6j
jWbfylx+kH7kd63+q5XVNab9n+XyxhZyeM76ng9MDryg+5x+5PhilXLlW8Oh
9um5+o9QZ9E33lt6qcr5+Db74kXHDnTWKrzntJR+1i/P2q7J5jvXOecl00Jj
fmCeuNj+pu2sQS5UBu9Z3xjrH2Mc/rHGse75jzqDn/Uv62De9qLtFyhb1m60
m7a9rKywHeeb5nnTnK//JvmfqKxY4zDX8sbUM/qZa5kTWffhknekc+QOrfIR
3lHgJx93Ubm/Oo9uB/1TqnzXaDmBn7eOnlbezyov3hDt6LqUNelIv2+9YT+8
oayWUt4XSgP0NzTs0Cfa4xOVGfpDG5HjiWKacbSHuBd1icOPHX5ImU00fJPy
fF59m6DcTzIPeU9WTyZXLX31tG282f5hjLA2YF3AuuIqdZ1yKO9keX7a/DfI
A333mHjcdI+rt/hHOj4mC9KPdHx8qK68oB+doU7qvtKxNdn8L1sfZSKDSbb9
ZeUw0XbQHuYp7P8Wzh/cVeYO6CtVy13QV8z3svmetI8a8wl+bCrrOeazRy2b
8KPmbdTziH7qw72nlf9m8zbmTuLGVy1vvOH/wfXIvq63WF8RfrXK9QJv2fI+
F29u8YYub23x9hayQk7cv7vYMY6+8nbXa1Wumfd1vcZaYV/XDJy/2891BusS
3ufinS7eFiMtPLyOHlc5LzIn8nYY+sHa8w7zUh73C9+s8i4oaW6VH9DIh3+0
+rS6ZVMH77G9VeXakrfDaBfhjo22Fvlu2W/qJv5OpnnLshrvCs8Om3Zp0yxj
fvJC/9Vy4OdK20Ubn1KOb+j+n3FLNdpU5TtqrNWXkgfK5e053qDjrUDkRB8Q
TzkXSRur/235fadqkS325iLrpU7ClNGpVT2EkQd7D2wWtop3xnhj7N0q6cu5
R3nPPn+/ynu7HzCuqrRtb8vHR+F+XOX6cIK8wxNpebeR9MurX/QB77GhH7y9
B9ZUT3gjjj0bb/vxThnvuHGHlDS830Y+7m5zb5u38LjrzT1v3gTgzTrScu+U
d6W518t9fN7pPKAp30PmzempVcYvrf+TKuv93DHBXVvux+5iWfQT+6pp4U6v
8h03gH+qsuAu81byMFOePzUf/TtBedB+xghjEJvIu3AzqiybtvJeHXnZP7bz
ewZ7xc+q/D5CvzMGx+hu2tQyPjdxTsGlLcj784j7osp33xi/Kxj/TkPPi+wf
0nxZZVu5+8wdaNb77MHY99E3s+wrdBP/V1XeHZ5Z5f1h8vzbsfuD8Q/qfq2f
uun/jpbHPW/iGev4Ge9fWs/39vn36sP3jTapY4QfkEaYtlAHe1Xa95G8j7N+
wuMcc7QTfrmHTX9zx5o2zl20vK3YeBORMr82L/si7hhzHvlDdftLZUaZS2jr
GIu36Y7T/45+aF/ZXtqNnB+w7I+M+6bKNywvdwzg8p4hfu6Vc78aXUHe1L2D
urqT4YZMKYd85OeNgxUcL9zT5x534447eXayHGSB7nOPfTfjG+GepvnYsul3
7rZzv5d3MqmDuni/gvvj3B2H3yeaMowffkj3uOmf0D+sKd8k+db++qpVH36k
bZnYlHf2G3f58XdWbt9og9A/7rK/qZ92EiYed49WYdL8x/G4n3PPGOcx7pHT
L/db7v3ywB6b8+acS7/TvTL68KNza2OOJby/ZVMHc+4499i3W/am6hP+zSzr
TssjzZ72B3LjPjv31xlvMx17u9pHe7Xqp5721R3Oy5TH2XrOt3PmHf9rhjkP
Dw0/9W0vfW/bT5tZ0/CmwndV1sUbAE3aWGznNvY9OjD73nxzjit45/1J3p78
Xl2ZqSy5T06eueyLvWwHflzK39l20Hbu/NNW2txLlzS9THuCdmjvsqW/ZlYt
/LM24/0I+NpZuaKnzE/oKvxwZ517833VS+jcoac96C5v0fCGDO+9NN6koOxG
Ht5uYU6YVaWsZjlf/FDlnLWq+sp7nN2VC3MYcqD+75Qz73bwLsZazimrmXd2
2LmHeWyWbfvOeqZZF2958nboj1WOd95sabzdQpg3dH5ybmKO+rlKPmgvwH+3
89Dj2hre6eF9j1Wcf0nzs30PbwOdS+F9Rfkm3Qe2nbQfyCdpphr+Wfnjpz+w
p79UOWfzxnZ3593GnEs+2o796ihfv1b57ulvVfKyjXKermyoj7mft7opdyvl
h072Ujd/r3I9/4r9RvoDm/L/LmYpV95PmqXLe5m0E9vDGICvFfWTlveVSDdN
PzTiOsvf1s7N8Mw8whzCGqWdZfM+EPl5G4gw//FAX/F+L+8n8V4T7yOtohw6
2Te8pct+lDTdTAfw82YR/FNeO9uCS7vRC2S6rDJt65qqrTTKvE6+qI98+KF1
cmwwLnhvuJN8D21KnqDhQsd/tXyxX55H/272xy/2BesodHSma0P+24J3f1lv
cs7oD9MsaTrWUOjKn1XOH4TxX20d7M+RL3KmX1eWRrsIs/6hP/4y/5/q1Nbq
1Zzqz0Hyif4s6ZxF+r/FP1XSSEM87eF/NBgfrBG3dqysZr3wQ938bwdt5JBj
c6AIlHXqxgHm5f8+qjrfCAaz3+xtynbvatsb9fV2HMED4Rnq4TRlwzxL+Fv9
M8x3gHm3Vl7QeCcafuCN8pa2PfCJPtIvjNsrXEcC/I23hnEJ72aY/mI/we8v
76vTlIWOswfh9xr2AHup97ST36n5LYXfVFj3spZlzUuYtTLrZH7TId0Jlk24
rhNz1Emb/btMc66t5wzaXIG566RPMY43rInvoguN38Q6Gz7ffRf7n3bW0866
p1gHcWCEfF9jm9Fb5LW/8mtn2mWUA2Oc/cJe+mn/H1VLPW9bBvsA9IXftegX
9tnkX8zwGsoROVHve+b5Qz5eM4yf/m0TeeYRbeuksdeinDXFGo5DyqQ83qRm
P9HT/sK/omHmnnmjnPnqHD/oAP2PTmLX569zvO3u+EInaO9ehkmLXf9VP/HI
C31HJr+ah/SMkwXqHBuVaUrHEHmQNbJYWNkU0vDDL21h37uDfnSyt+OLdpSW
SVnwD++/aysYcwvWiYXqpO0k773tx96GkctC9gt+9tmE+T8l3vVeuE4/Nofw
nM5Bc+kir7kM4yfd3IbJy5y/SLiLCnhvrAMIz2uaxepMRz8sHu4SjOvAUoGl
RSGNNNi9ZerE4nVL/+EuYf5l6xa54DKv4rbT3z7c5QIdxK7S5pb35cUKrWgr
SmsrL/BEH63kuAVzSnvfMb9ynVilThp5Vw2s1irdKsavJG1J61hNrG596Evb
VvV2DLeTeLeVzsDDGqKjabFH2JE168Q52qhltWGcueH3aM468O48Zwxmn72o
E2vVSZtNr/M8K+BsKzR+++d/RtauE/wGDY13E3l3sfF2Iu8mrlMnNpXG3Ldu
hNcTzIPQTnc++8d5bP06aaBz+LuIodLo2w0CG4r29nd7+7edYfy9LH+jOsuC
z43rfC+ya53vovPWJe/ab1Kn/m9a59lNzityPnuzOs9fA85tQ9u8zrNHnEPi
zfkt6iwH8E4mtLntG/qpW6B7nWdSAOeAoW0Z2KrOM+KAM+nQtg70qHMMAMYk
NP4zivfzef9zmzrbQpsoYz7L2LbO9/l3EtgBaNtZ7pyuL9F3aNszPus8XwA4
bwyN90R5y5q3RHnzm7d9z2CurPO9fd4G3aHOO2Bv29/8NwH9vbrjGn3mDe8d
63xLm3M8O8Gf2KXO88o76xLfi76r874O4Iw6tN0Cu9d5jhJwZhca/4OwR51v
bO6JfajznMTFtgca/6HTu85zPXuHu0+d8/W+deokerhfnWupbwU2Fdr+dbqE
D6jzzMdV4kppB9Y53zNXcqeOu6aTBGfgoW3VlP8H1i1wEDKsczzyHwZbNuUb
wYfUeZ6es/Wc/eNcNef/eEubd7l5k5r/M+N9bN6RRu+6qnvImPfrkTPvZvM/
BbwxzV3UPnWWCQZKO7TO+Xdh5yjmBGjcjetb590Dxuk26hhgzEI7rM77ztxx
btxzhtavzvt13F3gvwZ4V5r3ZQ+vc1zt6bji7Cu0I+qUBXLg3NQR+o/XXkFj
Lkd/e6vLP0rj/ln/Os80cq6Us+uN8+GcN4XGnDKgzrm0MTdD4x4r//3EfRXW
HthqbO7AOvuTfh1U590BzvdjkzbSLqFHs21lkdhT3cIeLuH4AdjGtdW1A9UN
gN5Bw94w1ywsttUGHVnn/zk17DC2Fxrv5fNmO2+SH1XnfwBwR5h5YXCdcwPv
2vMuPe+gcw7+6DrHCeCcOzTOAfFdl++7rE+Zt5jD+I8/3nnnDeNj6pw/mEuw
Q8toi/iPkmOkA9aq0I6tc1wzfgFn9qAdV+c9U8bAGsoUeWJTh9RpU/lvg+Pr
ljvLi0g7wTEP7+toL1fVVpyo7eCuK/dcT6oT2KO3DeMSz9yxr2McMI9A433+
t5QV4D1oaNzfP7nO/1EAA6Rx9pNz+Jz/XFCbhG06pU47ij3d3nUO651T65yn
mIs2VB7IBZ3lTuUvZcu5XmjYMP4HETvGXME9kPaCOaO79u+0OsdPX+0gtNPV
3Su1SZwjg7aWuoMODQ13WJ1vrQPenYeG7cdGYiuH13nPnHvi/D8E/3XBmwzo
F7ZhIe0EugaN/0A5o86367n3yr1Qzic/qI6in4y/BRx/2HXuaWLXWY+xfmUt
C5ivoXFngrsV3BFgXXaKsuVeF3MjcyRrXuwyNhk7ik0/wbF1vDTWhmfWLeuB
+aWxZmBNyHoBvaPNk20z+gcNe4ktxl7SPuT0qjI71jYzz5xVp6wvd76Bxr0n
9P4N9egB9QheTpUXdB9bOUNbyTgYYv/8av/Qz4fb1/xPKPdmuUP7mLYWm8v4
PsExwn/YcXeOe3RnqROzzxMWOWczXy/p3I59wsZzR7JxLwx7D43/qOMdA+5n
cbebu9zc6+Z/Ivi/Cf4z4RTXQKu4BuKsNLT/B8/Qe0Y=
       "]],
      Annotation[#, "Geometry"]& ]}], {{}, {}, 
    TagBox[
     {RGBColor[0.6, 0.4, 0.2], Thickness[0.005], Line3DBox[CompressedData["
1:eJxN1H9Q02UcB/CBmkcMYrFjID8uL5QiKEFIR9iDJ5eQooDrhlADcxtygYjH
j0bFLdxyEJAmN8ePqQtBjE1aDmwOeOzaUMhjNk3NQTRgQAM2fg4mg9XV8Tx8
755/Xvf547nn+3m/t36cm8xyJhAI1H/PBsJ/XwahlRJDih60HHuVcIcxa5Md
UXHfXXP/shWX6qsOeO03jkcD8wZYc+/a6AimswP6sItbSildyJsM0lbVdyvQ
fPurshhZH/KzhbrpjFQ75G3jU6yJj5EHWb28i7yXYcvlC8vl+n7k6XUJ7FiV
DVI/0nC8tAbkpkpqcXrBEiQpBO4pfSPI3ZoobWHkRcgbqXYaMYwhtzSTH+cr
F+D4re+31t02IQ+0dXdsKpyHPe3m+1eippDPnPykN4EyB881CUqTNBbkpHCN
eFg7A0fVklzX1Wnk04N76KaqaTijLXzQQ5hFrmUn5SayzDDr7vHSkI1zyJnN
51WZ+glIiq+xvTaE/fXI9g+mtvwNI5WKHHPHPPLsi94dtMxRyA9xyhd+sYCc
Vm2U0YeGYd9d2uQZfyue7xdO3dtugAQ99D3Zhp1Wwspr2TkAK758ieJ4cxH5
jmesBon0CXSb5Dmk9dhdDIacNKCDm+ONPxJnsadGsS+JGL3wYVpspDp0Cfmf
RK4v26CGuxY6g33ew/5L186wzHtdsMpz71B3CvaMPtLRUwIFPPDcfdmPhd2u
GnSaO3cVGq93cvjZ6+Z7JUOTGw/BLHKBKyEX+3VZb+2vVxpAHC/Is2vdfIl6
NdrvlgI8SwaPLEzsQeEiqU4MwfjByvIqOnZx7b4iN6MaeN0ce/riuvtv93tH
FLbcA4hW0gnpW9ijOQeT/uLqwLAw1pdvxu9zQunYwzQ9AUp5mQtDhD1ePeAp
t/aDQ9EXyOER2Nn1tiaP3QZAF08JZ+X4fzl11OwO7R4Ghy/liT0CsQe8YF/J
3D8KGjk62Rwf74PrpuKCCMc44J12S/DU4P1Jzqo8xhJMAAen/nLACt63rNIO
R1CcGRhYaVEV7thzuDFl17KngTWhSP6+L97nsUdnQnpvzICnD+LLanxmkPds
+L05kjgHymW7BMF/4LykGE+lH0meB1yR5GdTCc7XYckWi/LmAtjX8nbc/m6c
x7OnG0Wt7ovAspjapp3C+c22Fn9OT14CL29jZHIDjMiVNAY1Tm4DoUOKT0PG
cD8oWBU7Jpaeg/yHgrxvPhvAPfB13V7/KDs4uhrKptpx/3xb8dMbIuEKaCvo
CQ6M0CIfBq8kavSr4LhPI5F8/w5y5w8tF2PPO0C7Rt/JsP+A++H//oxZ689/
AGjvOfU=
       "]]},
     Annotation[#, "Charting`Private`Tag$184157#1"]& ]}, {{}, {}, 
    TagBox[
     {RGBColor[0.6, 0.4, 0.2], Thickness[0.005], Line3DBox[CompressedData["
1:eJxN1G1U01UcB/A1bQzsZCI0PYbBhIMNcWYHZ4bcGRogHAOPzUIgwlxtJ+c4
TgeLpwHOSlI0kyB5WDxEpDNABGpwYQPWNuXhsFmhMgZzMMfG0yYbA8oX8b++
uG8+5557zr339/36pZw6fAKPw+HefrZWPVslxcVfN8Z60xVb3eLq8EuQylX5
MFOyw1a8hlE8OMZdhKm6nL9owhtgxfPzgxg+Ohdc3SSlju6WYr7W560Yj8oF
2LTfeeRw913M8R9mJJi+dEKH8ngi3qrBPHv93vQr8Q7oTlpPLnjlAeaqNXpR
k+88DLl68vfBxhHMM2p6JCqXHfKCO26x8sYwX8y8pPio3QYpHX6Rbkwj5oT7
fZMNojkooXje5a8zYZ7WH7dt+fgsDMi+fbmVZca8xa05Qb51BubXvtC4qLZg
nqxP/FmAn4aZWdXhF3RTmPvzHYvzcgvs+bvwW+7oNPJqV4E1zgzVj4euNmln
MLeRcuOU7iZIePV26Hj1LDp/dd98UaERDkiMq7xPz2Gum/FoXiAb4PK1SmlX
oA3z7f6qun06PUyka9Jkbch3VpTjnJph6FFoTAqNsWNeK6z3ooEhSC56pwe0
I2cwYicTIrRwQwB3m0/AU8yDgu/Z65j9cPfSZvv2M8jpm8T9uY0KKCR+Ubnj
JnILp54g7JLB6wfmvsd3IQ85l5e+XPcHjNkoCTmvRd4L6psv8BogKY9O2qhH
3mdrM7+Z8RM0ZLzRuWYCOa42wRDtOgijau48TnqC/NLaHwuOVomBmfXBffpz
+0+NRpVmlTUAk7O43TqCnLT3Pd4AWwrYZ20HUjTP3UtWIlUqZOBF35FAuxy5
7YQnpMQrQG0qRbggQc4fO112UdwPjl4rFepSkasv5/yqy9ICUUtVm6cf8pw7
ovc/Jw6BtF3idb5y9P7L4/9S3W3DQHSDEuaIRG6NaB2c7tYDw859S0Y5+l9l
Sd7TSIIBDL6+yXKdipzIO0+7yTeCR5w98S0CND9pROL+YDgBTh6L8NoB0bzF
bJFxWmlmkP6IGsPVofmMdTo+/URkAbgHLH20C80zvZf+7hnlFJgNovFK3ZGr
vPRlqs0z4JwgmlgyjPLykm9y7kT4LPBiC+K7f0H5yrG6eAXCOUDekH6Q/RrK
IzvU9xiz1Qa+c00lh6Si/E6O4wMPPbQDL3+Wd1EvynsFA4+XkuYBUI2Us1Wo
HyzkDhktzAEO7aJxymtQn/zGIfBNSU7Q+U9FlfiiFvPqTNYevx8WAOfPlwWa
8HsoR0++GWNKXaBTc9Y5IISof9yjSr76eBGo1UcCPnt4C/P/+xOs9Od/FjS6
vA==
       "]]},
     Annotation[#, "Charting`Private`Tag$184174#1"]& ]}, {{}, {}, 
    TagBox[
     {RGBColor[0.6, 0.4, 0.2], Thickness[0.005], Line3DBox[CompressedData["
1:eJxN1H9Q02UcB3ACwhCFDWfxS0yIH6asQ4jLH7eH1AbbItkAs5yCNIkQDoS7
LyViKSB24lLU/AFzW2xmrB0IoSDBA7sBSnBogybgBMcCNjd+DCbbABd3Hd+H
P55/Xn8893nueX/em5IzWUft7ezsti8dh6UTFhZWm2J0jyRr/IFLgBWGdNkK
1zrlU5Z944GCIInQAok7ZTdY7Eqw7IQutRvD1wIr77opMzwf4F5yk2PNesMM
2Z+MSGLKOnEX3iQzc+deQW/RIcL8lwrcrYdIn9UZTVCeN78heVU/7vpVTZx+
5SzcU7QvJ0XzHPdvR6Rjqp4ZeNAWLbrjosadJz5S+PCuERJDOJH372lwd9oS
2qG7Pg1fU/P2QvIY7m+pozFD6RQU+NTFDXyhxT3aRj31u2EC5mYkkyK4L3Gv
4ZWMUwb1sI9+/5+H3xlwF8mc+ZEKHSTeI06U75jEvfOPNT+68sdh2NZ6p6hT
U7j7rRYweBdHYfviLlEPZRp36daGj80JGkiA17K4C8hb+pwLZQFq2Ko89vh2
hRH3N9W6WzHew1A8EhnFJs/gvohVDNAeDcJ+0wjPtwZ5/NSl4BO/KuFxl/Ml
XO9Z3N0dS1S7QxQwYOfFoKoTyFtouoTen7ohs53q2ShH/p7Ha1Yguw3+kgZi
zpqRN924XD+mbYHaNcIngrUm3CURrF2syXr4TBzu07sBubi9+Zunwmpo5lm3
FQcjp0j3k5vuCCA3O8d9low8km3XaI2Nhh1aebZXKPL6+MXqtC4+YJ/P3hzw
AXIqpvr+dkc1UAhlzkkr7j98LS9uW3kDqI898GGbD3Ll+vRklb4FrDv2fsqV
FfPbEr3KhC5toLQu9EGIFb33NEykWCzdQLf7LEfSijz7zFdPaYkKUMR555wR
Qw4PY0nrMSVg6jONhHeRiwX5p6P/HQQv0lRHPKvQf61zrTGfdBwGjZkDZ1aH
I/+0LYMzupR7Z5rIOFaJ8sCqqigvABqw/YfUmlsOyAMjaAuJMaNAsjB/PXQ/
ylX7ZGpwVvE4cG/041CLUT7DqeY8WKYDhgudtJ9TUZ693o4t4Iv1YBjGhV39
DeW/28Pv89rBCXCU4D2Xzkf7EvgsdLMDNgWaYfPfpKvaFfO7XaBemQYefXTT
84/QPpJfPqGzpEZAdxxyc21F+5s7xCjPr50BWEfU12Qm2vcgg32vrGcW+Fo2
7iW7DqH8PDrOD+o3gX0MbtGWUtQnRLVcHq96BfYwsYNFk6h/6KSEx2Vzc+BS
es6fDMJfuOtIvEx7mxmYdxiYPv5NqN9OJimdSi3A39QQ/gKTovn/70+w3J//
Aez4iG0=
       "]]},
     Annotation[#, "Charting`Private`Tag$184191#1"]& ]}, {{}, {}, 
    TagBox[
     {RGBColor[0.6, 0.4, 0.2], Thickness[0.005], Line3DBox[CompressedData["
1:eJxN1HtM01cUB/DaophZgpbqxhyy2RhgTEAILDDgAoUqyNgjIrJVUCYDBoIC
y5gY4tBtSpBtIOEhnW6FykDqsDwsYK9Ytdi1CiutdgIpUCgP6etHKa4pzj/G
vfxx/vnk5ubmnvM976TlfZpOJpFIwa+K8qrkMtmI66XNEdlvZhdNnrfCWe+B
Ss7RU+Grzg/YO3iVZoWntWFJhOUaWHVzPMMzpWEJbmAX/LZL2I38gs5XTFy2
wLm+6Ap/3wHkfY5jR368vggXBPl+mpoh5O1cUYK8n4AqebyBekeFvOsa4eEj
NkPDoE6fRR9BnrRHSrmoNMGHXozn9AwN8o0Mi3TDsBEGebPnCMUE8uW3m+6l
8w1QTZ0uO0mbQv6GI3dZqFqAoT8ZaZRNOnz/7VhK9JN5+KWlhWffNIv8UUmA
i/TFLBzUF9U+ls4hl75fKu7YNQNz2m67StKeI5+6822c0msaRgVab/TbFpAH
J3aoTB9p4VVS5pF7yQbk14U1wdEJE9AyKxF8lmxE3rhVE2pL1EC5PvlGqAl7
8wtVGfvlCGxur0/6JM+EfG8miPWhqGEu9dZTug77wYXdtOU4JTw1Zs+aZ5mR
c2m553czh2CQz5QxjYN98UNjyaEGKUxsZLu3a7Cf5W4ms0LEMLhU5H/fmUBO
G9WOf1wggu77JaPETuxuBc1wa34XjBAOV7ftWXM+x3is2tQG9XFhCRkfYFdN
ulev2DlQW3b5eHgkdj+bTFk+GQO1Y1du+jOxM+hiyf0rDYAzU0LNXnN+m0QR
0xTIB3Vxwk7mmvudyJMKgVM3GH5261C3H3Y+8djQWCQCUZceVM2seX9z/tj6
v0x3gazfw4W1Bbuc4SnR2qSA07AinhnF/5Nny6UEnRgCvZ3jmfY67D88Etd+
t0MJRg6/7HLYjz11neTM0bfUIOvpevJBLe7XgFt0SqxqBKgOhPkUF2Kvaiq2
C8I1INZyXDRsxfPAyHnva6eQCfArrybxQSr2Yo963VcuWvBNb+HnrHN43jpo
qWcr6dPgsD3DwY2qR95p1riKCB3oYSisP5fjefZ7Znf+/uEsaFEzicglPP/l
xEnfbZJ5EJTHO8DdjvPyJ4kb2/r7Aiity31XHYHz1RnmffE1ngF4TbTua9qO
81gf6VFLHjQCGs3zbvIozq8o5XXduj4TCHX+l83i4bwrXARx071mEGM+t/JF
CN4P8cy2VlkLAU7QKroDwp8gJ1sL+0jVi+CfY/wy7Y6/cX+jZsZdqyzAL81q
ulCH99XNjT0OgWeWQGp6207H0z3IK36pDC93sAKlo+4P74EW5P/vT7C6P/8D
bhPizw==
       "]]},
     Annotation[#, "Charting`Private`Tag$184208#1"]& ]}, {{}, {}, 
    TagBox[
     {RGBColor[0.6, 0.4, 0.2], Thickness[0.005], Line3DBox[CompressedData["
1:eJxN1G00G1YYB/CkjDDahk69lMVO2ahtZ3XWmYobgk7WoomjqmuoVtqkptsM
Z22dnnZtVbyUnoyKKrVmivYU06NesqtE2Ca0tIyGJYxUyKtgY8vWD3NvPzxf
fh/uuffc///xTD7FTNlAIBA+fjkWL0fW328nPGlHm5M3LmsdlyCTUBbmlJEV
vO7XjdndlnUmqBtf3OQaJQLrHkFiFLnSTFD6o6rQxvkB8qJLRd1fJyzC9+rd
/yac70HO3pEwYXXRCCuN4WeORg4i92mylcgaDXCbvXVJfuBT5Eo+N6xbpocR
r99WNa78hjzQuTROadDB0IMVGw/vmECe/1PLgbLtWvhtm02EWKxAPur9g7Et
cQH6nWVWFnZMIfdVCBP2tqrhzAhn0D/7D+QHqAtLgboXMJL2nMsKn0VeME9n
l9FV8BhPfaVySIW84xA36UjVDBSUet1MpM4hl5ya/+7y2DSkJDPIVrVq5M+e
pl93+2AKhuze+YiqmEfeORE/YJ+igEtsrXDRQYP8k/1bg4ZDJyB4+LzJzlOL
3DM3N4P35xjsi+1m0Yk65PdJD97o4IzAgpoej+AR7FG+mmgNeRgGbRaw42h6
5LS3xcrG+QHIMKddCSjA3kcc5b//rBfSS5OsyT9j/4pieyI14BEMjZ5jaYzY
l7Wtp/nh7ZBK4LStWRiQW1ckegW5NsNMVmG1Ixl7hgeVlPCkDq7mkritLthb
X8vMy5IL4WzPrSG1B3Z9l5grENJh5aU9ohoKdr7PeNhAdRm4d/70OYc3sUuJ
N9aiNtaDQFN2V9kr5x/LSuGVi5pBx1anhoDN2Ltrp9+KYbSDovLmBsMr9ydr
Gz6/sNIJYkvs8ukm/F5ScUd8l28f+OJ7q6pSKXY3v2L5oaBB4H3XIsmfj/1y
iLeTm3oIOOdFJ67RsX8qYozuyx4Bu9V7qJ89wf9l5iSbq4bHAE8ybP7SFnvn
7UkDxWUCeEbqq6R+OA/HZTFgkakAmyRXc9geOD+clfqA2VUl2PWPpcjGagF5
Xnad+Yx0GlyL6d1b3ILzWdNUvXIrfQYczNL05yTjPP/iJYtjO6vAh6Lgd0L+
wvl3XBJeECtegOkSDYXKwn2JTU9W3uWrAXMl94jDPdyv9n0yOxC/ABjgRphY
gvvow+HdPO6uBZPbf81yluL+Fr5LPEqR6MD95X8XxOW47wV33FepvXowfk6f
lukyhnyw+CO5f4UB3MnbZfmwDu+TLUKewZRmBN9sidwJtz1GnhqjS81hLgL7
WqHr1d/xvqJN6olT3iYgYLWcvJbfglxweP/ZExUm0LdBfjHicQ3y//cnWN+f
/wEp6rNH
       "]]},
     Annotation[#, "Charting`Private`Tag$184225#1"]& ]}, {{}, {}, 
    TagBox[
     {RGBColor[0.6, 0.4, 0.2], Thickness[0.005], Line3DBox[CompressedData["
1:eJxN1HtMU1cABvBWupYIGwwzgaFiu6UKiEJEkI72QBCIW1nnY0jSMW1F3Aaj
GLDyDGOCULdRZLxSFAV5mBAEOmEFNk5FymgrKlQLRR7t2pW2lNGWOCMM3bKM
e7zJ/ef3x83JPd/3kbm8o2c24XC48H9fJ9x/zylcJylS4medtnU5YN69KdGF
yCzGhu/KJ0wTjjngTl/DvZHkJrDhNQ+2abye2aFHX9p171Ax5rIWX1umnx1G
uKc/k1QMYR5+WiSPT7XB26YZ3vwmJeZ/VrcTZJxl2BXu76Hjj2PuqhhpOz62
BNNDipMY5U8w71GMP9Qds8IVt9pFy14N5rigIr8n/Rbo1atppZpmMJ81d0cx
/MyQUC0t2hqoxTwmY2KuWbwA21c8BWldOsxZ7NqOc9uMkPLxSlIYTY+5wYOJ
j2g0wLpfXW4dvGJA5/T9dkt+oB7+mHU4L0XxB+Zq4WcnKCIdJM5/GcwmLGAe
MEbdOULWwsz2qa9c3jZhHj3nf+DGllkY6/tR3qS3GfNPlZvbrjs08DxgXSM5
WTAvOKKgiEiTsLs+IF80jNx8YwLPmVXB0drRi7n5i5inCvotFPMjmBFV/7jB
zYo5l6/+mpuqhEMJ7JmTVcjD99BxCRQZDGG0NPWsIc/ZPcIsvDwIv7lZyFmP
XsLc6WZBH36fBJYmrj7I4CD/YfsBarGqG/5tGip2zUZeVnUi/sVvbTC0V0Jc
u4R88ang6uPxWkiNc73oECIPekl7+Ak3CtoHLlQ7KpE776kRdg7UAM8OBSGs
ArnD0RlDetkG0unkU8Ovfd92VsHxYYmB3lnLr+QjpzWvu9L3S8A63pxz8rXz
l2iDJJ97DoLEFOlhZixy4rv9kQfTZWD0doSd9xz9n8JzCQEWsRKUC1endwuR
pyi98SrZI+BikqrN7yCXVwFBsl0FXhXxeNHZ6L62ykpIa0Y1EO+TWkvvo/ul
M+XOrWMaIOsoObLrTeTkzcOtxSszYDnZ8UL8HsrP8t552hf6eSAavPVWRzDK
G1021QMEOnCfd7rR7I7yyacelY+9oQfqMm95rgXlefv+D3cYcw2gnHJoolKM
8k95ei2qzs0ICkptbFos6svVXryWKVgAdI17tlSD+pUVeJdZTzGDMquPmRqC
+tjHerWaeccCLuVUcKr+Qv3NbIl/nxVgBb94/nTWJkR9/67muc/w3SVAbOJW
n2lH++A10F3+AX0ZkH8uTZVMoj25HHO+sSHRBsqk3zf7T6D9CcuD3DSKHRRF
JYWyf0d71aC4whmYs4M4okvg4PE7qL+rjB3qOAdQGetkwcJmzP/fT7Cxn/8A
FBktXQ==
       "]]},
     Annotation[#, "Charting`Private`Tag$184242#1"]& ]}, {{}, {}, 
    TagBox[
     {RGBColor[0.6, 0.4, 0.2], Thickness[0.005], Line3DBox[CompressedData["
1:eJxN1Hs0G1YcB3DTeBXdjBpb6epgovMabZHJpSntVqXxSHRpu8k8VnKKcYbV
iSrHSD3msaNMzc6wVFZVmSnW3VJrtGSWxTMJTRBJiOPRGsrW9Zwd9/aP+8/n
j3t+597v93eAmRQWq6ujo+Pz4ux6cd7z9OTHrer6H5lTcq6cXIYt0YVVPfeT
yTseUg03A54sQV2mzdxqah3Ycdc4/iQ7dAm6jBOaeI4tyJeLpE8TtYuQNp74
9Odff0MODXPuy+u1kPBhM9nr7APkVQG+WaOMBUj8kSWwmB9EnmzglQe2NDA+
uOD0q+Mi5DQ7HsW9TQ256Z5J4vFh5H6PmGGVp1SwydrYQbs4hud0cz2ZuaSE
Qy2fxLzeL0H+ruaLLSV3FtoOGFz+6INJ5AfddbZ+D5qBG35zeuEjj5EfGdRv
c9lWwDS1bK1GX4H8lMOBcMs7csg6RrwtNZpG3m+5kT/bOgU3eZGv9ZjOIDcr
5o7y3pZBMpVxzkWL/ayNpO/MmQk4Y9FkGC2YRd75judXRt+NQpC6xzahQInc
Q5Z/p998GJp5X3TiOs0h5zUzCi5SRbBUkyGfuoc9O4hWcjxLCKX7I9+86atC
/lPi+olslQCuJxw9Vs7F/jxPxeti9cKO9Nhn+/7FbqKsniDWd8EY87zyVR81
8mv5OXTq3nYYW2f9KDwMe9Dpv5pXLG5Bvnft/O5Y7AJSEZPd3QAbslJ841Ow
l4UUeVn2VcKx42Vp4gzs9wr/CSkLJUPF0GZg6CXsFKZFc7WoAiT/wXY2ycQe
snYzrG6+AdhWTm/7vHT/pU7qn0naW0BFKV4TfYq9LkHv4SvW7eCNQpOUwJfm
z95Q3BggdYEf3AO7pSTs+2gDGdMtvWAx+eq3Fc/w+4i7aWlSh35wyOy6XUAD
dppQW9ZOFgKKR8wv0wB7QqS/j4IpAlYZV2qi7+L/2lNT6hu1LgZZC8DR2w17
fUxHvJA9CtKtaksGvsZ5cN97/m+G3wQYc6PrcoZwfhrf2m0pHZSC2ucfX3M3
wG5leKgqtWIKEBjv6zpa4Rz6NLZFsL+RA2IUXXvBHuf5nFHHkx6JAtygRqwc
tsP5z5Z/SSknzYCVnPPGhzW4L5XMHqkkbxaw2PqyB8W4X1y6wL5VowSN4khW
nxj3kV/amUs4oQIRfLJkchP39/bnrgdFJWqQmGPqbE8cQd7Sz8x1XtGAq1HS
FI9lvB+uP7S23yYtAHPiLukFjhB5ruldSfBlLVCXBo8IDQTIP+vbf9RZvgiM
aWyOjAKR+zvqrWY7LQFmFjeOM9yKnJ6pzu19vARC+DasRcL3eD/8vz/Bzv78
D3/bgAQ=
       "]]},
     Annotation[#, "Charting`Private`Tag$184259#1"]& ]}, {{}, {}, 
    TagBox[
     {RGBColor[0.6, 0.4, 0.2], Thickness[0.005], Line3DBox[CompressedData["
1:eJxN1H1QE2QcB3BA4RYwOw0h5YKRXse6I25sGiD6WF28+VKwNrbACG1BCo0j
lTQQ6AhBNm68bUIvDrEgFtQm20hsT7ycARvHy0Bkm4ONl70QUJwwYqn5RzwP
fzz/fO65557nnt/3G3Sam8hxc3FxiXi2tj1bao3Gu/7cv8Bb3247KFyARjHl
M+vjT45s+vr1Cz0irwU4QLJEfvS1CGz6HPPgt+uFdniyLoGel9qE/GYNKynj
PRvsz7f7qLVK5F21y4SeQ1Z43bfNksboQt7NTvW+EWyBuXLm7p1n7yFvnuL6
kp/MwfAfPiyKa1EjXw5e9fvOMgujBTl1vuRh5P40f1LXrzOw8kaTh5o3ipzs
tvcyp9IMy0veShvsHkNeV81XP8ozQQ82w7pw+z7yxfmGfWEJ05DPkUvprQ+Q
RzsZ8+05Rtg33jnL4+iQ57btIRNOGmDgjmsFVxx65NlzAZeUG5NwstI/hXvt
IfKQRmJH1NAEDGKfp8TMGJHLZg9vD7gwDlXg6ZsC/2nkjyWBj1xf0cIa+p4D
NCl2zw37aOeTYWgkl7MyQ0zIfxct5zcmDEL9N/dp5xqxr8QaqF+s9kFlJ6Ni
wtWMXOF6fLtXVC8MjaiOJSRhJ/AOhx+lQOild/Vl1WGXhpbt6y5TwNeWpiLv
/IHd7zkZtfOBFO4aJX8s1mF39sqvZrzTAncImy++bMM+VtV6RsZrgJHph7KU
K9hZXfEF69WV0MgfvfT5OnaS5iaF0RwBiTG7Uzgb2B0tv43L7wlARvrO7Ftb
9mea9h4TtjeA4j9Bcs2W81MWmZIRdwm4Ok01hFq3nM9da9LppSBHo42u3XL/
qvQ3LmtoClBR3pR5oB97YtyIDTRAkMj/50i9EPvTshOcsexeEP9wSfgzHftQ
2pQjpasPmP4uPWVyx04MW+KGcAcBX1OoUojxf53Z8HH/cX4YaB2Jki/DsDsZ
RW0dnloAyqis20o8DwMhP8VnnhoHw/tV4pkg7ONXFh1xpRPgq0JGcTBxCvmL
xxdFatMkKNp/y8irx/MpqtoWl/uCAcgGTmS1kAz4vfQMJinSCII5Rs9kAZ7/
oL63JYqYadBTQo9S3cV5CW80U3M+MAFhYnfJmhXn6+xdo7yAZwb5n1YlGdU4
j3d2uc17yWdAskPMJgpxfpu//yWgtX8WOKnP09jpOO+yi6p3xatzICtGTmgf
wv3wfnFSeTPRAkpjY32S53GfkIb8zoeSrEAnGllL1+H+cWW9ziTE20CrprBC
ENWBvOgl89G1VDvw4AZSlvxacA/kHav1ddrBq9qxv1ZO1yP/vz/BZn/+B6hh
7xc=
       "]]},
     Annotation[#, "Charting`Private`Tag$184276#1"]& ]}, {{}, {}, 
    TagBox[
     {RGBColor[0.6, 0.4, 0.2], Thickness[0.005], Line3DBox[CompressedData["
1:eJxN1HtUE1QcB3AQc8hOvBSK4aCUWSNChXVsNL0KSEjAoQGFgkzXkbZjjUGI
PBJSY7SZ8RCEeChgE1GQN+LhwJ0OAwS2MSavweG1qdBJYtAoZJB/xL388fvn
c+6553fu/f5+77Kjmac3GRkZ0V+Xyetyc3evj9LpgLB9JjbS6hlUFouNHTWn
Dq674nitJKlMC7OSKIJJkAnW3XY+wTzPXQtLG6GP2LYE+U/bE7e876WBU5Zh
/g1RNcjt67kT5expOFekeKoYvY+8peQsKUMwBeUMyg6eug35oTRdjSxvEnpl
/RNuMJMif6ZhUQ3NE7Cj/raKA35HPh3//QohYxy+yIjMEwi7kG9/FB2laRiD
1ezgxZacHuQCE++c68tqyNy57xrpsBy51G05aav9CLTbFgL5Kwrkh8OyKMzw
IagTkj+J/0CJfNielcn9bQCSEumBOw/1I2f0mjfs61TB4TNONimhKuSTcTcK
B4n98O+kWfqo51PkQWbWDFfnPtgJqkKeuAwgr0uOp5eXyeCKZLy9exn7p3LR
xaq93dB7arOdTDyIPGaVfcAmrgNyvpIaA98h5I4kQ+rHS1Jo4exxivEEO9sq
nNa6RwLHLxYqL4Fh5LVCf2XbQjPkKhZnewuwi7uiPksi1MH2r3c33h7BzhFF
L8ReqYS7nof6VC1iF1ywCponiqHDJsXnt0xHkIfc5CX0biuC//7hcnDQBjs9
Pa6U7/gzTHYroUjJ2C0/bLznJ6DBl5451dx3sHNoQj1xUARezW2+u7bhfEcB
7fiN4CLgdSVWf2vD/VUB2RGjxWLwQ2t5aBgB+19xgpWY7EpAyj+vL97QPynw
gOyStBa4vJS11I1id2+rEH0R8ADMEczvE/KwL4yQdy0dk4Bfno9Hv/DA7jvr
lJjeKwWtwZH53XL8/qYOnBNNlztA46qqKc0b+5HTMw+oZt2AVaFbklXi/w3k
G3LX4mVgr1F+RKsJ9kn5biOPt/pARXrgndSPcE6OzX8bY9uvBLbG1m/XsHDe
CJR+qmeDCqw6H+3LPYnz+R37S4fMswPg8UnLoMQInOfHxmKmhesQuCyikv/0
xfkPqLeUjRFHAIss8XuT0If8Kq8wTdalBj0n7kw4ivB8WTC8fzSvGgN6pvq9
/aV4HmPOND1KTR8HMyIePHINz+9R5c3rW0snwLlIPtExF8/74rnkteXMSVCw
5eGvbU54P6SUsVMM/CmwI7/1DaEAIn913rU4338acKv3W+uuNuM+2UKW2kMD
RNqHCcp7eF+Z9SyAPXZaQPvmQpqpvhS5Xydv2CdXCwwWq6q71Gzk/+9PsL4/
/wOjF7Hq
       "]]},
     Annotation[#, "Charting`Private`Tag$184293#1"]& ]}, {{}, {}, 
    TagBox[
     {RGBColor[0.6, 0.4, 0.2], Thickness[0.005], Line3DBox[CompressedData["
1:eJxN1H1QE2QcB/ABY8IgRASlMGlyjK7sRXdCAvEYTJwwOhpmNClFhkjDoNqp
CO4Etsg4C3lRULfjRWIcooN5jID1jLGxgaNN2XiZDBIGEZoQCqG8XN51PI9/
PP987vnjuef3/f4oR9NZyfYEAmH3i+Pw4uyk0WTH5sYA0+vo5ErVCEzkx8pj
eKywNTfI1ckuziOwalT6s1l1Dqw5ix0w4Z1uhQK2mBBTVoi8/vVeWwxlGDL8
Unc9mK5Arr44Vlr5lwV+1ZVE8RVJkPstBR33aBmCNfk5Xa+ZbiE3jZ0IEaUN
wkaZNJF3XYY8MmujMjJoAJo+ScqXzTUjJxeV7yVPmeG66B+McZ+1IvcUH340
LTbBinZmu3uWAvkIu5Q+ze2Di5NVsWe3KpEvldaLHHzvQeoFwRcHhB3IB3N2
SEKmjLDJorCOK1TI5zWPaynpBphR3HFt7/1O5KOCEDuCRQ91dwouJzxTI99f
k6Lw+aYH3l2/U0J7rEEerzqQxTVpYYhZ+pw/2oX8SXdH1nyEBlpSGGXLMi1y
N5rbaPuoCn4ZFLshkaND/nuZD71lnxIerDjuMePSjXyL0t17TN4G3751g0gs
wj65L62+7XQzNLnpypfJPci7r2s7nVmNUJ0dmkRNxR5/vjOiZl0dXLh4qsuh
Hruw6rB//91qmOfCI1o02Dmn/n3F7QMR7J9MdeRZsMP3GhKSzxbDX6rJe9ZP
YacZNQczhXnQWBuwGjyLnRDn75rL3w5PZifaFuawX63hRAorc4GKwOBmvnT/
5srpiKa6YjB4Pvg765/Yf5LA8Up7Mfj4+W2hzxD25mP05RhzNRD5Bu7ueen9
1GcSUnSdBDzRbwzd2oC91Svox+DCRvBtnEH9UTJ23dCrrodkzUDBytkUSsJu
tnyoI/DbwCrnkLPyMv5/5j/pe3zjlcAxfFW92Qn7zeIHvxI0KhDnpD9yhYvn
mxfdN1vrrwHuT0sjAhU4D7dJRKpPqxaU0KL4Z6ZwfjhHPl2M3dYD+u0eDsy4
YM9QTOhYv+nBapGhpZeIc7jUcilw87sG4DXxyC5nEed5xTYuNeqMYIXqSWMM
4/y/NXNVk+V5D5QUME5EFuK+XGLY3nSK6gNKKn8HlY77JfVjFpwpN4EaD7Fw
Nh/3UeDM0xvGzKDtJKkpk4P7Wxa2PYG0aQDY91Kyt0TLkX8+7/BwW9IguGGV
veMI8X5gL3F1b1wZAn+kXIhhhkuRe7mWCOzuWAADNLxPZNch54vvA53XMHga
nldE31WJPOCcbH9GlBWk2f4u0X5fhOfeQ/aWL1hBY9jXzi7tuXiO/+9PsLY/
/wMCeqvY
       "]]},
     Annotation[#, "Charting`Private`Tag$184310#1"]& ]}},
  Boxed->False,
  ImageSize->{558.3333333333334, 373.3333333333318},
  Lighting->{{"Ambient", 
     GrayLevel[0.45]}, {"Directional", 
     GrayLevel[0.3], 
     ImageScaled[{2, 0, 2}]}, {"Directional", 
     GrayLevel[0.33], 
     ImageScaled[{2, 2, 2}]}, {"Directional", 
     GrayLevel[0.3], 
     ImageScaled[{0, 2, 2}]}},
  Method->{"ShrinkWrap" -> True},
  ViewPoint->{2.2549085650078218`, -2.088785372631772, 1.4150487731996766`},
  ViewVertical->{0.05420484456613244, -0.027752568031580806`, 
   0.9981440927006551}]], "Output",
 CellChangeTimes->{{3.7831633844074125`*^9, 3.783163417020111*^9}, {
   3.783163490216652*^9, 3.783163510932282*^9}, {3.7831635423783865`*^9, 
   3.783163590260201*^9}, 3.783163640308363*^9, {3.783164073168502*^9, 
   3.7831640884506445`*^9}, {3.7831641838104696`*^9, 
   3.7831642537128115`*^9}, {3.783164592387439*^9, 3.783164600693228*^9}, {
   3.7831646627031546`*^9, 3.7831646788689475`*^9}, 3.7831647323702097`*^9, 
   3.78316487612182*^9, 3.783164930976963*^9, {3.783165073006584*^9, 
   3.7831650994934683`*^9}, 3.783165658967472*^9, 3.7831657171394835`*^9, 
   3.7831663033463345`*^9, 3.783166379625924*^9, {3.783166582252836*^9, 
   3.7831666114226646`*^9}, 3.7831666637761717`*^9, {3.783166769379675*^9, 
   3.78316678486195*^9}},ExpressionUUID->"65502718-1474-47e1-8c3f-\
fe471b94e016"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"SetDirectory", "[", 
     RowBox[{
      RowBox[{"NotebookDirectory", "[", "]"}], "<>", " ", 
      "\"\<Run Results\>\""}], " ", "]"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"import", "[", "index_", "]"}], ":=", " ", 
    RowBox[{"Import", "[", " ", 
     RowBox[{"\"\<Top Edges A/\>\"", "  ", "<>", 
      RowBox[{"names", "[", 
       RowBox[{"[", "index", "]"}], "]"}], " ", "<>", " ", "\"\<.npy\>\""}], 
     "]"}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"vertices", "[", "index_", "]"}], ":=", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"verts", " ", "=", " ", 
       RowBox[{
        RowBox[{"import", "[", "index", "]"}], "[", 
        RowBox[{"[", 
         RowBox[{";;", ",", 
          RowBox[{"{", 
           RowBox[{"2", ",", "1"}], "}"}]}], "]"}], "]"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"Return", "[", " ", 
       RowBox[{"verts", "[", 
        RowBox[{"[", 
         RowBox[{";;", ",", " ", 
          RowBox[{"{", 
           RowBox[{"2", ",", "1"}], "}"}]}], "]"}], "]"}], "]"}]}], ")"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"centeredVerts", "[", "index_", "]"}], ":=", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"verts", " ", "=", " ", 
       RowBox[{"vertices", "[", "index", "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"mean", " ", "=", " ", 
       RowBox[{
        RowBox[{"Mean", "[", "verts", "]"}], "[", 
        RowBox[{"[", "2", "]"}], "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"Return", "[", " ", 
       RowBox[{"Transpose", "[", 
        RowBox[{
         RowBox[{"Transpose", "[", "verts", "]"}], " ", "-", " ", 
         RowBox[{"{", 
          RowBox[{"0", ",", " ", "mean"}], "}"}]}], "]"}], "]"}]}], ")"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"plot", "[", "index_", "]"}], ":=", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"points", " ", "=", 
       RowBox[{"centeredVerts", "[", "index", "]"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"Return", "[", " ", 
       RowBox[{"Graphics", "[", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Red", ",", 
           RowBox[{"PointSize", "[", "0.01", "]"}], ",", 
           RowBox[{"Point", "[", "points", "]"}]}], "}"}], ",", " ", 
         RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], "]"}]}], 
     ")"}]}]}]}]], "Input",
 CellChangeTimes->{{3.7810935584155083`*^9, 3.7810935596265397`*^9}, 
   3.781094448785284*^9, {3.7810944793395786`*^9, 3.781094606898785*^9}, {
   3.7814170279274454`*^9, 3.7814170310063467`*^9}, 
   3.7814176845689306`*^9},ExpressionUUID->"aec0ff36-d81d-4471-9fc1-\
1ebff33d16e0"],

Cell[BoxData["\[IndentingNewLine]"], "Input",
 CellChangeTimes->{
  3.781417015582882*^9},ExpressionUUID->"16415a75-f23f-4528-ab8d-\
003d51c40469"],

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"d", "[", "\[Lambda]_", "]"}], " ", "=", " ", 
   RowBox[{
    RowBox[{"D0", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", "-", " ", "\[Lambda]"}], ")"}], 
        RowBox[{"(", 
         RowBox[{"1", " ", "+", " ", "kx"}], ")"}]}], " ", "-", " ", 
       RowBox[{"kx", " ", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"1", " ", "-", " ", "\[Lambda]"}], ")"}], "2"]}]}], ")"}]}],
     "//", "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"W", "[", "\[Lambda]_", "]"}], " ", "=", " ", 
   RowBox[{
    RowBox[{"W0", " ", 
     RowBox[{"Sqrt", "[", " ", 
      FractionBox[
       RowBox[{" ", 
        RowBox[{"4", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"d", "[", "\[Lambda]", "]"}], "/", "D0"}], ")"}]}]}], 
       RowBox[{"k0tilde", " ", "-", " ", 
        RowBox[{"Stilde", " ", 
         RowBox[{"(", 
          RowBox[{"1", " ", "-", " ", "\[Lambda]"}], ")"}], " "}]}]], "]"}]}],
     "//", "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"compareWidth", "[", "index_", "]"}], ":=", " ", 
  RowBox[{"(", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"rules", "=", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"D0", " ", "\[Rule]", " ", 
        RowBox[{"topDimensionsB", "[", 
         RowBox[{"[", 
          RowBox[{"index", ",", "3"}], "]"}], "]"}]}], ",", " ", 
       RowBox[{"L0", " ", "\[Rule]", " ", 
        RowBox[{"topDimensionsB", "[", 
         RowBox[{"[", 
          RowBox[{"index", ",", "1"}], "]"}], "]"}]}], ",", " ", 
       RowBox[{"W0", " ", "\[Rule]", " ", 
        RowBox[{"topDimensionsB", "[", 
         RowBox[{"[", 
          RowBox[{"index", ",", "2"}], "]"}], "]"}]}], ",", 
       RowBox[{"k0tilde", " ", "\[Rule]", " ", 
        RowBox[{
         RowBox[{"ncurs", "[", "0", "]"}], "[", 
         RowBox[{"[", "index", "]"}], "]"}]}], ",", 
       RowBox[{"Stilde", " ", "\[Rule]", "  ", 
        RowBox[{"Abs", "[", 
         RowBox[{"nders", "[", 
          RowBox[{"[", "index", "]"}], "]"}], "]"}]}], ",", " ", 
       RowBox[{"kx", " ", "\[Rule]", " ", 
        RowBox[{"nsagCurs", "[", 
         RowBox[{"[", "index", "]"}], "]"}]}]}], "}"}]}], ";", 
    "\[IndentingNewLine]", "\[IndentingNewLine]", 
    RowBox[{"p1", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{"0.5", " ", 
           RowBox[{"W", "[", 
            FractionBox[
             RowBox[{"L0", "  ", "-", " ", "x"}], "L0"], "]"}]}], "/.", 
          "rules"}], ",", 
         RowBox[{
          RowBox[{
           RowBox[{"-", " ", "0.5"}], " ", 
           RowBox[{"W", "[", 
            FractionBox[
             RowBox[{"L0", "  ", "-", " ", "x"}], "L0"], "]"}]}], "/.", 
          "rules"}]}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"x", ",", "0", ",", 
         RowBox[{"topDimensionsB", "[", 
          RowBox[{"[", 
           RowBox[{"index", ",", "1"}], "]"}], "]"}]}], "}"}], " ", ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Brown", ",", " ", 
            RowBox[{"Thickness", "[", "0.01", "]"}]}], "}"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"Brown", ",", " ", 
            RowBox[{"Thickness", "[", "0.01", "]"}]}], "}"}]}], "}"}]}]}], 
      "]"}]}], ";", "\[IndentingNewLine]", 
    RowBox[{"Return", "[", 
     RowBox[{"Show", "[", 
      RowBox[{"p1", ",", " ", 
       RowBox[{"plot", "[", "index", "]"}], ",", " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", ")"}]}]}], "Input",
 CellChangeTimes->{{3.7814166748625174`*^9, 3.781417003603936*^9}, {
  3.7814170903500643`*^9, 
  3.781417096415109*^9}},ExpressionUUID->"98686bd8-0402-4501-b0a9-\
37e39b05243b"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"t", " ", "=", " ", 
  RowBox[{"Table", "[", 
   RowBox[{
    RowBox[{"compareWidth", "[", "index", "]"}], ",", " ", 
    RowBox[{"{", 
     RowBox[{"index", ",", " ", "1", ",", " ", 
      RowBox[{"names", "//", "Length"}]}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.781416990613372*^9, 3.7814169936466355`*^9}, {
  3.781417751285266*^9, 
  3.7814177825260277`*^9}},ExpressionUUID->"5fd9e57b-0a0a-423f-9839-\
6c1d0e4d1993"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVj3k8lPsegN8sKde18zqFQkIIlT2+P1eLSA11JF2RQ4fs96iLQ44luzBK
ispSskQlxqHBXOtkaTDkMLayhsHMGCnMnO4fz+f58/k8Kh6Bjl4CGIb5/+D/
1jVT0Bs2/sPSZ4Qdfn1CG44o5j4X+58rrEhMKrpUPYI+N6P2Loo/nPvFX6V9
shDacmh5iYRbcLi+20dn3wso2BHnVE6JhIcmpCr9t2UAhoq7fs2JAY/AgedO
IxVQ4bPuGUqIhxV3SU05l9eQ1F+mnEtJg1Rqw9EDn6sgIrbZwomcAT+Fmbwq
EKmGt4/1lq7mECF8YxZZK9WASv/uM0GEbKhW9R9qUqmFbbNGgSzKY+BrUu0M
auvh2M/ab3LznsJElBtxZ/I7IBl36zmS8yF54z8G7U5kYDqYjrvkFALfNQ1x
JxrgSryMuR+hGGSF7X9770oB45WOtbuUCjgemfp0bK4ZHCN4dlmVlWB0j5hy
8GgLBOw2LHqQ9wqyvTmBhMgWoEv1aRLIr2HrPqE6VLwVRHUsh5xzqiAq/8J9
G/U2CHVXOHaDQILCScYngk4HXHzfzUylNECOisv6nY5OCKsva8q0aoRww/bl
2h1d8KQ8MTO7uRHqWELNQeZdMJ92wjC/tQlAg9gdU9EFllpXGy9PU0Al5uJ4
SGo30JmDwv7zzVB+gNVfZPwBtm613ctabQeNZ6MNgiW9cDewelvOoAMSH2H8
R029oOJddD0nuAO0/+ueID3UC6cuR5s8ZneATFNL+DPhPsgwtxgtXqPCpTjT
pGvX+kAdq1Gr3+iECmLs6SKZfjiX9KxqEqOBc82hhFEvOqRQO+sULWjw8dwR
W2YoHagiLIpzGA1mXlaGLqXQwTregtbLogHnyeoU6Q0d8qwWb7oH98KNg1oX
orfoQLSMIxI8+oAR5doimz4AESakLv0TdPiu7EAmlA6Cg84eS5bIENjfOXBP
sW4I3o5MUgt9xqG68VvaPhcGnPzpy5UmwymYX2jz0GOMw5jeR6PT7FmIXtEg
9y9Ogl7uX9bTvAWQ48odpfp9hjGfkaKHG8uANB/0DtOmIM+h5Lc1JxZ4+Xy6
QhOdgWKFgMriyxyI/PlX7oLDLOyUWx5RN+NC8utWEfHQOZBtYeobSH2Fdyaa
0Znp8xC1d2PfaclvkHWbx75F+gKolIwdYn4HkrN90ErzArh9SgnH2VvgE/TV
izKxCNpdI0qZTB7csOjS2MVeAg1u8LDvLxgiBUgNdjGZMDf8e5Cs5w50pkl3
4+DmMjgOe/xRdEEA2Uk7HXjOWYElXdqo8SVB1D4xtKwetQquVzbtpZ2EUOkL
J94WxoKwIiETurUwuooqFzzCWNCKsgIentyJ3idjWs6bLKjf4CmdMhJB3LjA
ugshbEhIOvTZRHUXchJpV29bYENMIIOtr7obLQ/ubf2XLwc0g3wiJKRE0Yy3
TszFKQ5st0U4cmT+gVzOBp7s91qD0rXzFkrSYkhAnOQXNrsGmCVWoMsXQ68S
cl2U3bgQP2roYI2Jo6dzeYGDn7lQe98mHFbFkQ7TUpB6dR2aNPb+Gc2QQOSz
cpfch9chPMG0wNNfEpGDRFk9bl/Bd9dA4e/TkkjPx7amdvwrcI6+sb3vJYXC
AjvZ+29sQN/S1mHVcSk0xViMMl3egD3EEiXHi9IoJl0orC74G3z/lF0VNyCN
nNuHztMFvoN+Eyf20FkZZEcv/6sz9Ttsn8ra7O+RQcm2amou6ptg9I4YqWwv
i2btxBhxjZvQSsaOj7XIIoHDMdMkwhZ88X6T/+SEHDIffNZqwNkCz8JeKzpZ
DrF81ZrYd7fBlnqeWXZEHk1NJAx2a/OAmiMFd6rkUeIpa6okgwe561Y9/Vo4
ctu/zRuI5YN4lF/snDaOZuTNG/rj+RAj8sB0SxdHASGpX3qT+OCtsPRc/QiO
jnPwtA/pfDhmln071AxHx07nCdFy+fAhckFP2Q5HsqXLjOm3fBAQziL6+OGo
RjPD02uaDzfTGmxuB+CoWsbGPHiOD/Ny8zxiEI7GxyrvRC7wgXbQwpccgiMS
z+rWg1U+5NnMWUtE4sjgz8yu3i0+GKaac6vTcNQTMFr7UhRDJbLXy9+n4yiE
mWtnJIYhxccZ18Yzf/QrS/dQ/okhgcqZHpFsHNXpSvgOSGLoAy292OUJjm5q
PR3iy2PIyrn+34H5P/79/G1SFDBUPTktHVeII/PEM1z5PRjKZZlGVRTjKHc5
RVBPCUPi4Z6GzSU4anih6vVOGUMxAumLH8twtB/XFLTZjyFucl3B4kscLWZU
jw2oYMhbZvoS9gpHEyGTa9fUMPQ3OFZUuA==
          "]]},
        Annotation[#, "Charting`Private`Tag$28965#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVj3s8lPkegN9EquPItdcWihJCqNzj93N0EamhVtIpsrTkflYdLNkkd8ko
KbpRoqKSxtLwfY/r5NJgyLorijCYGSOFme388XyeP5/Po+EV7OIjQRBE4A/+
bwNLFcMesz9s/Hr5kWeH9GCnas4jmf+dQjPrhlXdS29Du4dpQzMViA7/EqjR
MJwH9dns3ETaBbSjssVPf9NjeLAizvUpFY1umTNKjV49AWSiuvrX7FjkFdz5
yLW3GIr95r3DafFoxlNOR9n9BSR1PFHPodJQKqtq19aPpRB1ucbalXkN/RRh
/vyBdBm8umM4dTqbjiIXPmM7tdeg0bHmYAgtC5VpBnaDRjksW1ZLZFJ3kFiH
5WhcXgm7f9Z7mZN7Dw3FeNBXJb8BhlmLoQvzPkpe+I9xgysTuM4Wg+7ZeUh8
Kg0Lh6rgZLyiVQCtAClJOf329hQFZjONc1epYrQnOvXewFgNuESJHDNLSpDp
dXrKtl21ELTGJP9m7nOU5SsIpkXXAke+XYfGfIGWbtDKwmXrYK2+TbdbdimK
uX/0hr1WPYR7quw+R2OgvOG+DzT9Rjj2toWbSlWhbA33+SuNTRBR+QQybKtR
pEnDdPmKZrj7NDEjq6YaVfAka0KsmmE8ba/J/TpASJveElvcDDa6p6tPjFJI
I/bYYFhqC3C4XVKB4zXo6VZeR77ZO1i6UH89c7YBaT/sr1pZ2AZXg8uWlY0b
UeJtQnwb2kDDN/9sdmgj0vuvZ4JCdxvsP3HJ/A6/ESlCbeRDqXa4ZmXdXzDH
QsfjLJLOnGkHLeL1lsqFJlRMv3wgX7EDDic9LB0m2Mjt9faEfh8OpLCaKlSt
2ej94Z0O3HAOsKR5lFsEG316VhI+lcIBu3hrdhuPjQR3Z0cYLzmQazt53jO0
DZ3bpnv00hIH6DZxdJpXO+qLOVWrlN4JUeaMZqO9HPRd3ZlJK+oCZ/0NNjzp
buR0Zet11YpueNU7zMrzG0Rl1d/SNrn3wb6fvpwEkxE0PlHvZdg3CAOG700P
8D+jSzPazI7JYTDM+ctuVDSBlIXKu1gBH2HArzf/1sI0wjo323rYI5DrXPjb
nCsP+fh9OMle+wkKVIJKCk4IUPTPvwonnD/DKuXpXi1LIUp+USctGz4GSrVc
I2P5r+iNuc6ljPRxiNm4sOmA3DeUeVHEv8D4AriISWznfkcMN6eQmZoJ8PiQ
Eknyl5BfyFcfamgS9Jp71TK4InTOull7NX8KtIWhPf6/EJgRJN/VzOXCWM/v
IUreK/BBMFjYtjgNLj1ef+QflcCOCq5bHwlmYMqA3W92fCVuGOqe1oqZhVMn
F50UXCVx0WNX0RLBg4h8SXOOnRQ+jUsmvCJ4UIczg27tW4XfJhO6bos8qFwQ
qe03lcbCuOCKo2F8SEja/tFcczV2lW7Qqp/gQ2xwH99Icw2e7tpY9y9/AeiE
+EWtk1+LP/nqxx4bEcByfZSLQPEf2P1Q8L4OnzkomjtiraYggyVkGQERn+eA
sCEeGIhl8POEHHd1DyHE95s42xGy+N5YbnDXRyGU37CPRLOyWJ9rs5J1eh5A
e+Ofl/rWYeYh5eOePfMQmWDxwDtQDjND1vJaPb6C/+rOvN9H5bChn8Pr8sGv
INj10uGGjzyOCG7ibz63AO1TSzs0B+XxSN9kjMX0AmygF6q5HFPAsemSERWh
3+D7h6zSuE4F7NbQfYQj8R2MQHB5+yFF7Mh5+ldT6ndY3p+52NGqiJMdtmxx
11oE0zf0aHUnJfzZUaYvrnoR6pjEnoFaJSyxI3aUQVuCL74v79/dq4ytuh7W
GQuWwDuvzZbDVMY8/y3Av7oMDqwj3Cc71+ORoYSuFj0RsLLl0ZXS9Thxvx1L
rk8EOfO2rR26JPbYvCzqvCwG2ZiAy2N6JP603qqqI14MsdI3LZYMSBwUlvql
LUkMvipTj7R2kniPgEx7ly6G3ZZZF8MtSbz7QK4kO0cM76InDNUdSaxUNN03
+koMElKZdL8AEr/WuebtMyqG82lV9heDSFymaG8VOiaGceVxET2ExIMDJVei
J8TA3mbtzwwjMUNke+HmrBhy7cfs1kWT2PjPjOa2JTGYpFoJy9JI3BrUX/5s
LUEVKp19+jadxGHcHEdTGYJSvXPtzGDGj35J0QbqnwQlUfKpVTqLxBUG6/w7
5QjqHTu9wP0uic/r3usWrycoW7fKfwff//EfEGifokJQZcOjCnF5JLZKPChc
v4GgcngWMcUFJM6ZTllpqEZQspHeJjWFJK56rOnzRp2gYiXSJ98/IfFmUmel
/WaCEiZXPJh8RuLJa2UDnRoE5as4epx4TuKhsOG5M1sI6m9pnos4
          "]]},
        Annotation[#, "Charting`Private`Tag$28965#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0wtQ0wUcB/C/4z1IGPJYJAoceNqV3i3vuCvX/gG74nocTL3Qmu0WXF6l
ZGIlCf3Z3S6jjjy9CL2sv3IuSrzEIAaWrSVkYMTDU+EYDRg4GI8NHIy9iN93
291u97nf8//739LVpYoSAcMwxWtf+l37mAVR7TKp8F608rP+39fM7/2um9zt
rR8kc5lfD5A/P5I9Qmby3IOyzVqb1lBkJqfFRo+Sw16OHyOz7/VYyPL7leNk
wwW5lXypucOC+LNWGzx5eQLzrtfayR23Qh8g7p51oH9qJ2zwX1skl3xgsmKf
6hon5o2cmiKb9+e4UL/t1jT22Vq5Qp5g3rWRVZK9HuwzuWsGbs/3kbP+emEW
884+vor6IfEc4ifHGZbi0bnzcEflOnLJ8B3YbC8TsF8anRpPlR371BSHkCWR
i7B5S1MoOWPhpAP1Ea+EIb+xH+YK88MRL1Et4J5PSiLIxul2mDMeiyRfPLxv
EfVDj0Wh3tcIG5K3CMk5BbkPsf/2Vdi4fC7gu/IYsmBO4oQd47C66zisqrv9
COZXDsD8fzfWw4XpS9in/JdYzJOdWAreMw77XNm8jHhaP6xWHIZ5cZ6IPFaq
C3j2V1g9og/kf/NUPPYd/QPmvmiDNS2vu3Cv3owNmH/NAvOXr8AXO0+vYD6f
n4D+TJYb8ecvBGzgAhaHJqI/54fN0WdgTeaIB/WWkKTgvb14/k/OwprwbB/i
3XHJuF+DDTanfg8Lnmn1Y/8WXZtMeK++N3z+ZxnFC/WdMq2t8ODuXUYyI5ns
JzcoDvwL158ekv3p3Nrsr71LNtSeGiWXpb8/TOaKGiZko+UJ5YM/mclpO0xW
svuYYgx+STdDfnqfa1wWuLcd8esfTpBVrzU5yPvnbgesHF5Evu7EA/Q/I15C
/96sKfRL/XsZ+T1u2GwzrJBTjK5p5H+V6yGfu/OxDfMaN/rQj9s2g7ihy4/6
nQswH+tmWNrHMjBHZje+s47c7sibxz5x9wXsEanwt7oyO+ZVHQ0hS719MCet
DiWbPGoH5k1lh5F9q3qYv8mHo774zQXcb89zEagvaIH5J3IjyRWZBYt4vm8P
RKH+atRD5HelC8nKF6tg1Udu+HyzHeYOimKQ3/yGE/00fbDUrYNVh+Tr4eyc
peD7gVNbq2HVTiYO/fMylgPvRwFLU47DbGKMCPk1212Yl/mqKHiPgI92ioLP
CzN1ynj0+/HRFdyr/ipckfAWrNJv2oD6Q7NwWlEbrCwzuVFvT0rA88lLPaj3
/ABXCHZ7kS9OTMQ80T/e4P1h06U9Ptyrj01C/6zzftT3tMLSm2+von/T2v+D
+qVYYf5TbTKr36S9EbmDYf8HvpGIFg==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzXk81PkfwPGvIyb3Nb48VNa5bRI5cmy8P7+KYZR1PVb4ITaMSiW1u03Y
UOu2itaxznE+hNzGbV1jTc4h2iRH7vsewuzuH6/H88+Xgvs9Gw9uDMN8/u0/
50Zspaq0nxrbKlxNEx1Xg7lSWuKjGmeImealHZQlQ9KNrr90anyAwhd622CC
BvIVmT8Mk3+EF9FF4rXyebCu5+IuVRMA90lRzMHyAph0ji7JjwsG66AzFSIf
ioCZvqjBIP8KIm9yyVTHEkhVyj/HWxMN8R4qdUmTZdCqxWMvTo8FvNKv4RSh
Aui2Zb9nxL0EzWWNQMbJSsh8JSbdRP4dmkuvplsrVoOfbLfUAT0VmNs2LR+q
a4Fi6G8XGZ8OW7udg1URdVBcRCQL0zPAFEkq+NvXQ1ZPW3hKHA3GBzoMqsYb
IEpM6XgdORfehvU+0nFpBpf4T/xsehEI0zgX/z/XAiPK1XlNucWgIaUQkqfd
CraVMaTQ+DcQpqjcwApoBeXFtMuC9BKg/+CdgYm2gYyQZUhyXBmMJZ2Pf6/S
DtyWhdw15CqowHiDN88yYLCfwrVDbwDf6PJEcmcXWG6Pz783aIRnISVDgdxM
6JRxGGiobYTuePqSwUUm1LuaZz2vbwI1Tr2/VTETBnbiaQLjzZAV4P/SIvot
1D57dCV5qgVMTMMDovR7ICLjQljNQgfMOZYci8jvA1LZA381NQbE+rZ7Kjb3
AW9b8f3U2wyI/9NY9I/hPgicVXUIWmLA2kP7yxp8/fDgHH7GfKUT6khBQ2tu
/eBYv8scWe+CyM6vcr+VGgC1Eboom90D+4Ff/hfqyYLRa/Y1yrq9YG67LZv0
mAUxrdvu1r69MCxb6ZwUxYK1Yq2qgvlemN99uOVRxoK/L31ffM6nD/JZqY06
hyxIl+2zm3Duh1vh+tt9vw3CaUZrpimw4LYX1nKqYAgMFV9/K849DEQb2QDR
2mHIpSTVjruNAeFvC4MbTh/gfqnqxIjmFLSNeoV2j45B77Jq3Z2lGSi6USY/
sDQORN4IBy72Ahi1HFC57k5C4KT/yfK1FSh8FbRs3T8FRIwpF2azDs32Xd2h
QtMw9oUgWG23CUeWM6xV2xkwwx1z6nS2ISimfPEGdRbapP0GLAV3QU/PMEbv
5RxohzS4TR7fA0FlCd1faubhsqhcisXMPhBeT9k6dSwAiVCgX7lwAF/zUNMy
pxbBeRqjFE0fwQtr6zeeO0sg4KubaeSKocHomwv5G8vwSSWkKduVC61flM9P
xFbh+S3H8h1LbhTzy9xm4d4q5HiQR8xseNDNNHwsKHgNemzSTCeteBFXgVlO
Fe86dPQ+ifA0Poa8NyJ5ngSsgz7PA84C8KETRhdnxzjrQO1YN3fU5EcXHHJP
kR9vQPuToY9iJwjo+rtL98+vbUDkbD+NIXccmVGvqBr4boLilL2Rt4AAmvXh
l3k3vwnnX+0QBIUFkTxpd3XnzhaQDfZObgkIoa94lpMsVrZA2+c5oXNXCPkM
pbike21Dgv0Z5RS2MGL5EalKS9vA7L9OdJoTQSMctvo0ZQcIxovfubFEEemp
cfL1zzvgqsn8qO0thqg8f/7KuL0LtHCPwLPjYkimt+dO5eIuKBpH6am4iSOD
2oM/rH5mQ0TtT05x78UR804HNf2QDbsaROWc7yQQp0uLzzt4DzIxOFbdK4Fe
7suG8BP3QTtJ3dqYJInChHn3wjP2gTs6v7K9UxL5jHoJLxl+gaHHQ41rJCn0
1zPLBKF3XyD2HEPrRaMUWuASWTG6dQBhxiZN54GI9Cme2bjoIVCkw6pI1UQk
kZV7ZFJ0CNdm/W241KVRgoh6Su3VI7gnecRXVyiNPo/tJstyjuAx/xXVBSUc
Sa++uyv6mgMrv0XYHangqGe8QulEMQduyvQHS5zGUc6A2LVvSjlg9Y3LJ8Oz
OMrqPDq8Us2B0xY/J0bq4Cj7+9GPQa0cGIkpFFA3wRGuqdUkPsoBfWni6j1P
HDGJXYXtfBgqTnM6+YyCo+hYaoAtAUPKX9MsEm/h6MLBvciJ4xgS09fIb777
7+9BtOuREIbmHMzdxH/CkRHRatFQEkMJqQGsslAcybGO5TXJY0hItY2LEY6j
p1599tYKGAouFtD8EIkji8yHpClFDN1tSojiicVRw0TJFL8qhkwnSk3sEnG0
5MyUsDuLoXpvth8lGUcCMboNs+oY0towpvmn4OjSTbO8JxoYOsXz9ig7A0eK
D/sMs7UwFB8poV5Dw5E7H/Wzvg6GBKQcnLqzcbS2qtPTrYuhpynp4RO5ONIP
kGO762FoR3mmejsfR3H8Zu5sfQz9A4HgN8Y=
          "]]},
        Annotation[#, "Charting`Private`Tag$29113#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzXk81PkfwPGvI+S+xpdHh3VuW4lQjo3P51cxjLI5Hiv8EBtRqaR2twkb
at1W0TrWObkeQsh9vb/rGmtyTkqb5MhNjsJUmN394/V4/vlS87pq7y1IEIT/
v/3nzJCDYrXBHXMHtVOZMqMHYKaclXKzzg3FTwqzNivSIPVc11+Gdf7IVyTi
kskYC1Qrc354yfgR3Y8rkatXLYAVI3cvxbpgdI0ey3n+tAjG3eLKChPDkF3o
/krp1yXAyZrXZTN+RdJP8hlMlzLI0Cg8JFwXh5K8tRpSxyugVV/ISa42AZFV
gU17xSqh1qHi9+zEB0hvUTeEvacKch7KKgHjd0SVn8qyU6+BQJVuxc3aDMRZ
s295XVMPvqZBjjFJWejjRufz6ugGKC2hMaRqs5ElVlALcmqERz1tUemJLDQ6
0GFSPdoEsbIaOxsY+ehZZO9NQ3cK3JPeivJqS5AUi3/s/zMtMKRZUwD5pUhX
US28wKAVHKri6RFJT1CkumYTN7gVNOczT0jUlqHaH/yyCZk2UJa0DU9LrEAj
qYeTXmm1g6BtsWAdoxpVEsJhHw6y4Xm/r8B6bRMKiHuawujsAtu10dlXJs3o
bnjZYIggBzqVnQea6ptRd1LtgskxDjR6WD+61wjoAL8x6EwpBwbWk1jioxR6
FBz0wCbuGdTfvXkybaIFWVhGBcca90B09tHIurkONONStiO6sA/oFdeDDhxg
o4SAdh91qg+E20qvZVxio6Q/zWX+eNkHIdPazqELbLR8w+mErkg/XD9E7rd+
34ka6KGDy5794NK4wRla6UIxnV/lf6s4AAeGamV4vB70OeTL/yJ8uDB82qlO
80gvsnZYU0m9xYX41jUvu4Be9FKlyi01lgvLpfrVRbO9aHbjxkfvCi78ffz7
0kP+faiQm9FsuMWFLJU+xzG3fnQxynit77fnsI/dmmOJuOjSBaJlb9EgmKo/
/lZO8CWi2asEy9S/hHzf1PpRzxEk9reNyTnX13CtXHtsSG8CtQ1fiOgeHoHe
Re2GywtTqORcherAwijQhKOdBXhzyKxlkylwZRxCxoP2PF1+j4ofhi7a9U8A
jeDsirRfQZRTV3eE5CSMfBGTqHH8gLZtp7hLDlNgRbrkNRiuodD4p/PnmNPQ
phQ4YCuxgYyMTOONHsyAQXiT5/jOT0hCU/7IL3WzcEJmV7rN1Gck9njCwbVj
DuhiRcZVc5voayFmZs7EPLhNEr4lk9vovp3dE5/1BRAPOJJj5kHg53Hn5wpX
F+GtVjjkegjglWOqhSnEEty76PJ03VYQx/8y86H40xLkeTOGrOyF8PlMciQ0
bBl67DMtx88IY4Eiq7xq4RXo6L0d7WO+A/utxgjdDl4BY6Hr/DkkgnebHZse
4a8As2PF2kVPFB91zt/LuLUK7bcH38juFsNnXxy/dnh5FWKm+1nsXTuxFfOk
tknAB1CfcDLzExfH0/6iyi9mP8Dhh+tiElISWJW+sbR++SMwTD7t+Sguib8S
Wky1ef8RDPzviXVuSGL/wXT3rAtrkOy0XzOdJ4W5gTSmxsIacPrP0lxnpPEQ
n6cz6bsOYubz33lyZTD9jnna2Xfr4KHHeWPgJ4uZQn/+yr60Aawo75CDo7JY
ubfnctX8Bqibxxppecphk/rNP878zIPo+p9cE1/JYc7lDmbWFg82dGmaed/J
Y36Xvohf2CfIIdCOml55/OCzSrgo7TMYpOrYmdMVcKSU8Keo7M8gGFdY1d6p
gP2HL0gtmH6BwVuDzct0RfzXXdtkyRdfIOEQW/9+syKeE5B+b3ZxEyLNLeAw
omFjX59cUmYLfJUiq+k1NCz/KH/bomQLTk8H2QvoKOFkaZ30+lPbcFVhW6Sh
WAm/G9lIU+Fvwy3Rk9pzGiRWWnpxReYxH97/Fu24rUXintFKjd2lfDiv3B8m
v4/EeQOyp78p58OZb9zfmh4k8aPO7a2TNXzYZ/NzSowhiXO/H34T2sqHofhi
cR0LEpN6+iA3zAdjJdrSVR8Sc2hdxe0iBFWa6brnri+J4xKYwQ5iBKX5Ncsm
5SKJj25ejRnbSVCyxrqF1JV/f9fjPLYlCWrG2dpT7icSm9HOzJsqEFRyRjC3
IoLEu7g7CkCVoCS12wTYUSS+c6HPyU6NoMJKxfVex5DYJucGfUKdoK5AcqxQ
AombxsomRLUJynKs3MIxhcQLbhx5x4ME1ejHC/RNI7F4/JGmaR2C0l81ZwWl
k/j4eauC27oEtVfo2XZuNonVb/SZ5uoTVFKMvE4di8ReIsx3xoYEJa7o7Nqd
S+LlJcOe7iMEdSc9K2osn8TGwbt4XkYEta45VbNWSOJEUSsvnjFB/QOzKG5G

          "]]},
        Annotation[#, "Charting`Private`Tag$29113#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0wtMU2cUB/BLebZaxAJ1Yc4VdQJm7iVsiOnuhQV5hFUtg8QJpjAZZG5q
RqJ7yLhDYGNhI1vcNJtERjVkgihsdUip65guGxRZkNpANBYEC/LoA0uh5THO
vzZpml/+5zvnfLdtZP4RZYGAYZiDK2/6XHmpAm9dY2NyatyHuL4/Vsyf+K+b
LDp8aICsv+x7m9xVXHKPzDjTB9iw5pSb8lwz8pgEM/k5hWaILIsvHCEXDEQ+
QL1h2kKueOPICOpbXpiG30l8iDw72Eq+8FIJrD+jtSPv+caC3FI9Ax/nx8hc
VeIs2X/bD+OoDz7rwryGnY/IZvXRedS/vH8C9aF5Hjigf5Ksyr27gH1F2imc
/7BoGfcJaZzG/sUmhltx8uWPrOj3ebEPJzKpBbYgG+qXWgVkCdvmtSHDl9zq
72cn151X+JEdWz/2WsH5k4czjbBM2xBAzt9c5YAdiYHkzg4jrFJGBZGT4vbM
IH8qXIjz/2rgul8EInL9nS2PMf+1OXhjQjnM/GxZRS7rtMD8+5bV6Hdpv/PJ
9yvG/BgdzATeD8b9HNtnkV8/twb9bqhh5ukDIZgvTXBhv7f64DLtl7C+NHUt
XN0I803dsOBkq7deuEOC8xNeM8Y2yZN95pDHcqG4j+KVeeRnf4WTnI1w3YGY
MOy7O8QNX62HhzXHYNmUOBy5cMLr+Aa4c2OPB/3bhVL0s2ct4Pdw/BJclvnu
IrwvYB327XDBTOy3cNL6e0uYF9ejZXNqOr+/Nd/CUn77zS62OWXoYmna32R+
16k+ONbWS+a+Pj3ImtRHjb1iE1mfXzpEjit6+y7qT744QnZu0N2Hx7eMs5N7
2xLEC0Nks+PZSXJE9tYHrPf/YUOelTGC/vW/2cntd/aMIj9omCH/6DA8JMuk
7zlx3iAag08vu8iDwW3jqL9ZM092b2t6hHknWA/O5ykmyCq1zyLqp0dhXhO+
jLzPPYn6Cz8x3Io/+T1nGvuoRn3I7osTVvT/IFvAzUbnLDZvtyGv5X3JuTED
cN2pAj9YttuOfsOv+sNpjTBvkgSQdWkRDuzzV2YguTb5Bqw/9noQWV6onEG/
sVQh5l0bg/VKqQjnn9/7GOejZKvIJcNGmCsXr0a/71KdeD7aKDH5Gbbf63QP
XBshn8V+Rcwa9G/oh1WyP+FaPtaF+b1ZIcj7K2Fe3gXXXrHC+srCtdin/Ks5
5JtNXqdYYW7fLgnuk5w1730eV2FdpQbW79gUin4Zm9yYN9UBy7s3ePC8jfFh
mF9hgs1N7bBOeX4B9e714Tg/G7YIt1bDusEzMH8lUop+h1uWcL+d57xOr1pG
v+roddynYc3Xu6IZjvb95wv4s4o8hvsfh72COQ==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVknk81Pkfx78YpB/CxFe/Hv0ocsa0jijH+7N2EdrNURtbw7hjGUdFaiZS
ih8/iWbZ7M8Rodp1JfRzH8NsMzsM49rWkiMxOhxjxjnb74/X4/nH88/n62BA
lGewNIZhkZ/3f1bqiqz0LyfZ8+TLvQaKjwDFZ+d2FckXnKhpbTci8uFWgn9d
JIkKDua66j5BJWA8fXDwZkkctK9dTnFoLweGApFzinQD7Mz8HQ9GPgMJnjyV
Pp4MZm6CMr2nlWDxbMM3puQOjHHqcsbZ1VDAE5yzJWXCiymrTmrwcwg3M1vI
2siCM4Oj7sPZdUCgUStujWfDFuGI9nLVC7DeM6cbVvIjpOa4e3l0NsAjy9ED
FqQCOBmpyj8b3QQFsJtKVCiCm8YrjpyTzRARZPB7xkYRiG80NEvtbwG5yqD0
xPFH8C3YHqqobIUTX47LB5eUwXYPHjvMbYfSUC52lFQJoRTZePnwLojJWPR7
ol0Fx1/ock42dEGhd4qfqkI1YNaPhQEy3RBBL2n990Y1mMgx68/kdYN87wSN
Pl4LkoLnVYH1TLD93ns9oKQeTpjEmve96oXHSS7LJqRW8Le+Q42ns8Hp/qck
tdpW0D20lKz1kg3vinP3iCzaoLelfMJ1lQ2MN7EalAPtENDwxUOrMA6MSHeY
G+p0gNAhrqThm9/hgiOZ2mTaBTZltd2XZPog5BVjesKxF5gdkJuG86Dec97I
824vOLk1ZdWQeCD/2ja2m9ULygq/jDQ686BCMI09cWNBnv3LsNB4HggUzf4V
6/EbjNX4FXgO8SD6NNebQGaDT1jO/t70AUjgy3ENLvcB+OrcHJgdhNEYR+7X
NX1guDJf5Lk++LnPbS7lQx/8FMrMb1fkw2ZpUugpi36QotNXQ8z58L+J7dDb
lf0gq7fcOJXIB6uz4ourj3iff2Y006Y+BF+g9+H89EGgI2aj+bFhOKwxQn1A
HoED8PSJhcco8BMiUhr/+Avc56xZNMKfkDvZ7mRCnwadj4aZNowJIA3Rxn5y
noOhMR2dmm/fwM9N4iDHQAFo3cvQqOVPwSJ9SNT5w0dY/a+UXaHNDOSwahSp
uUugCGTzswmzsJ89uu9h8QrUaQ4eze98C5px3h+IaUI49dWCjdrCHMjfS+1Z
CxGB0dEgpqv0PEwWae5PiFwHfjCuf85wAUjnpaxcPDZh0LDVOdxSABeVXfsa
ydvw+rj6FvJYhBzSVz/cp0jAXuHEA6WA9/CQ5jp3vghDtwJdnCTnP8AEWWek
tVQKyVyf13sf8hH8ciqesnKl0Ur+iC3F9BOcYZJtDxXKoHozVKhY+wkcTAWn
q4sJKJJ0jKtqtgThAl3n2WxZJKxl5T+sWIJdjzO3wvLk0CrWY+pnsAyTtaUM
RoY8UmZ5UAwLl6FGlF0tvL4L+fX7NHgRV0BkXZP2OFEBpcb4R1vdX4Gr3OtO
WzG7ES/63UCb3CpQKXEdj67+Ay32smMC76wC2dCllX5NET2/61etTxDCXSdW
gSRcCTm1OlgpXhOCHiXejheljGS89b9r3hACxh1ocwncg1Lmd/qHL61B+HGZ
gE0DFVTT1E0oF6yB8m7LroSnKojSEeazL0oE/QS7H910VNGlrkyhm0AEnO0L
Jx3LVNGgjFbm5CUxvNX2isjWVkP+tXLl14RioPlZ8hLy1NAYwd+9MW4dvvmZ
pJ72TyKyY7wKLJHdABsZjC3IIaL4qzzzqf9sQNDFd35x+F5En6UFSB3eBIX5
Zsv8vL2ouofc4tqyCZycUDpRVR2tKca625/egt9sjUqf56ijBx9mTKyXt2B6
T5dtuZIGMvGjTbne24ZrO84alikaKPHZ4bBg0x04JZjhLsjh6MvvqpwC3uyA
jbT3+koijjLSM8uV7klg5qVHhEoyjoxjqvp1syWQEeM2ceQ2jm4SK1NtGRL4
a9KeGZyKo1nGubLIfAkktR2+P5KFI//r84XD5RLooa0YNBXjqFW0yepql4C7
KNM7uQtHl3VeTymuSEBcmcouYOKoWGUh6tiaBIpDku2benF0aLv5AWVdAstD
V3RX2ThS+XW4rF4iAUbdhU/BfByJRbQNCzkM/RFjlOoyi6MgtmvLmhqGkg11
N4PnPvvaK15ZezFk/OYANXkeR5nf/2llpIEhmrvqmab3OKJFrQl892FIiyTW
MlnDESeAIcvRwhDr7VK2ixhH6uQh1YsHMRRdIJAN2cDRLtqdSIIOhjqVJgQF
Ozi6wBgl2uthKJw56tuEaSJvKZbva30MEekDvBFpTRR4hbl+1RBDzRacr1cJ
mogRLJ7RMMZQ0CKzQUVeE42QU7VfHMHQ3yHnPWg=
          "]]},
        Annotation[#, "Charting`Private`Tag$29261#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVkWs81PkegP8YpINc4q/Tp0MRIU3rEuXy+61dCu1Gl42tYdxjGZeK1Eyk
FIejolk2e1xSqHbdEjrkOy7DbGOHYdy2teSSGF1cx3228+L5PC+el89Ov4jj
gbIEQYR/5v8uNZBYG11IcBAqFp/oKtgLdK+NG2VUb+TMSIGrYTlwPc63KpzK
QI4WBlpeAYVgOrqz+1phDOIsXkhy5BQDW0mz/Sj1KrI393XaGf4UpGTiSOpg
IjJ3ExcZPikFy6cr3lGFN9FAe1XmIL8ccoXi03bUdPR8xLqJEfgMQs3Np+6s
3EEnu/vdezOqgMJklFwfzEBrlL16s2XPwWbLhEFI4Y8oOdP9hEdTDTyw6t9h
Sc1FR8LVRaci6yAXbWZoKuWja6ZzTu1H6iEsYM/vaSv5aOlqTb3M9pegUBqQ
Gj/4AH2L7HaVlDbAoS8HFQMLi9B6KxndK+DAw2ABsZ9aioLp8rGKoc0QlTbt
81ivDB18btB+pKYZ8jyTfNSVyhFh82jBT64FwliFDf9eKUdmCtzqk9ktoNg2
xGQNViJp7rMy/2ou2H3vuexXWI0OmUVbdLxqg0cJLrNm1Abka3OTEcvig/Pd
TwkalQ3IYNdMou4LPrwryNoisQTU9rJ4yHWeD+w30dr0HRzkV/PFfeuQduiT
bbQw1m9EC44xhTXf/A5nnWiMun3NyLaosuW8XAcEvWKPDjm1IW4jykohhVB9
fNLk+K025OxWd6eCKgTF13bRLbw2pKr0S1/tYSGUiEeJx248lO3wIiQ4Vghi
ZfN/RXv8hgYqfHKP9wgh8pjAk0LjI6+QzO1tqV0QJ1IQ7LnQgZC3/rWu8W7o
j3ISfF3RgYznJvOPL3d//nNDQP/QgX4K5uZwlEWw+jAh+KhlJ5JhseaDLETw
v6H14BulnUjecLZ2JF4E1qeWzs0/ECK6l8kYaPXAF/h9qCi1G7Ewt9biQC/s
1u5j3KP1oR3oyWNLj34QxYUl1f7xF3KfsOExKX9C1jDH2Yw1ivQ/GqfbsoeA
2sMc+OnwBOoZ0Nev+PYN/Fy3FODkL0a6t9O0K0UjMM3qkTT98BHN/1fGPs92
DDJ5FcqMrBmkjGgWp+LGYTu/f9v9gjlUpdO9P6fpLejEeH7QTFlAR7+astWY
mgDF28mti0ESZLI/gOsqOwnD+Trb48KXkSiQNDptPAXUMzLWLh6rqNu44XCo
lRjOqbp21NLW0euDWmvYYxoyqV/9cJcuRQ5Kh+6p+L2H+0zXiTP5BL7u7+Is
PfMBhmj6fQ0PZbDclUnD90EfwSez5AkvSxbP5fTZ0fd9gpNcmt2uPDlcbY7z
lCs/geM+8bHyAgoOpx4QqJvPQKjY4PB4hjxeqOTl3C+ZgU2P0tdCshXwPNG6
z2fPLAxXPmSz0xSxKs+Dbpw3CxWSjPKFK5uwT6dXzQnNOZDYVKQ8ilfCyVG+
kdZ35+CS4IrzWtRmLIx81wUK88CgxzQ+uPQPPN3Gj/K/OQ80Y5cG1mVl/OyW
T7kRZQFuOfNypaEq2LnB0Vr58gIY0mPthRGqWM7T6Lv6lQUgBF3g4r8FJ01u
dPaeX4TQg3J+q3vUcEVdC6VYvAiqm62a456oYXpjiNe2CAl0Uux/dNNXx+eb
0xfcxBJoXz97xKlIHXfL6aYPn1+Ct3onwjL0NLBvpULx5YUlYPpYCeOyNfAA
xde9NmYZvvmZqpXyT01sz37lXyi/ArZyBF+cqYljLwktRv6zAgHn3vnEkFsx
a5zpJ7N7FZQm661ysrfi8lbaS9eXq9CeGczSVNfCi8rR7g7H1uA3O5OHzzK1
8L0PY2Y2s2swuqXZrlhFG5v5MEdcb6/D5Y3D2lZJ2jj+6e6QwH0bcFQ8JphS
IPGX35U5+73ZAFtZz+W5eBKnpaYXq9yWwtgLjzC1RBKbRpV1GmRIIS3KbWjv
DRJf0yxNtmNL4a9hB25gMonH2aeLwnOkkAC77/bdIbHvlcm83mIptDLn9tQV
kLhBsspr5kjBXZLumdhM4gv6r0eU56SwVJrMz+WSuEBtKuLAohQKghId6tpI
vGu9/h59WQqzPRcN5vkkVvu1t6haKgV21dlPgSISL0mYK5YKBOePKJNkl3ES
B/BdXy5qEJxEY4PVwInPvfLiiTtbCY7pmx2MxEkSp3//p7WJNsFhuqufrHtP
YmbEoth7G8HRpS7pmi2SuN2PLd+uS3B4b2cyXJZIrEXrUT+3k+BE5orlg1ZI
vIl5M5yiT3CaVIbEuRskPsvu13QwJDih3H7vOkIHe8rwvF8bERxNVpewT1YH
+1/kLl8yJjj1lu1fz1N0MDtwaUzblOAETHNr1BR1cB8tWe/5XoLzN1Mvc+g=

          "]]},
        Annotation[#, "Charting`Private`Tag$29261#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0ntMk2cUBvDPcpOWQinQ6sik3ohsOIS5GcxGG4KABpINiJmKsdHVQdyc
ZiSoc1k3HOhGZiKp+seyNOtkycIls6uwuamDUsIGo64MQnGslbVYKEJpqb3R
jvN8JSHkl+ec8573/dh8/P0qBYdhmLfXfunv2o/6lZG70tqrfTrVwv37a5Z4
b4xIJzRnXtc0GMmWtpaH5MqDS+PI+5onyPzTIjNZ/VyeVep8s7d522ULWW76
xUbOPhixkh/83OtAPn18hixT9jwlx1/X2DCvReSieTvNX46hvrjTRfnJokk7
5nNLPeR21e4nyI9IvGR7YboD+22Z8mH+71vno/v40V8vh+Ul9UGy4XyvE+eV
v7GK/XjtC8gT/RHsM9e8SGZ02etk3h21bQ01Szivv5gDH7oDy4rqWHfrYXmc
JoZc/d0GF86PmY0lp/14BVYatXHIeTaYGUhJILsvdSxjf+MW2NSig2WuE+vJ
Wt0+N+al3kpE/a4hmDnZyCV/8FOuB/dRjfGQj8atwIf/Y12fDMt3vcDHvh9q
WZszk9Gftc2L+qyGFJyXEGa9t0oASxXPsP9Fo0DWVWbdq8rR4z1M88jbyr5B
buFcScV5Lo4P/a1cIe4zdRNW5vfAWqHWj37BINzmvgdL8o6mkV9+WBXAfX2u
tOh7wJZbR9LRv1EYxLy61Az0h8pDcNvNjOj5q3BTN2w6XczmQzUieKwwjPtf
noG1pXrY0nFBjNzDiyBf8cPVz/vD0f/fX6VVvZu23/1rWErvP835jayQOP8k
S4Zso9Kc2qsFTZXjcFfZJPnawBdmsnp8t5W8PBD4lyx/0WuTpneVFe7vsGLe
3+cc5EMTm2fIMv0PT8nnxzbY0H87yUX9tz11JvKDAr0L/SXn7Kg3PHKT/Yah
WdSnXPDCLzkdZOXjQR95YyA0F60PYP6Nj1DP8HQhzDP94cR+j0pXsc8x0QL6
M/mMjDzLXSRbevLWybgTmo7DwiX4opRDHuZ+xvotcQzcOAUrs07AzhrGBfNH
Y9H/6hwsyfLEoV6pWMb9LoXikSsGWYcLEsitX1lhS3b+esybqXZjf3F5Ihwy
wOp3tFzMM3zuib4XD97qg2VFT+B3r3FXkO/xJZFzjU2wZacgGfWdYi/2zW9M
gRftsKy7RgDrjz1jv/eggN5ncnE7vp/a/g/y3Mp+5PLps6nYX5vjY98rAlfE
qmDlge+FyI9m+jFfuScN+53hI2feuw4Pv3YKubz4Htwa/tTPzvs4HRb2BVD/
SUYGzj87H8Q+9V/DSQ2eEM7b0cm63RyM3keE877dFMb8EgecdKcfZjinxPge
j+MjqB8JwhUVtrD0f359jzY=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk41AkfAHA/uRZljGN+Qqlte+Nh5K111fh+J8LL5ujQW6Rerw5HvGUd
eXJFKMMaFDlCISxylbVyRIoOJjHKfcwySDGNm+l93z8+z2eHm+/R8+JiYmKX
/+f/9xRNdjp9CjfTnfI56HxYH2JKm0uPTrlCevyUVsy3LOBfvmitMOUDeYMK
+8f08iG6eTHzT3ogmPY1T+fPFYFaR+2dWX4oXLpT580QlgLX28wq0TESlOwS
grgN5ZAtyG4posfAePVvL3X/WQkGIrdnA/wECBn3Z5L6T2CD6aax5saGWqe/
XlkHPYUxieS+GMdkOPNCn176uAZ+vy10yqWnwrHO0oZ5QS0w7tbYd/Pvg9K0
4D1nqR7YusLocq8cCKTu6z3Ia4BNCfITi265UOxgeLG7vRH4Doy8SMeHwBnO
fXvqeRNUcO9rZdEfQczUkm+IczOYj/1LjcMvA/GrfvnG+1vhqXlwkOrIY3Au
lr6cHtsKKUfbvcq8ysHna2F/bX8rSFWPvha6VUBP8G8OHqEvYSaAeivCsQo6
GPdHBp6+gup1P8kMeg00JfG3e663g6WMkegdvwFUKS4P/aU6IOekc0SvTyMw
PSKHs606YK0gTGJU2Agse9MZZmwHfNzpLhkc3gSOdOM/VqU7IeF5iVw86zm0
FP4j+LUYB5ZFDLIqrwXKHtPWh79yoOPaOYPv3a9As9D2qP7vXXA9VyDYRLbB
0GWTkaTWLtBuj6qWcW4DY2b8n13DXRBFFhlRR9vg5PHJ3CmlD2BSM8/4abYd
Gr7CzcjgD5AnvGFjK/kWStkGHC6zG+pruirebOXAzu0hZ3l1PdAVqXlPxZQD
Oesxbn9/3wN8+0vhZ09xYP/1C3e9J3pAmb9h9y2VAyvi5f4FFC54ktqft6q8
B7b/E3VDdy6oXgvb7anQBcFkn7ZAuhd8THUzZCS6oeiZlZy6+UfYVn8z6vBs
L6xV93DlE/ugpFU8PDBtGF7ZHU81yRgCnYHw09IL42DieazZA0fh1Bmj1hbu
JAy2HKh/yB+DlA9lbyvlPkPWqg9FPpkHlfmHhaGqc3BWSXciTn0CYs/bT2du
EoD//MywTOAk8LJr6ce3CoFLPc04MMwHPVfoj9y8CGsPZpnhO6fhUNYSe3Rx
Ce7RFtN2nZiBQSdK6scfVmEujtVPSfsM51MsJKxX1iDU+T9eUfWz4PfLp0YH
qgheRjuZWwm/wKNDnOYWihiOZI5UhivMgVzu81MZUgQyaVWa59LmoPLgeCoo
iiNjv1lfks482KdTZbVkN+Go4grjYMU87P356o/vaBJ4yDy5KoopgADKDJOt
JYlbRreYdb0TQFXplRQ2TQrZhWp+jfbfYF/sngTXH6Vxt6H0KKf/GxTvmq27
qCmDTtpGFxRchRBNvPkSQ/0Bl/2tIq4MCiFf/VPbrxqyeC+g9VPExQWoWxJy
s5TlUGLuxLgXfwGUFZms5B3ymKL5ONf310X44FlgmaO9Gb0D7Ld5iBbhVrTa
z1Pbt6B08SWF5rAluDH87LVIRwEFL1YbFuSXwWTD0GYPlYIHN/RWP7KXgaeT
WeHCoqBUwXftYyorYBB4z3uJooi00TX7pPwVuJaXxSxnKaLd3U7jQb1V+Pec
iWcnlYq7BDX6DS2rYK05WCKfSMUbhqkmC45rcG5a/mqPrBJe27w34sXwGqhx
u29LJCqhEU9nmn19HToePKx3lFfGMJaWhQx1A3YlyFpIJitjtj4vor1mA0rV
RL9Y0FSwSPrxcJurCAyil31zk1QwXbNr6I1IBCcV4ybcSVWMW5J94lXxHYJC
dgVa3lFFnoq0UjNdDN/esrldpUDD2xP9sWM3xbC5WmY+OoWGDmMVyv2TYljV
9O5KEIXEv7baZg5aEije6z6SSyWxJOe1fYI1gUdn1+zeKJNoU3jEAWwIFKjp
6G5TI9ElYM74wREC9/pFT7TsIPGVXmmJ13ECS34CZ4V9JFpt8TDb7EZgwe1y
i4ITJEpXhlFZIQQu5lhVdZ4k8U5Qd5llGIGHa4Z2rJwi8bPrZCYRQSBvXP67
rSuJxoU8n6AoAncyPGrnL5B4TBT/xSOOwOyvO+iMIBKXTXzCXO4R+EWyNvNC
MIn5ZmY2GhkEmmk4yCVeJ9HW2dZjIJPAIetQ/lg4iZ0fGvPO5BCo8aDvQewt
Esfa4lTcHxHo/ccVxco4EuNn66N3FxFY1yET3h9P4gTL/8hUMYGn1wzP0JNI
bDmgPuBbRmCxYsebkykkzsS65O0rJ3Dlb+dNI+6SuOdte/NSBYHWZuuFxWkk
7h9jGT2rIjDteDKtO53EoqZO8YgnBP4XwUpA5A==
          "]]},
        Annotation[#, "Charting`Private`Tag$29409#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV1Pk/1fkewHFf2QblOLavUGpMNx4cuRlLdXw+J8JlsiWNlBpXiyVuNZY8
yhKhLGMre5YQBtnKmOL9jRQRJ3GUfRsOUpxOdqc788Pr8fwPXrvcfB3OCQsJ
CV36u3/sLZnucvoQaqI943PI5YguRJU3lTvMuKKMuBn1qC/ZwL10wVJmxgcV
DMnoj+sUQmTTUtafjAB0oL9ptnChBJQ76+/Oc4PRxbtPvZn8cuB4m1gk2Icj
OZv4QE5jJeTwcppLGFFoova3l9o/V4OewO3ZIDce3ZjwY5G6j2GT5aa67paI
6p3+emUZ+ATGRZL7o+yT0ekXuozyR3Xw+x2+Ux4jFR3rKm9c5NUD816dbQ/3
PpKb5b1lLzdAojY/stIrFwXQ9/cdmmyELfHSU0tueajUzuBCTxsA145ZEG7/
ALFH8jqcn1NQxbmvns14iKJmln1vuDSB6fgvymxuBRK+crXQSL8FnpgGBSqO
PkIupeKXMqJbIMWhzavCqxL5fC4eqB9oAbHasdd8tyrUG/SbnUfwS5jzp98O
s69Bncz7o4NPXkHtxlXRTEYdopK4Oz032sBcwlDwhtuIFGmnHviJdULuCZew
Ph9ALI/wkRyLTlgvChEZ4wOKtT0wx4ruhPe73UWDQilkzzD6Y028C+Kfl0nF
xT5HzcX/CXotxIYVAZOsKWhGFY+UNkY+s6Hz2lm9bz2vkFqxtYPu791wPY/H
20K2ouFLxqNJLd2g2RZRK+HSioxYcX92j3RDBFliSB9rRSccp/Nm5N6Bcd0i
84f5NtT4Gd0KD3oHBfybVtaiHag8UY/NYfVAQ113Vft2Ntq988aZyae90B2u
lq5wgI1yN6Lc/v22F7i2F0PPOLOR/vXz97ynekGeu2nzJZWNVoUr/YpoHPAk
NT9uV3iLEv0eqxi4c0DxWsgeT5luFET2a/LE+8DngHamhEgPKnlmIaVi+h52
NNyKODLfh9ZreznSCf1Q1iIcGpA2gl7ZOKYaZw6D1mDoSfGvE8jY81iTBx4D
59OGLc2caTTUfLDhAXccUt5VdFRLfUTZaz406eRJqC48wg9WXEBn5LSnYlSm
IPqc7WzWFh7yW5wbkQiYhsmceobjdj7i0E8yD45wQccVDYRvXULr+fOs0N2z
cDh7OXFsaRmlKy2laRyfgyEnWur779bQQkzsAC3tI5xLMROxXF1HwS7/84po
mIerP30AO7oAvYx0MrXgf4KHh9lNzTQhPJo1Wh0qswBSec+dM8UIzFKqUTub
tgDVhyZSkawwZuqb9CdpLYJtBl1SXXILHpNdZR6qWoR9P175/o2SCD5smlwT
weKBP22OlaguireNbTPpfsODmvLLKYlKYjixWPkq2H6B/dF7412/F8d7DMTH
2ANfoFRj/ukFNQnspGl4XsaVD5FE+6co+nd4xc8i7PIQHwpVPrT+qiqJ0/1b
PoRd+ApPl/mcbHkpLLJwfMKL+xXkZVmxybukcYraozzfX5fgnWeRea7mVuzt
b7vDQ7AEtyOVf5zZuQ2Ll16UaQpZhpsjz14LtGQw78Va41fpFTDeNLDaS6fh
Q5s6a+8TV2BSK6vqVCwNixV90zymsAp6AeneyzRZrDS2bptUuArXCrJZlbGy
2OZel9GQzhr8d8HYs4tOxxq8Ot3G5jWwVBsqk06g45sGqcZf7dfh7Kz0lV5J
OXxt676wFyProMzpuSOSIIcNJ7VmE69vQGf+gwZ7aXkcEqtuJkHfBI14STPR
ZHmcozsZ1la3CeXKgp/MlBRwifijkVZXAehFrvjmJSngDLXu4XaBAE7Ixky5
k4o4ZlnysVfVNwi8oRFgflcRTyqIyzUxhKiO21Z3amSU8J2pgejxW0JUU63E
YmSKErYbr5IfmBaiaqg3lwNpJP5ru3XWkDlBCfe5j+bRSVyW+9o23pKgHObX
bdrlSWxVfNQOWREUT1lLe4cyiU/5LxjlHyWofVcjp5p3kfiVTnmZlyNBlf2A
XGT2k9him4fJVjeCKrpTaVZ0nMTi1SH02BsEtZRrUdN1gsR3A3sqzEMI6kjd
8K5VZxJ/dJ3OIsIIanJC+pu1K4mNiid9AiMIajfTo37xPImPCeI+ecQQVM7n
XQxmIIlXjH1CTqUT1CfR+qzzQSQuNDGxUs0kKBNVO6mE6yS2drH2GMwiqGHL
YO54KIm7/l7H6VyCUs3vz4++TeLx1hgF94cE5f3HZdnqGBLHzTdE7ikhqKed
EqEDcSSeivU7OlNKUCfXDU4zkkjcfFBl0LeCoEplO9tPpJB4LvpUwf5Kglr9
17kDYfdIvLejrWm5iqAsTTaKS9NIrD8ea/ishqDSHJOVejJIXEJ1CYc9Jqj/
A/KSd2Q=
          "]]},
        Annotation[#, "Charting`Private`Tag$29409#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0A9Qk3UYB/CXsQD5J0PGnCRNPRBvHpViBxjuJYGjA030uPWHbHEpCjbw
5l2BXKE2L+3EW8Wdq6vmlVKhFLYDE5JXsRkK5GjiYSQDBfkjGxtsAzYwnu/G
3Y773PM83+f5vasKS3fu4TEM897ij/4v/in27m2UtTkSDhhcf7Yuuiq5p1M2
UBEVX17/D1lSYzKSDa+/30Nm1hX0kwNSRx7AYtWA7GBa8MP0CjOZNfQNkdty
BgdRf8AbJx+71PQIecc4C9m/5dchsrn3gg3zIVsek3Uvr7djfvVxmC3KmMZ8
6oUR3Bfd6ySvyf93lMwJ3TO+fWPIS850oz/hzDjyquI9yG96c8LXP0/+vkRv
QR5vBcNSPaveinrJCT/2cqw6r1k/ifu7tDzyizFSG/pXXoY1b22BdeU3/eFX
bsOSdBsf86a1dtSHVwZgnjll9+UFkht06inUMxth26tamOHVBSEvJX0a3lwW
TBbEJjngs0UhqG8YhHV/pIciv+OwE/uTi8Kwv9sDs42qcOzrLnFhPkkDG1vL
YcUGYQTyDjXMIE9+Es4b3jyL/isrBLhv3U3YXFwHayIj5vA9zj3x+mSMG/uf
fzsS81t/gqvetcMNWas83u9/eBk8+husM4RE4R65fB7z7edgzcIdWHHkBpyX
/Z/XH78hxPf4cdcC3rfDA2s6xmBdz6Fo2HXwKdz5MyxQXoO5hkQRW3D6+qf6
LIajfY/a4H3OGthszllO/qv2Lszmv3BFlhZ8b5dK2iHDPfxO2XPq8RStyQRn
7L9HFk9yMLvedJ+snYjvI5uvhpvh6up+MndNNCw7fd3haeIPknXW2jFyZcbV
h+hPslrIBa3dMCeKnyS3lH0+DA/J7HBcyghZskfsgEe+GUN9at6J/NzecTIj
yp4lPyvte4L7Nu12k/tK9RPYr9XClV91oG7eVriA+covrXjfmVyGzR6o+Ohi
ziS5qnu3H1l52w5zsWoeudqosuGe3PP+7OL32ti7uh35uUK+r27HPbOSZzC/
UTiFfcXSAHKX9QSss+0MRL15yTTyz5cHkcOP5sPsxVFY+dl2B/r/vrsEdXmX
10vngsn1NXFOWBAXSk68Xw1zn1SGoX6nxoX3FLfAlv0crLh1KRx5htdmcG9g
/1Lcd6Dd5+8i4DVfz8Jn1wpwjzxtDnn8TDhRo4AlL7XAll+GvPWYbZGoP1a6
MZ8jXgazxz3ob66FlXWSeVgtjYJvfAEzrk3wdtXvyOOMHNylFy/gvUfzhHjf
PhUsCZNEwx8WPMX+b09Fsz+UpTUFhTIs1VMjRWSRphTmHAnwB4VHYJ38ltdG
nh/ZbH9nOfoDd/ix/wOxsXlK
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVk3k81Pkfx7+5bzHM15WyuZdy5EjW+yMrbUWF6JBrW9O6wiirTX4RxrV0
2SWM1IrBNIRIjoxFGcJQIiKRo7E5ZhBjtt8fr8fz8fzv+c9Ly/+C6y9CGIaF
fNv/+TcjpiBT9n92XgvSYTVGRqD25cqzaPJZ2Kf7Qtx7Iwd2htok7iWHQEqW
egBR+T5sM1PHzxAvAamjMMzK5yHoG6sGqZJjgFUvNavOp4Ha7dT3c6Q4CB0W
8Vs0ogP1RorkYWIi7L26cvBoEgNoaZSzkuR0sKg9L+ZKfAwq/zAdqjIzQVab
WbdkVwVDDszBCdJNQBwnbppnNfjatwg5ELMg1K2mPtXvCQTZNntsIeeBUmWj
Vz1WD7vqm+ZMDlFB5TSb0TlQD6u5PoiRWQB4vAGh+sEzqFf3GXhPKoQilzQr
SbNGsFf1FtgRi4BQfNydltIMR5S83PgR5XA/J5F7TZ0JdPbwtjvedAjyMJC4
SWKC/K0z00aHHsHEh56e2EomzFDK7eiZDDicEFCo69gKZeLl7BFSJQR5UYT6
vP8BU9Eyvi2xBlxvHejfHtQOthjt+HpEA9DnQvnJ8p1gJvGZ+WixAQ7pRFNc
DnWC/tZdluciGkF6x1TMX9c7gbCjUq0rvAkCS53zOlY6gbt9JPxobTNcjvLh
Tg2ygAWTNlpPWkCO5Dm0h9IN0bFcVmtVGxhGxpKl+nsgMp4oRl1uA9P0iIm3
cz0QmmQF0XvaoXz4tEWycC+cy4iuMK5qB/8yzo1ks144RuXfyXrcAU5ZzEXN
jF7QbRL1OV/5Ep7rNV/EHPqgf1N5QZrRDTMhYc4//MWGxGs0Dm2uG3bbOL77
rZQN1iIw+5PeK3AKK7lb2MiGu5LnJ5LyX0HAmP/l5x/ZYCo1MnvtQA8Meq7r
mpn0w6rS7hH+nl4oUzD+IN7aD4mG7OdcBTackHXmFY4NwL0T6qmTna/huo7T
p9LlNzCs4Ol5Um0UsmVuKkblDoN5ydBaifAEnP9dY9Jg53v4VGUvINdMQZbG
RxG2wjgwhZ4Gx9XOgsNeylTg7Q9QICwRNfRwHp7W51dQVyeAu3LAq8lgAdr6
3j112jMJuzIUK8z1luA73n7nl79PgabGZa1uIS5QLxT/gBV+goy4I76yAzyo
kA7NdqubBqUUPfZ89yooWL9KbHo/A8eS8v14RV8h16u3JnluFgp0NLULijbg
Yn71Tz7inyE8T6J6PncTKvk1qZEqHIhJaGdUWGPIc8OG/UlxHlgy8loNllvQ
I4mS0nua/wLvD23q8E4hlGfMqquW+gI0PzurTm1hNGhg4iGS8QU076VbymqJ
oCYXTMCUX/j2M5qDv4woesa1CFVIWoCDAaxAirQY+lGjSa1FfBE25+qpz9fE
kKVadMKV2EWIHB3b5zwhjkoaH1rcX/7mWlKLJWMSaB4nxZeQl+Coz5Ya1S5J
VGjl1OkyuwTVnI1bp7uk0Iq+d5550DIMTxu/5XRIo7eGV+ZtZ5fh3aiR0e3H
MoiaSE7x8OMCScckW7pSFqlO2/ednOBCd8AWpSyqHHIjPTahn+UBV0mCF0GR
Rx4j2G36ax6wkyWjM/dvRe7j3jp+Z1YgW4zHD6vdiuIDeeaMwRV4UPpR3sZa
AZ3QsPji778K21yeFqc9UkDTbHf/zx9XgVdkeJGirYgiB3NUlwLWQEk/rzv4
viKy4pYsU3hrUFDEow+pElCCsxMyif0K4c6uGqY5BLT6okgxirgOhbSDDSYq
SujUufaHafR1sBfVnaxLV0KtCac2ObABOhTRnO9llRE/d6ixY3wDLkmwBnSv
KyPHnotKEMMHfTB27FxVRoup5ULaapuwPT/T/mQUEdHjR9cnXmxC/Neh1lAO
EZXQow5nkwXwG1lP7uq/ROTrLkTOvSSA4M9kz/QFImJGvSYURAvAY1RmtpRL
RIw/v28pjhWAfoud/AyfiNpy7d80pQqgO7nw1M9yOJJrtFQQfSAANdXAec/d
OBKn5dpw+gUgf7PGimSKo4Euu0XBGwGISAtfu2SOo07WmAFhWACcjbuEO1Y4
avtVSG3fuACax7qs+wBHoq39wjc4Avil2DT+yDEcBa8G/2kojKHTWldZZ1xx
xEg9i9WKYMgl56VykDuOtJ9sLXUUw5B12s/FySdxFBFv2uYniSGpsDtdbb44
OrUQR8yTx5Bgepz42h9HQqPlmUYKGFr22+U7ee5b3/4452eKGBpxa18U/hVH
x0VyM94pY6iPRbAlBOFosFtdOQTHUJujb8J3ITjy4NSN8FUwVN9Y1m16AUfb
Gm7N/KGGIYbVGm4fjqNJWpv1Dg0M/QcrNTRx
          "]]},
        Annotation[#, "Charting`Private`Tag$29557#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk81PkfgL+5j5Brvq6Uzb2UoyJZn4+stBXddMi1rWlTwlRWW/lFNMLS
ZZdcqRUj0xCiifdkLGqGMJSISMrR2BwzKGO23x/P63k9/z0mISd3/yJDEMSJ
b/zff7PO56er/c/Nf1I1osrGBgw+n3sSQzuMNpo/UwxYyIJV4S6JG2gn0JUM
w1CK7h1Y7mBIHqKcQdTmgginwHtgaasfpk87j/hslTFDCQMMbiS/HafGofBe
ueApGybkXb2ivI2SiDZcmN2y4zILGCn0w8q0VLSu+qjCbspD0PuH61GRno7U
TLk1024V0OPB7R6iXkNY6CVK8auEIPd6GQ9KBgrfU8VODn4EYa4c3yW0HKRT
XufPJtiwmg3jdlvzkN5BAYvXxYa57EDMSs9HZLyVduXdJ8A2DOx6Sy1AhT4p
TsoOdeCuHyB1oxQi7aJdexlXOLBdx3+PJKoU3clKFF005AJT0Lv8ZgAThfla
KV2jckHj+qERm60P0NC7trbYci6M0kvdmOkstC0htMDcswHuK5YK+qjlKMyf
LtMR8A/Yy9+XuFKq0O7rmztXhDWBK8HY9TWqFjHHwyVJGjxwUPrEfTBVi7aa
xdB9tvLActnq9Uei6pDqyg/n/7rEA+2V5QYtkYCOlXjnNM/yQLSiL3JHNQed
jQ4UfejmAx8Nu5g8qkfqVL+etfRWiIkV8RsqGpH1qViaSmcbnIqnKOTNNCL7
1Kih1+NtEH7ZCcWsbUKlvQfXJcm2w5G0mDLbiiYUcl94NcmhHXbmSW5mPGxG
XhncKeO0djAH+cCj5c/RUwvOacKjAzoXdSdVWa1o9ESE9w9/CSDxIkPIGG9F
a1w83/xWIgBnOTT2k8UL5BVRfKugTgC3lI8OXc59gUIHQs4+fS8Ae5W+sYub
21C331dzB7tOmNNZ0ydZ247ua9q+U2zohERrwVORpgDtU/MWFwx0we19hsnD
vJfokpnXx5KZV9Cr6ee336AfZS69phWd3QuOxT3zxbJD6OjvRsNWq97Cxwp3
Ka3qA8owei8n0BwErszj43HVY8hjA/3DsRvvIF9WKbrn3gR6zM4ty5sbAtHs
Zn+wmkSNHW8ee60dhtVpWmWOFtPoO/Em7+e/fwBjo7MmrTIilHey6Aei4COk
xW0PUusSozLV8Mw9NSOgc8VCMNE6hzSdXyTC21HYeTk3WFz4BWX7t1cljY9B
vpmxaX7hAjqdW/lToOIniMxRqpzIXkTlkqrkU3pCOJ/QxCpzJrDfgovgo9YE
8JdqmNSuX4IfKBWX3Db+F8R/mOb1rpLBObb8mkqVz8AIdnPimcribis7X7m0
z2B8O3W9mokcBh9CytWYhPBehkfIUnn8RLQuXPPyJGwJ5R+jqyrgH43AoF5x
ChbH2XlP5xXweoOYhHOxU3Cqf2Cj95AiLq67t+7OzLc2UZkqHlDCEyQ1vpg2
DTsCl1TptyjjAicvns/YNFQKF64fbFHBs5YBOY5hM9A7Yvta2KyKX1ufm3Ad
m4E3/TY2Nx4uxXmJtCu+wSKgmtllqparYf0R9479QyJoDV2ik5GnjvdQH9ox
D4tBpKMkjqJrYN8+4gbzpRgEScox6ZuW4b2DAWbBh2YhU0EsiahehuOPiR1Z
3bNwt+S9houzJt5ntO5zSMgcLPd5XJTyQBOPCPaGfHo/B+JC69N0Uy18qjtL
fzp0HnQsc1qP39HCTqLiGbp4HvILxcwefW2c4O2F7WK/QKT3biP7LG0896xQ
K5ryFQoYW2rt9HTwgSNN91KYX8Fd3ny4JlUHNyQcWBSiBTCjy2d9r6aLJdk9
dc2DC3BGid9lfkkXe7ad1kHnJWCJbD15c7p4KrlUxtRgEVbkprvvj6ZgZnz/
16FnixD/pachXEjBxczobZk0KfxGs1C/8C8FB+2VoWWfkcLxTzS/1EkK5ka/
1M6PkYJv/9KxEhEFs/78vr4oVgqW9W4aoxIKbsx2fwXJUmhNKjjwszqJ1evW
a8rflYKB/rEJvzUkVmRkuwg7paBxrcqJak/irha3KekrKcipyl4840hiHn/A
SrtXCsKFW9o3nUjc+KuMwcZBKXAGWpw7EInlGzplrwql8EuRffz2nSQ+Pnf8
T2tZgnPQ5AL/0G4Ss5IPE9VyBMcn67lu2F4Smz5aVuKpQHCcU34uStpP4qh4
+8ZgZYKjEnGzpTGIxAcm4yg5GgRHOjJIeRlCYpn+0nQbTYIzE7w6aPjIt79N
cd5PtAhO356mKdlfSbxLLjvtjS7B6eBru2qHkbi71VD3BElwGj2DEr47QWJf
YU2fRI/gsOvut9qfJPHy2uujfxgQHJbTPOkeSeJhRqPzSiOC8x9cfWrx
          "]]},
        Annotation[#, "Charting`Private`Tag$29557#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0g1MlHUcB/CHF3m54zwOzkO03IMZAZpoWeuwdU9RpzlmgG0tkQ0oQZBC
rXQYM9C8DPAtraDJvE2FjREb0I6XdDwrK0TRBIndXYM7Oc/j5Xi/N+6F+H2v
29jts+/v/3u5EZdXkrk/kGGYj5f/6Hv5w/3So1E07zC2Lrb0dS87Z/Bpr2Lo
2iG544NBMvdzYT9Z+6B9CF7D65G/1KOH37AYyZ250mG4b7sJbpCPkNkflyyK
yYyOe1VpRrIheJuV3KQufIx5AzenyWlhz46Sy9u5OeTf2E3IG3MWyJtEGWaY
KbGRI+ojnmKeZt5Brt5YYMH7cyYXfFw2hvo/fG5y8eZD49in0+NB/19DJ/D+
4cUlzPcWTJKZw00MR/1VKVYyz24JIN8bN8Hq2+pA5NnD0/77vgri7An7zJrM
GdR/XRZMzhe7YSZcsOL/fBb7VctDyMpK8Rz8V2Io8vQs2CCMDkM+1gDzqgbY
XDcCs2KhAHmkdh553TQc4kxdwLypCSHymj6/L56IQP5orQ37O1tEZNUzejjn
3bqV2Dc+1Y59ml8Vk+O5yzC7551Icn1MgwO/l0QDm//Z4ET+RaAEjjsBc7WN
sLLitAv3nFoXhf5WL5xz8Cf4zwMVi9hH8gQ2d/8L87rKaNTntrmR3wqQYn6X
3IP+R0phZVcvzJ7iYZUk3ot7IwtX4d6kJB/6HfXB5u+SltCvKkuGessdmE2u
k3FfSjfvSZUyPOUCZQw51X7e7wviLkVmxzpR7qe/K2h/z+q75Befs/WSuari
AUXivvPxzNlHZP5Mv46sLJvSkcs7DxrJ+deLR8iG5ufNCmnzjvmHPoPC/3uM
kT9L1hvx3tdqJb+sOTmK+uqEGXL0yLCJzHTpZpHX6M3of3jtAnmA77Egn5HZ
Ye9H4+gf+9hBbnOJJuHRGy70O3YTZsIr3fCa96xwSYUX9e+nT6E+q8WH/d6c
hllxFcMJhq59aJfNIA8vDSBrg/JhdUpFILl2/QTM3I8NIpcm7prF+53pwajP
88Gc860VZNf6vXO4p+j1EHLsJ4MwdzIvFHnj7nnMU3X4ff8ozG4NC0e/LasX
MM9hg0vrv4XZO08EZHmxw5+/fVyI/Yq227BvQVsE5rU8gMuF10W4L0Vix7wX
1CvJnf3ZsDrunBjv27thpiY7Ev0vJTjgmDOwa2onbNBukiAvM8Dluxph7Stp
TvS7zUah3/e/wVxtEaz9PMqF/VOiopEn3/W76CwsF25bxHt7iBT72U8v+v8/
a2AXm+xGbvXA8iutMH/kwCr0v8V50C9DB8tfM8P81b0y3H+syYt9y/6GY3/Y
6sM9G/fHoP+VCz7Ff0SvgMo=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVy3k81AkfwPFflGPkbAw/bTke5ahVqXYfwvdbIXelELkaT44c2bSRlZzT
sEOKTVvrqLRbkZytNGXMOiIlO2ZQ2ygR41rnGGe7zx+f1/uvjy79tOtJKYIg
wv/t/8rW83usBYlWQ0GhW5wbt0El5YD6Q29/aDEqODIXng+yHs+C07wjIatS
Z5KecheqDLts2ekxsNdh5G6C1wPYcSHmarR3Asg7MKd9IkpBLjB11ZWoFBBp
zeoqSpeD0OVq5IN0JuxZF7hGcLsCbFXcf4vwzgIG5e1ao9RqqEj5y3cx6CpY
JY0cjOc9hg3zdBozKge8uBEDbOUamPl4OvVW+nUA75rhleO10NHTsOOUdyFE
r7d8WhX5HGSozIzt9FvwjKMueeZfBxYujiJx0G1gKx1qGNbnwD1uR2FyVBE4
BqioVq6uh/hioXJe+j14+q0oVPouF65ZLYmDvMuAPX4SmMxGKH/3Xt+xtwyu
nej8aZOwEdpi6lxN6OXguyQljjVtAqnKpNKZoApwMrf2Z3Q1QbiBfGBiVBXM
GMxUR1NfgLUKjX8jvQY2fCfYsIfeCvMTuT2B3hxQNwjkeca+htX7Te973uGA
s6Gg15/9GpR+aotxGuZAp/Y1w/fLr0HfbJWmaUw9cMKN/953sR1cEk+5L2dz
wWOw9ICi1Ru4rWrJy37ZAMKRaHLr9g5wMO1r45i3wIpzwZb3E3/C0ZS4XyoT
W+Dn8PGlywo88BPQwn590QJ3MhV8N27mwdlYRwWWeyuc3X3c4I0XD/K5VfYe
Z17CRkpjQC6XB1Oul5rG7r8CsZ3b7U2sTnhlRvPPWNsBg+udqd9SBPDWs1xS
8nUHCEftW9jaAhg673SlzaUDXM9pWJrsFsDq2iSuwpUOcGu0cuD7CcDC/G/9
dPU/YbbLXNu8SgAl5i9EjI08UMw+WMTy7ALWntiohO18GKsrPH89txscLIWM
qKM9MFr5cKeT6C0otWyj0Z98AEdPv603FoRwoJg5naczALfai1czvvsI1yMK
hwssRDAyPGmZR36CJyGHwqrLxsA6I7osntsPfzBKaYTcJFCid9ta2H2GXfbU
FDm1aUg9uCTRKhyETIOmx1p2s8Cst/3iKC2CqHMe4svH5uAbKf92EQ7DQzKX
X+A7D+yikvgN4SPwplsv9knWIvTkqnKU7o1CvFzmlm/ylgFHvkrUaxwD6lGb
22z+FyhxOCN6NTkORKzbX+OrVqEkJCP4pdwEWEhJxrbLSKEo2eemJmsCwq5j
X7SONKo/j1N5qjEJfZ8l3hMGq/HCyHlKQ+4kOO33qA23WYPKPmEiF50p+NjC
CqrxkUG/xif08KIpeCpnenNXgCzenZRZ+HrjNKS7XSivjpfDA3VugU2F05Dv
9V+X4EvyuDak7lQOOQPv01rNh9IpaCTs5+pcngGVZilKeJECGqmZT3UpzkIa
+4Hff4rXYvG2oUMJybMgrpPkCpsV0YBhVJwhJYbMsQ06Qb1KyPj5VvZyvBhC
eRUmuv3KyNyxNW1qSgz5n8TKkRdV8FWPfUhd5BzcN2tzDJZWxYszLH/65zlo
0c/Y1pyiioPaSFXwkkA/7VaKoaoayrv3qmp2S0B3YPQXvRw1bJWu33fCZR6O
1f64WVtvHX6vFKeQ3j4PFaH0qKpf1+HvIQODO+0XQK9CP7jMkIp9ecFxv9Uv
AOuL2evSaiq+8Krs5NssAml0ac7GTB25Z5QP93AXodDT4GpvszpyLoSf93da
Agvtys7eIzQ8pz+Qy+UvwSLn3NsYAQ19LvlkOh1bhqqQjMPU/2kg2ekR2zC0
DFnj7360G9JAa/6ces2ZFUiUo0V8CtHEPR77C0yWVyDM6E59glgT9RgC7cjc
LxC7Obj78XkSeUGSmTZ1At17+mqJOBL5lPGnX2kQuJPlk+cQTyKRc7gsTJPA
0UlXujCJxBs+tbqK6wn0eWY5uoZF4sLpC0aHdAjEo+sIt3wSey9afxAaEyiT
9NxgmktijhUtTRsJ7NtlRrFsJHFoydbo+70E1g1WjjKaSYwwYM+37iMwxvl+
uVYbidrsji3RNgSKNHP27OOTmBBv1dXhQGDbo5CDVwb//e+P+mW5EXiP3r/j
nYhEn9JEZZE7ganqftRNoyR+buqe2HuMQKsfjvbUTJBY72diP+NFYJktBHyY
J/GTld6R4/4Esuaf2Bgvkeibeya7+gSBISW7DM+ukPiwzE5GJYBAPTXjMVlp
LeTMDSU3niRwpaGo/fAaLZx41J+pE0Tg22jtipuyWvjJsqXth2ACHxvfyBmQ
18JQ5iPLrhACs99To7et1cLB5LKPpqEE/gPyNTCX
          "]]},
        Annotation[#, "Charting`Private`Tag$29705#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVy3k81PkfwPFvSIxbM8NXW+SnUG1Ktftzfj4VylnJEZlo/HLkyNI2siVy
JDt0sGlrHZV2k5KzdUy9v2YdkZJlxtEa5YhxrXMcod3fH6/H86/XRvYZ51NS
BEGE/Nv/XVMt6LQSxloO+Qdtdaw1ghLaAcZTLx/UYJh9dC4kC9a4vwi46hWG
rpfoTLLjH0KpQbsNLzkS7bUbeRjj+Rh2Xoy8yfGKQfJ2SdOs0AKQ80tYdSMi
Hom1ZjcqSReByOlm2OPkJGS21m+18H4x2Ki6/RbqdR0l0roUDRPKoDj+rxOf
/W8iy8sjh6Jbn8P6BTYzKSIdefJDB3gq5TDz8UzCveTbCHmVD68cr4SWzpqd
p71yEGedRVVp2EuQpSel7GDfQy8oxvwLHwBzJ3uxxP8+4ikfrhnWo+ARvyUn
LiIX2fuqqpXIVEN0vkglM/kRqvpWHCT9kA+3LJck/l6FiDd+CiUl1ULR+249
+55CdOtk20+bRLXQFAnO29lF6MSSlCTKuA6kSi4XzPgXIwdTK5/E9joI0Zf3
i40oRTP6M2Uc+iuwUmUK7iSXo/XfCdebsRthYSKj08+LQgx9v1aPqLcgs984
z+MBhRwNhD0+vLeg/FNTpMMwhdq0bxl0L78FPZNVmsaR1YgK2fL3vkvN4BR7
2m05jY/cBwsOKFm+g/tqFq1pr2uQaIRDbtvRAnbGvU2UaQNaccze2j3xJ7jE
X/ilJLYB/RwyvnRNoRW8hczgX181oAepCic2bG6Fs1H2Cly3RnR2z3H9d56t
kMUvtXUPf4020Gp9M/itMOV8pW4s7w2SHHS9v4nbBm9MmD4pii1ocJ0j/Vua
ELo8iuaffN2CRKO2DTxtIQydd7jR5NSCnM9pWGzfIwSZyst8hRstyLXW0k7g
LQRz07/1khl/otl2U23TUiE8MX0lTtzQipTSDuVyPdqBaxYVEbNDgMYg5/zt
jA6wsxAlRrh0otGSp7scxF2g3GDEZFd8QPYe3tvuLIrgQH7SdKbOALrXnC+T
+N1HuB2aM5xtLkYjw5MWmWQfVAQeDi4rHENWKZzCaH4//JFYwCTkJhGNs8fG
/OAn2G1Lj5dTn0YJh5bmtXIGIVW/7rnWwVmUVG3zxV5aDBHn3CXXjs2hb6R8
msV4GJ6SGYLsEwuIl/sken3ICLzr0I2quP4ZdWaoUcqPRiFaLnXrN5nLCI98
FatbOwZ0F+v7PMEX9MQuXPxmchyIKNe/xletwvOBKQGv5SbAXGp+bIesFBbH
se5qcicg+Dbu5ehIY8bLC6pVGpPQ+2nea0JfBl8cOU+ryZgEh/3ulSHWq7EK
K1jspDMFHxu4/uUsWexdW8EOyZ2CKjnju7t91+CHk7KLX2+YhmTXi0Vl0XL4
ALj61eVMQ5bnf50CrshjxUA4nU7OQPfVRtOhZBo2FPXzda7NgGq9FC0kVwEb
qptOtSvNwlXeY+//5CvifKOhwzFxsyCB+QxRvRLWTzTMT5GSQOrYeh3/HmWc
+PO9tOVoCQS1Fm/f2K+Ck3Zuuzo1JYGsPolK2CVV/KbTNhDC5iDPpMk+QFoN
X5rh+rA/zUGDXopRfbwaHtTGdAXPeehn3os3UFPH8m49apod87BxYPQX3XR1
3Chdve+k0wIcq/xxs7buWvy98gWF5OYFKA5iR5T+uhb/HjgwuMt2EXSL9QIK
Dei4NzPgwm/Vi8D9YvK2oIyOX3mWtAmsPwNpeGXO2oSB+eEqRzr5nyHHQ/9m
Tz0DUxdDzvs4LIG5dklbz1EmPqc3kMEXLMFn6lxXpJCJWVdYqQ7HlqE0MOUI
/X8amGxzj6oZWobr4+9/PDikga0Ec4zy8BWIlWOG9gVqYjP3/dnbl1cg2PBB
dYxEE+smCrXDMr5A1OaAjufnSdzqPz/TxCAot87eSuICiQW08aqvNAhqF5eV
aRdNYiL9SGGwJkGNTjqzRZdJfIdVuVFpHUGxXliMruaSePHMRcPDOgSFXdYS
rlkk7rlk9UG0haBkL7/Un+aTON2SeVUbE1TvbhOaRS2Jh5ZsDL/fS1AwWDKa
WE/iUH3eQuM+gop0zCvSaiKxNq9lK8eaoMSa6Wb7BCSOibZsb7EjqKZngYdu
DP775416X3clqEfs/p3vxSRmFcSqiN0IKoHhTd80SuJPdR0Te48RlOUPLp3l
EySu9t5uO+NJUIU2yPfDAon7LHWPHvchKO5ChfWWJRKfyAhPKztJUIFPdhuc
XSHx08KDsqq+BKWrvmVsjbQWpuaG4mpPEdRKTW7zkdVaeOJZf6qOP0F1cbSL
767Rwn0WDU0/BBDU8y130gfktXBQ0jOL9kCCSuumc4wUtfBgXOFH4yCC+gcj
jGcX
          "]]},
        Annotation[#, "Charting`Private`Tag$29705#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0n1MU1cYBvALslIKMmgrUjdNt+ikNlsq0cRUsHcIXf9YbWBGNoNbQZhT
EcZM+OiiYc02RjbZ8APERGzmZmaMqCPTaAsUpWFDYOuMgzWIrdQCtnSlthT6
Oc5zbdI0vzzPee97T/paWXVRRTxFUeXLX/K7/BFW1t+RjV28frghbqhv2boZ
xajMVTheUap6SGwcHh4nLnDXWYjpke1WWdc7pe3mqT5iYeeHNpKbJiOP0RdJ
HbKFLNePpgEb5l256iIuO22YQn9vuYf4yWnxU+LG9e1euG2Pg1gtuu+TKWya
TfZAm4zkgyI/zi9+M408nLkI37z9DPNPSoPEeaFWJ7E1dDkM793kwvxbdIxY
m/3KHPZ/rIJf90wgVxdtjKM/59e2atge9BMK4okLO07AxhNfryBO/0U0j7z3
QgLyrf2w1Zr8EvLdci/6EgELeYMebuxUJhKby1c+x/tnnmGjn78PVrstScSb
pX7YyvVycJ434MO889XJcI7Qj/1TtCnENecssHro15U4/4diAXlwLpV4vtvA
WL0hDf3dvwWwz9pt8LzSBOvefQgXqhWLyAcPpqNf3gkLdUlczLc7mHz2Elx4
c88SfCiHh/c70o55Qv0BuEb8QRC5nM+Hp9ghuOUn2NyvgdXRnatw//ER2Bhu
gs1n14WJqWwHXNOtZCxuysA+mg5Yx0tbTXyjLsbkeX/Cre8nR3Gf4opM9I29
MN13DDab90eQy3cK4Gf/xLD/bYOAzuXoZw68ShnJvNlbfTJRiYrfVj9M/o/W
U00jMn7XRqnT9Df+n3f948R3Dvb/Syz0VVqIz2UYLMTGs3orcnb0Efq5nGkZ
Z4x3XvLAhnnrWU7iR8VHp4h1DYP/ER/b0WpHX/OzlzhSluWAWR547ZV6WDcg
9BP3dNZO43mSjgC8RTSDfml2EPO2Js7Cf3WHiXNH78J0T1EE8zZcc2KfL47G
0C/wuDDv0hJFExcnuPG8kuPx9FfO5l3ff+RBfrh5BXHLpxaYzulJgGNvzuM+
tk3Dbt4E0zdTLOK31FrkjW/kJRKntnC9yPfdZ6PPKXqOeVdnkzBvzTBMBfwc
nB8ZR996SJxM3BVV+dDXlqXAD36Hhay41BfP92P/WNrL2F/5wwLmLQnTkNuj
sNEmgqvkm5nzWb2MffUB9C+eTMfz13UvwlE+F+fXbF/C+ZQbcJXuDExVv83D
Pk8nYF3xENxS8F7wxf3CVZVfwrrjej7xaEgegncUr8L5I2a4UTXJ+OPPYEqZ
n4H+lu/C8KQWdjcbYHX/J6txv5evR3Bfpjm4SlESxbyu2kzkT/yM7V7G+7+N
4f2lXAH6Y9dgNfeegL7nz6+TSCj6fw0ph3I=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVknk81AkfgMfwG173EXK8MzmW1Zt9h7eQtN8v2pR45Xgj6hVCkdtWRJGE
UMJoKCq8rlnXOjIsylhacoXM5Cw5K7ljXdv7x/N5/nz+eVRc/WzcySQSyecb
/7f22z19rRHRP76uuM3XobUfqtI0Hqey3aBG+aboF6scCJpLy7zIDoKwaOF9
761YkHA/46NQWjiYjq6yGtllYKPYpWzHjoIHyySu2ckKGPnYzcnJj4VJho6R
MLMKvOtfey0xEmHQxSOJl/8MTOjeZ46zU0A+LiB7j3UdCCl8+mcAPQ2OlfS5
Jq3/Bp18Pvzp+Uy4G33tokh8Azj1+hZNMzKBGSn74UvtczA8dHDTlJ0Djy3K
e1RtOJBZuj4xsJwLvb+lFkTPcoCkXtvlTc8DrfTUwojrzdAieignJb8AfI62
/i8v43ewHTEyH2cUQ2M5c+IEqxWqcY+FMbsCvjN/Rbl8qh2mQ0nGIvaVECz2
Z6Mupx0UqsYO9C9Xwlgu9WerH15BmNZT2kV6NcS9fJk2v/MKTKRVl5Lya8Az
vU76dnIndI2rZYwx6uGIjtTz4cZuCObILAObA8d9T6U2ne6Fq2M9ba3izTDl
OnvkWVQvhG3de2p1vhn23p3ksyvuhWh9UStnid9h7UmFzt2dXkhjCRRdd28B
Den+F0ZP+qAmZcW5XuoPKEsIU+Pv64dNt4F2Q69OmPff53dLnAukSEZ2U2Mn
WP9k63mVzgWBLNsQc9kuKGn9rP+jDRfEuF0ajs+74GLHIScTBhckND48N4rv
BuFZKXdU4MGejCGlM+96QOFrApGj8BZMbnb0ZCT2QWaRJo+zMwibxZqH46r6
IChS8Zqm0hBU8yILrgz3QZNlc2iA3hBo6ejdsNPuh/Gz07XsS0MgOZa1T7yj
H2gDO0Jq3CEYPuwfEyk6APs96SopRcNwdV368IV4HtTdvOUZBaNQ6u9QcCBu
BCbNNwImFN5BU1BhhL3WB9i29JlpLR+HD8WUReOrM+BY4jJ+mz4Ja3dbXcMu
zYGh8y3yyL+nwVV/v0XgxAIM30tWkPSbBde4J4LU2GUQoRtJyLp9gsGShqaA
rVUwYcsyN5TnoKzX4txQ/jpcWotuNJj8AtvtCVtz6psQx31Am22cB4+8C4dC
GNsg4+sl/SZyAWTxrXZiJgnpxvrFLMtFqJDj1Zfz+ND+Su9oPGUJdj5JNLrQ
+bGbnB++8McSOFSmJnVECGDE3LylW/Qy+LovuiTWEiiYZxDSTV8BXbnYXK64
IC6sJFokTK3Ar2Wrk1cshPDOvliPqHurMGaemZGd+zecKKm9oWD6FZTe3KfG
rQqjTowicXrhK8iccM7m6Ijibef5jLPJa8BuPP8gLkYM88W3ylNgHZSopgk5
LeKYsClx4/jYOtzx8bMO2ZHAdEHNJtXwP8FuZMbUp1ASX7SuMjkaG/AiVGi0
1UwK4yMkvu9o3gBCnqN7YUkKOw7mlUr6b0I3K9d38qE0nriV7h64ewtCqgKL
xA/KIOVkhsty1RasNwxlhY3LoOBYhk20yzbYH/5XSurNXdjsL5X9lLwDRpVl
fneosihcL/9LxdMdWNvbJtDSKovVDi76nzVJmCzXnc5yl8Pi4P4AwVAS8pMD
p95IyqPltJmjSh8JbVxJB34pk8db3N0vg7T48Pu6Ki9ny93o2HnGyfk6H/bL
CJ52+LobWRRK7+4hPjz37ojZBkMBVUTUI44eIGNTCXVu3FgRL49F7SIzyVgU
TAsvmlXE/7wzmbfeIGNAqaioUqwSOhXKlNo78qPELMO2R1cZcys0DI4182N8
ushDndfKqCn1HdVorwAmGhe0+fn+HUenHiY73xdAj5mxX5fkqfgDQ63NlCCQ
SqE8VKmm4pyq9hrzZwIvf/KdHq+hIs/sH9eYVwjsfD1wIK+Oirq6LAdmCIHX
Hxd2731BxazJSbX0cAKHDSwp+19R0ZhlTXocTeAj79SAo++pSEryWa9jEKjY
o3rMW5yGqjEmekbVBAY+i2doS9HQwHnRzayGwLbM5fdfZGgY90Js0ebbd6Fe
LeHBCjRs/3yC7t1AII/fqyJcnYaUZUvDJy0EMvXKqUmGNJwsFi1THiBwXlnx
ks1hGqIdZ0ObR+Ax/ij2LqRh/SUKCwYJXOuys0v/iYZZntv7z48SaH9xLS77
JA1PMWw3y6cILLFyGThvS0N7sohXywyBFL02dc1TNDxL+mg0+JHAavKjRpYT
Dc2oK9KUeQLFZwTEfP9LQ6eWGDnlRQI9unwc6S40lJLcFaG7TGBD1Zv8RTca
tiV1Wh1fJVDuEaxUenzrb3+MPrdG4F9ibirF
          "]]},
        Annotation[#, "Charting`Private`Tag$29853#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzXk81PkfwPExfIdf5MztNxNaVr/sb/ghlfbzQZsSPzk2Rf2EqNyqrRRF
TAilGA2lA+uada2oYfX+ZCwtuULIWXKX5Ip17f7+eD2ef740PQIdvOg0Gs3/
7/6v/tvN7XXhnO9fl14XadQzgrIUnYfJAk/0TOOa1Ge7TDg7lZJ+WnAWhXI2
bHtvx4f422mTEilhyHJggQ+CYnBQa9ZwEkSiu3O0LquDpdA/2SLMzIlBI1wD
sw28MvCteu0zy01APe7eid05T8GC7Xt0vyAJKccGZ2y2rwQJ1Y//DmanoH2F
7R6JS79Bk4i/aGoOD93kXD4tGfccXNsC8se46YgXofjhcwWBnbt2rFgKMtFD
m5JWLQchpBctDXfOZaG235JzORNCoG2paPZlZyO91OS88Cs1UCu1KzMpJxf5
7637OTvtd3DsN7Me4hYgKOENH+DXQTnebGMuKEXfWL9inD/UAGOXaOaSzk/Q
uY1/gqGwAVTLBo075p6gwSzmT3bfvYJQvces0+xyFPvyZcr0+iuwkNeaTcx5
hk6mVspfv9MEzUPaaYPcKrTHQI70QQucEyrMIYEQ7Q84lFx9pA0uDrbW10nX
oFGPiT1PI9sgdPXWY7sTNWjrzRERp4I24GyXsnOT+R0tPio1uLneBil8sfwr
XrVIR77jhdmjdniWNO9WJfcHKo4P1RZt74AVz86GnT5NaDpoW2CUdBfQIrgZ
1dCE7H9wPHmR3QViDxxDrBWbUWHdp+3fO3TBxq5mHRfSjE437nK14HaBjM4H
YhbXgjZMyHlh1W7YnNarfvRdK1L9Gk9lqr4Fi2uNrWkJ7Sg9X7dbuN4DKwW6
u2PL2tHZCLXLuuq9UN4dkXuhrx1V29ZcCjbpBT0Dk6tO+h1o6NhYhcCvF2QH
H2yTbuxArM51Ce2uXujbHRQdIdWJjE6yNZPy++DikvzuU3HdqPJa1MlINABF
QYdzjWP70Yj1cvCw6juoPpsX7qz3Aa3Z+o/XlQzBhwLGjPnFceRS6D50nT0C
izfrPEL9ptBOtyh6/3/HwGO7kc2Z4S+o79YdVdnACfCIfSTOjJlDkmwzGUXP
j9BT+Lw6eHUBWQgUecsaU1DcZnO8N2cJ+S1ywHTkM6w1xK9ObVlBsV13WRMw
Dd7Zp3aFcNeQQoCP/JuIL6CI3+onpNMw23x7Ad92BkqVuqtKukWw84W2gTjG
LKx/lAF3tihuoeeEffljFg4/SU5sDBfD4VPTtp6cOQjwmnFPqKCweLZpSAt7
HgyVYrK6pMXxl/kEm/jRefi1eGHkgo0EvrEtxjvy1gIMWqenZWT9Aw8XVlxV
tfwK6m9uM2MXNmCDaDXqyJevoHDALUNoIIWvu02nHbuzCAI4cTc2eiPOkV4t
SUJLoM60jM+slcbxKzJX9w8uwQ3/QPuQdRmcKq5brRX2Jzj1j1v658niF3UL
PKHOMry4JDFQZyWH48Jlvm2sWQZKWWh4alYON+7ILpINWoEWflbAyD15fCAq
1euMyiqElJ3Jl96hgBkH09znylZh6Xnvg9AhBSw+mObAcV8D593/SUq+tgnX
BMllPKavg9mT4sAbTEW8oUr5l9LH67C4tV6stk4Rlx923/5Jl0buKLWk8r2U
cMG5jmDxSzQiSj8z+kZWGduOWblottOIgwfN+JdiZRzVpfLyrJ4I+bayzMfN
VgW7NB11dbsiQjoUxI8c/qqC+QxGm0qvCDn+bo/VMlcVa0puCd9rTCfVhcyp
IXM1fH4wchOdRyf551hh+RNq+Md3FtP2y3QSXCQlpR6jjl3zFIqcXUSJzATX
sdVQA2eV6pjuqxElcamS9wxea2BduW+YZlvFSIJ5bn1gwD/xwOi9O263xYj3
+OCvs8pM/B1Xu96SogiTwbinWc7EU1r6i7yfKHL+Y8DY0DMm7rb612XeBYo0
ve40zq5kYkND/mFeCEWuPMxr2fqCiR+MjGinhlGkz9SWYfSKic359rSHHIrc
900O3vueiWmJ/kuVXIqotWrt85VmYa1oCxOzcoqceRrH1ZdjYVO3GU+rZxSp
T597/1mBhWNfbJxxqKDIJZ/asHOqLNzw6QDb9zlFukV9SsO2sDBjznbno1qK
8ExKmIk7WXikQKpYo5Mi0xpqfg67WRg7CZf1uymyTzRSsAmzcJUfg496KLLY
7OSU+gMLPzi5ZnRigCLOpxdjMw6y8CGu40rJKEUK7dw7TziysDNd0qd2nCIM
k/otuodY+Bht0qxnkiLl9PvAd2VhK+a8PGOaItLjYhsD/sfCrrXRShozFPFu
9ndhu7OwnOymcMM5ijwve5Mz48nC9YlNdvsXKKJ0H80/8f77vzbJOb5Ikb8A
k7ZhRQ==
          "]]},
        Annotation[#, "Charting`Private`Tag$29853#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0g9Qk2UcB/Bng2nAcgPHGP9flFPSu6jMY2b1viaJqZhi3dmV7o1S1EqB
6uIgZB3X2XkZ6YkakryyuC7qAClP8sqN9M7OQqAlMwu2SRzKBo0hfyYba7/v
3N1u97nv78/zvHszCg8U7JIzxt4Mfek39LG8Mvkj35LnvL65y2YOmdtv6iVf
0u62k41Zo/28zVScXmS9TXaU3XWQzeWmQbI41PMv2eBYPgQrTCPIW34YJguP
Bj3oF98bwbytL3jJwZs7XHB50z3k3ZNusqUhyUduaD02hrw6e5Z3b+2o6lzq
wf49LEBWVV6CuX35TAi5Nf32OPLc7TKyedlJL3whW062X+MmyMygiyRXDWbe
Q177hILccP44bCw5PY+c/lLhJOzqnY/+0mGYJadFwea3psiScUk06i8PwsLE
ZzFkvr59+kG/Evusq2ewrz52ATz2FywcSVCh/usiH+bZn1WTDTtX3cfzqOyH
7Zc7YelgRSzqa7fNYp6LxZGD+U6Y1f0Km0WrH/ttBQtRn7o+gP/H6ofNM22B
8H3OaHD+gpw5PM9aTTz2ByWYWbtg/uTBIPpz92qFqax/XjysZRY6H+eB/ys1
wILYlEDutnTCYmKhjmy2RcnIUuMgrHpZD4sbP0kktz75ASzYVUmYt+IL2HH1
VNiy78NeUpJMzl71tBxmA2Gf+AZmexpTMH9DdQTy1zNSyTU3h2HpigM+cOhI
JFz0bhru03wHNsqT0rHv2OOK8LxFP/HrneWRmW/8zNN9e9l1/qviZ57740o3
2bju+C2+oCNtzcO/9JGl6HVOsmxb2S0+/P4PkT/qYAPIl+lc/COv1VhGR53I
vzR6yNw7V4f48H29ZEmfd4fM6ldMov43zwiZU8VMk4W7WW70r9zpQ65ywdKf
UXNkxkrGyKJJFuQ1LXnSiVgPziuvY0LIgrsNFs/2yckWrzTOh9/vCOS+z72o
51cqkFsuTjy47zyyJERMwe+XzCcbU/6GWZwmCv0D3mnM/31HNOo7T83g+Znf
jkF+TvDh/KdvKNH/fM59nL9duQD1R/thy0W9iuzYVTaL++uXqnEewzTMDtth
4+ZOP+Y5y2Mxv2ZtAM9zUXIc5p1rhbmPv4U5nXYO+1RPLYSV1bCYPwE71mwJ
ov7CUQ36lV5YGF8cL0TbFj+myWECna+iHe6p2Aez1cVasqfKAkub4hPI6hse
2Bhogres1ciQ63J1yBME2Kjvgz2G/bCjbncicsV3MPdhRhL2Z3Jy7C80w+rm
vbD00KvJsP8sLFaOwW2SJ1zvPpOCvOLTCNi6PBX7zvthsdkB93Q1RsLXStPQ
fygAc9t9sJrboBD+B0lKYxU=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV1Pk/1IkfwPFh+JAG42wb12dSrq/SN1Os8H7Pl1XCWtXqiy8VNWuzrvKt
KOGRUiLG1ayWDutWSOiblCO3GGZzl3HVRjVm6HDvfn94PZ7/wYvpG7z/uDSF
Qgn8u/97cnnFduBgnG3apheF7DFzUCibuDbLOQ45nbpJUQo5oLTDfLye819Q
CJMNqftQBDQHq2eyitEQ4RnLL48sA/qcZ2IR5xKcfCW3ZUmhAtRvn/NyrYuH
thivw7/tq4QEgy71RVoyFDb8OqJxoBq4go/j2Zx00FveH3pE9BjUTdYcQ9V4
MODkGjrHfQIZ0crldnWZACK/3imdp/BCkwfztNsgF750bXdUHfQ2PlL8lZML
LQLu58OKjaAmQrZ0bR541Rb8WZbTCAcZbWEBagXwtvCnX4p2Pof+kMFhm7oi
EPcbXFlwaYKPSisHxbQyoC2Z11461AKSGh39DE4l8EPWtVl/boeUnrEn7SpV
kNdgaJZwtAPM3+a6rz2pAiNr7R52RweEqW6L91d7BLOgE2uQ2Qlf/G3FVnWP
odlLvuaiYResxpeOimh10J1hVsq9xAdpS/69NE4ThEdcYJtuEMAH45J9vo1N
0BR4bz4LBTCgdeWtGdkMP4YROv/7WQD314DZMdgMD7qqbeYfC8CzpTRNyqUV
fk5I2fvQ4w+ocE86F2TeAdxKG+++qy/hgVX+5s3RfIhU7h7qqu2HAnONufj7
fAj5T1rh0dF+yDK9WC8e4UNrWaVWC2UAruge9nn2bQ+c7Q7pp9kNgI/0Bp7n
XA/oVG/TvtE0AOvbL6/ncgQQGzHNYjUOwjEPjmTFuQ82GeZw7X4fBsvZzGS3
s31w+5//VjjybBgU47q35eb0gcAj0sNvaBiqHloGOC/2we7gPdl69BGQp6+f
zMzvh1MCvaDTESNQ0lz60kJ6EPQmO6/07XsFc+YLj0Krh8GxwPb6/PBrYMs1
P5MkC+FrpbGjYFIIe4YYpizhFNApH1TfnJmARV0lXtHdGeALt6cfmpuC5qQT
F7xjZqEhk+arQP8TJvdmbacEzIFZkO+dNrNpsF0tq1y35zNMMtJ1kza/hzju
Nguh+CsImVZGm4QfIN/7nKVb3xI8feOWu7VEBFVyO3YlXV2FcqU7Frm/zwKl
/xg18wYFb8rEBJf6iyHZgVf8rZw06v3g4MC2kMCGXEov+FDRRKhtoDknAYXb
P1iq9cqgabEyT+/xHGhtVJFnAIEPp8Ym0sLnQT+GcI9LlcOj78R2W4w/Qcal
iYl6mXUY5KhLfTH5CSjhn0S+3gpYr7y/pon7GfrkRbt7etejod3NYhunL9Cu
6SE+yVZE+vt3aU/WvkCl2tfN524o4fMZp7fU/K9w2R2cjWTpGPgxMTfKawHu
MXS+c3hAxzi7a4FnqIswoVMhWfFSQVt7A9Xx/EVwFVmjtroqnsqbGLL1XIJd
lmOdH56p4luhOFpMWYYDruELWyLU0Kp4ZvQfVcsQlds29GW7Oqbm3+8U+6+A
4SnW0vlhdZS/fPZIFX0VZJRTa/zTNDD2uv11xdZV8N5Eq5Fja+JN0jO7PWwN
msJsgnFaE+O4t6PEyhT0S/dtHL2zAVO87R3fBVLw/Na77jtcvsHu01GCrmYK
dqS+vDpDbMS2hJlT5UZSmB6qv3zo4UZs3GqrUnFJCoOuG+v7+DCQZ/i9KHlc
CiPD9afbNbVQKumXKI6jNMqPWMxON2jhT0f0FrnF0thKw4zQSG18xbHLz/qG
ijfOU8Rclg4e6JPZVXyZiuN+w/HHR3Vwp6LSqvMsFf02Fj2/xdNFt3dV8cEc
GTzskGqT+J0e9ueEr5wdkMETD1gB6iI9LOBQVoydZfHHz8e0Yw6QGMaVlMd1
yaJ595O7boUk7k1knbFxIVA3LpPPLyJR67LMjihXAuXh7KprCYkyonSPejcC
X9839/y+lMTfmN0iB3cC468XqThVkjjyryO2hw4TOO7Ci7avJ3GiJzElIZTA
lM5TPhaDJPKmmClOGQRGxrolVA2RKPFnudzkEehvbfZ45wiJwvSX52YyCbQt
mdZgjZLYtT2PlXiLwOlrR19snyLxZEM1o6+AQLaTq7WJmESBc+t0ZA2BptSt
JwolJOaVJy/8UUugZo0Cz2iexMDz0VGmdQS+N2meM/hCYg777808J5CnYFOs
v0Lifnfr03ZdBF5sYAzeXSUxtrbCPptPYFDEV2IThYkXzEwTFnoJtJ+u8CWp
TFx8pBxX3k+g2V1u8i0ZJlJEEiulIQIZnsFPdQkmqga2+AeMECir6vI+S46J
b7Lb6G2vCZxtM2HorGOit8Yuc8MxAv8CUBIk9g==
          "]]},
        Annotation[#, "Charting`Private`Tag$30001#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV1Pk/1ekCwPFj+5LsW5P1eyjbVdwoRngel1HCGNXo4lqizpiMLW5ZEl5Z
SrZj64yGxNgVErqWngfZxeFM9rJnIh0H2ZeZ+8Pn9f4PPlR334vXuSkUivff
/d+bu3smw5djTdKU3xabTukiwYqZh8u06yCvRzEpXDAPiZzSnW6i/RcIBvL5
4aUSJGRhiPiEI0CIYxSzMqwCia06JpTQosHN9/zHdwSrkFROqJMtjgOdkU6u
v12oRvGqvVLbQsmguPnXcelLtYjO+jKdTUsHSrsX/d3YdUhK88DSX5IBhq1s
/VfpDSgjQrTSDGcCwPYYmFN4jd7KMMCaUA7gD955eDYco4GWV8K/0vJBO4u+
7ircgiTZ0JS7sQA4NRb9WZHXgi7LdgZ6SRaB+eKffik5/QYN+Y2MGeMSwBlS
vb9l04q+iOxd5ghVAKEd3cboK+1opV5BJYNWDZh+hzqN1rtQSv9UQ5d4DSho
VtOOv9qNdOfz7Q8aaoC6kXy/aXc3CpQ4Gecp+QosA4Uo1cwetOFpwjHEdaDN
SaD+nlov2o8rn2ALYdCXoV1Oj2YibgPmszRaKwgOuWuqdYSFljTKLri3tIJW
72drWZCFhuXuz2uTbeDHQELhfz+z0PMDQO0eaQMvemuN1+pYyLG9PI3LpgP8
HJ9y/qXDH6jKPinUR7cb0KuNnQcfvEMvDAuPHYtggjDRvtHexiFUpCu9Gvec
Cfz+k1Z8dWIIZWnda+KMM0FHRbVcO2UY3Vd0dUHf9oOgPr8hIbNh5MJ9hOG4
2g8Uak/KP2odRoe7Yg7TaSwQFbKgp9cygq450Fb2rAeBsloe3ez3MWSwnJls
FzQIcv75b0E3NIaEY/tO5ucNApZDmIPH6BiqeWngZb09CM76nstWEhtHAmKH
ZzMLh0AAS8nnVsg4Kmsrf6fPPQKUZnvuD154j1Z1t175144ByyKTxLWxD8iU
vw2tJE+CzWoNS9bsJDo3KqulNzkHxChLEh9vz6BtRRFGSe4iYE7qpF9ZnUNt
STfuOkcug+ZMIXdBsT/R7PksHYrXKtD2cX/aqb2ATPYrqg+dWwezsumKScc+
o1j6Sf1JziaYpBqqK08uoULnUAO7wR3w+qNd/okyNqrhP3Um6cE+qBR5qp//
+zKiDF3jyXxEgY95I33LPTko2YJR+i0/N1T6wcLCVH8FHcmnDAAXHqg5Ka8q
s7qCBHN+MJAc4IVapaIMpbpVJHdUXEAWEPDl3NRMWvAaUokk7GNT+eHVTxyz
4xpfUUb0zEwT7yHoY6nI83b2K6IEf2W7OwvCJtGL9a30dTQowD7bP3AYqpk9
LjW22kBdMg6cm6bCUOzzp7SGgw1ULbl5LPSRCHyzaDXPU7iJYuyBtTqfGPT+
kpAf7rSFnskqfGfxQgzGmj30vs2zjWYUqlb2nMShibmqxHThNrJlG0F5KQkY
UDAzauK4g84YTPUsIQk4P8mJ4FB20SXb4K3jIZLQsHRx4h81uyg8v3N0Q0cK
phY+7+F47iG1AL2dO2NSUCAmyK1GbB/xiqbWe6ZJw6hE80Thjn3krCxUz28q
Ax+TjtldgQeoNdDYFy7IwFh6TjhHlII90t1bJp4egSnO5pafvCn4zolc+1M2
38C+W+Gs3jYK7k5992CROAo74xcDKtW5cLq/yu6Vl0dhywkT8apoLuyTqKHi
4iILGWrfs5OnuXBYsMpCl4wc5Er6JZxmyY0FxvWXF5rl4E9uStv0Um7cIQQz
/MPk4XuaWWHWNzz40R0Kh66nAC8N8p4pjeHB0x5jcdcnFOBpYZF962Ue7HG0
5M0ThiK0+1QT50vjxa4WqcYJ3ynBobzgvaBhXnzjhZ6XFFsJFtEoexrWfPjH
9WvykZdIGEhfqYzt5cO6fQ25dsUkPJ+gd9vYhsCKsZlMZgkJ5WJ4T4XbElgA
BO3blpGQl53u0GRH4A/PdR2/Lyfhb9Q+toU9geMSS8Stqkk4/i83kyuuBJ62
YUSYN5Fwpj8hJd6fwCk9AS76IyRkzFFTrDIIHBZlF18zSsIVTz2bxwwCexpp
150eJ+Fk+rvQxUwCm5QtSOtNkLBXp0Av4QmBFx5efaszR8KbzbWyg0UENrWy
NdLkkJBl3bEQVk9gLZ4TN4pXSFhQmbz1RyOBZeoFGeprJPS+ExGuhQn8WbNt
VXWDhHmmf2/mDYEZgsalKnskvGhvdMusl8D3mmVHcvdJGNVYZZ7NJLBPyCah
TKHCu9pa8VsDBDZfqHIneahw+5VobOUQgbVz6clPeKmQwl4xFBklsKyj72tF
ggolvNs9vcYJzCdh8zmLnwo/ZneKdX4g8HKnpqzCISp0lj6jqzZF4L8AgVpb
dg==
          "]]},
        Annotation[#, "Charting`Private`Tag$30001#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0wtMU2cUB/BLH7wElFIoyOsCwjayGJTMSBnrHUNDtoiAG1EaRstYN5hj
KVuMZOK6sTANwl6yWKhL44whC5viSKdBXNmGREPR4SQLoOsgPGahipQW+oD1
/O+aNM0v53z/8333602peq/0TQHDMNX+L/36P6q7135SdOj1PRXjt37xWzf0
zKjCMjwcfNt5j8y+lDBB7tqUNk627m+dUWg0ml6J3EpWBY3MkUUH9v2DfrPS
Ti54tWOazEiky+RPo2Ln0C/72YF65f551PM6Xaj3PXiI+R65G/WeoEVYG+8j
n1+YtSNf/tWGIjs7e/Rg7mOs3/RcAOf3r4xgCR78XEBOlZtglUQoIudP1j4h
c492i8mf1O1aRn747UD49X0O9Ct3BCNvW+YK8t4tCyFPlUzCbMzDUFg96ETe
WwVhyBcaXKhvbgnHfEvlKtl4eiaCXFXBrCH/1s4t6P/NBVuvTfO+eMWN9eqm
SPQ3HfD8fz4J5nksMNeyAKfqi7zI1+ujsN/1MZi7KJWinlbng4u98LnTJ9cx
r6w7Gnl39m5gP/byGK5DH/fHSAhjpv7eYBl56ephmDnRC++4b+L9dU0snB4U
gP7O6DjylzcqYPMVC1zyTjesyqrdivqEG9a9nBkPz5cL4Jt/wiUfmGCm40QC
nLoOs0+/kEjWqguEyPcO8c4zwMaWziR+3rMi9B/MSUZd+wNs3OOEI69GiDFv
pJBFP/MxrCr9DNbapnlXBqXgeextD8Q8JTtA/zdXTdE9BZ33+f5ReOz8A7Lx
d9ZK749Hmz+lwH6PT5HjF45Ok5nrWTbyxJn3Z7H+ULOdnGuwzcGm5SXyh+N3
/0WeqcpB7mv4yIb1PcUurE/KW1TgeWZ60G8of6Tg79dL72fjcM5jsvnI9Q2y
z5GxhP2kJAdwfvenm2Hj7FkBuXGm+wlZNzUkJFfUvLKMfqlCDDdLHZgn/i6Q
fLawEzazWcHkxCbDCvIunwoh+9rbnMg7dicU9R/TXOg/kxuGvOK/eGfpw9Gf
2LRKtop6I8h5fcI1rH+R3UK+f3QQVuX+DTcKjrhR/7Y1EusLQz04f32OBPPa
L8Hm+nm43/uGF/WqL6KQ9/Yk77E9Usy73OBDftcK7Nudso569Klo5CnOway8
NAbnLzu0gfuoDpMhb5cT5ix9Mk6jmW27mc9wNL+rOpY8omyDufo1uGh+CDb2
D8SR65T+e6G877VbYYkWtjJJ8eTtGQOwufUGXLdNLED/jDqBbPflw2ZZRiLq
zRdga60N3v5akhDzFo8lYT/fHId16p3JqE/M8fXNbt66dBGZLSxmkTd4GDae
vAQXXVjl3eB/PyjvqUYx9x8b/FeI
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzXk81IkbwPGZcfRlFc0id8x3MTJEJYl6Hv1Qyj0VKSEmRaW2g3FETM7J
mSLK2kpSaVdtGVpHNme5j6aUaaIkheTIUbu/Pz6v958fnX3BbhwahUI5/F//
1+ltTX7pmaSN3a925zPrzSGzcEtapssBCDOKOmRaVwjyAW/5e11CYfDg4cWX
1P6AwA3tRRZWMTCwwWGTpeAeONab/GTjkgBMhbsbwuoegIlr2mEn/xTwOjHj
1HFKAImfpgNYVhlgFprTbjRYAYdC3JvWumSD6vOyO0z1athrFT9n6ZkLQfc0
t/oo1YAz9SHL2v8K3GeuUV9Ceww5tsn1ula/w+xg9IJTeS1EtA4bmLgUgf0o
EbSioQ4m/4x5vKr7JsT20MNbwuvhyHm13Waet6B0PmkRrmgA711b+ev9S0Cp
fjxtNbcRCsa3hzCsSiFy+9NOt6Fm4IXfF7JcysB87Zx2tmYbVB+i6JXQBVCy
38aw2KsNFrwcfl3ZLQCzf3Iq6vLa4BQOyK7yrIDqE/tr7FXaIUBK0crcvxLO
JKo/CpXqgOv1Fq3aVo+hYEpLo62yExJcc0wNXRrgu9bRAEZrD1hZX5W4JGgA
BY61KInSC2Mmd7oJshG2v8zlJpv2godCDffdZCM46z9iemf0gn7rUE1BbjPE
2Zx9ku78HOoc1rmpvG+BjF99L38QCIF2LUhAq+qAcptiGZ9dfdCXe5RRPtEB
tIM6UtvP9MGDzJPJx5id0Cg/fGzpzT4IjI3yEqV3Avmnjs7IdB+078ukVvp3
gUqXh9a6zFfwm06FPVe2B4w6coc7q18D5Mu+GN0hhMdqgiKb0yIoqikaZ8YL
wX1obdPeFBHQB+xk9pUJYdAorebgFRG8Y8au61J7AeKfXERulSJIKZ27UNb/
AvqXLQ45tSCC109G2GcO9oHSBa9Dutw3EDHS8owe2Q8WHQaxigFieJXXKFLr
EEPQ2oOyZuQApNktnXJ/MQTRRisr6cbv4bJvdmMIZxS4RoPvQG0YdgQwyvZX
fwEqX1v1+PkRSNiZPRwjPwVdL17+JZAfhcmJViOW8zdwM9jFNb41Bn7rL3mO
7ZyHsbhvoazb43DagvdO97cf0GPb5XPhry/w7CjFuMKDig4Wt4vf/j4BM7nL
x28Kadi0R6FIL/YrhF1t8XMNl8QE2hZ5zpFJiPhht02aKo0K3L93Ov1vCrrN
ncXHbyzClq2m93rIadi2uYzKtJNB/HAxrnx2GqxvDWd9aJBF78XQ+rRyBs59
vC30OySHqcVj7o6p38Azel3Gx4nFGNxYUsh1moXIcfasYZ48WrBDkj3U5qBf
48DJXVcUUBQtlZrXPwfwUbboqs9STI7j6wdkzUPTjZOrtq6mo67E/rADHguQ
tcQ2ZHqajvkfHtJa5b7DqMiG0lD2M5bX01O9Hn2HEwVyb74mKuJxN3efa9wf
YCFnEcF0VEJrxaUqDxQpaMAxCi7TVsapyRj3a8cpWGTgVhg0powbl43EX2+j
YED2y4u6pcvQO9y22l2fiq6TrDeWPBX8LG5oDj5LxfB58YDHFlU0/cb2C3lF
xTXBjawcQg2jkiPr5NfQUKUt5KmZUA2r0g3mT2fQ0Oplkp4wVx0V/rFkGX2k
Ib+L8/z5EQ3sjb/LV3aQQI3Q6zb9qzVRv/fZu5M3JHB9vNIkMamJmXum4iVo
ksjjOS6k1GlhlES6azRHEpewhqvUk5bj7uupzx/WSqLYR/8wbaU2lmY1+Z81
lELem2N5xEVtbKDOPPDPlEK7h5+Z9Blt5DuxB22npFCL5/zG3lcHN2vnsz/7
SaNyoXiKV6uDpuxzAvFTaexeOFfSTjLQoVL6QOTaRVjsoJnhwGfgDff3qtzb
izB/7HVH0ycG6qzSaNXXInDFRKje6VEGrkg2GzXUJvD+JD3MdJyB25pn9pgw
CGyatdPJ/spArVJ1xno9Aqck7wZz5hjY+srY3dWYQCfVKDmKDIkR9vdSUzYS
OG+93M7sFxLT88w9bL0JjLcR5AzpkrimWSOC7UsgfTP7U64+iYoRz774+hHI
dIg/TzMkMajXUhgVQCB756i41ZTE1RJzKVXBBBYHVkUFAomzfzTWOkUTaHZ4
V6emNYkuy88z98UQWB08ode+icQMs37xSR6BPSf0W8ztSORrFXlcSSCQGpWq
IeVIIm+i33EijUD+GYOjZU4kzi0k+slkEqjMq60NciFxg0ilbXkWgazE6cAO
NonEupwSxxwCHyanV57d8d9/ckCbk0vgphRDuoU7iY80moYjLhP4LO0JZ8SD
RN+fT8ll5RPokektyPckcWi3ctydAgL/BdStEXg=
          "]]},
        Annotation[#, "Charting`Private`Tag$30149#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzXk81OkDwPGZcfTNKpqV5DbfxchQKknU8+iHLsYx1UxKCElIbQfjyDU5
MjlTRNm2klTaVRtD63lkc5X7akoZE5IUkiNH7f7++Lzef370DgW7+tIoFErQ
f/1f9ruq/JKY81s63+zPZ9ZaoMyC7WmZzkdAmElUoFlNAVLyeyc86BwKBvyD
llxR/wMd3dxaaGkdC/o3O2y1Ej1EjrVrfrJ1TgRM5Qebw2oeozUuaUFsnxTg
fmqG3XZGhJI+TfuxrDOAeWhOq8lABQoM4TZscM4GK1+W3WdqYHTQOmHOyi0X
BDzU2um5vAo5UUtZNj7XwCPmeo2ltKcoxy65Vt/6dzA7EL3ALq9GEc3DRmuc
C8GOUSJgVV0Nmvwz9unazjsgrose3hRei45dVN9v7nYXlMyfXwRX1SGPfTuF
m3yKwfLa8bR1/Hp0fXx3CMO6BETuftHuOvQcCcIfiVnOZcBiw5xutlYLwoEU
g2K6CBQftjUucm9BC+4Ov67uFAHzf3IqavJa0BnYr7DWrQLgU4erdqi1Ij85
FWsLn0oQk6TxJFSuDd2qtWzWtX4Krk9pa7ZUtqNElxwzY+c68F37uB+juQtZ
29yQuSKqA8q+NpLzlG40tuZ+J0HWg92vc/nJZt2Ip1zFH5ysB06GT5geGd3I
sHmo6nrucxBve+5ZutNLVOOw0VXtfRPI+NXr6geRGNFuBohoqA2U2xYt9tzX
g3pyjzPKJ9oAzV9PbndMD3qceTr5BLMd1CsNn1h2pwcdjYtyl6S3A/JPPb2R
6R7UeiiTWunTAdQ6eNobM9+g3/QqdvAVuoBJW+5wO36LQL7Cq9E9YvBUXVRo
e1aCCqsKx5kJYsAd2tBwMEWC6P32iw+VicGASVqV/zUJGmTGbexQfwWkPzlL
XCslKKVk7lJZ7yvQu2JJyJkFCXr7bIQT498Dll9yD9Tn96GIkaZGemQvsGwz
ilPxk6I3efUS9TYpCNjgr2BO9qM0+2VT3FdDINpkdSXd9D266pVdH+I7Cvgm
A4NAfRjt8WOUHcZfAFWou/LkxRGUuDd7OFZpCnS8ev2XSGkUTU40m7CcvgFX
o31807tjyHvTFbexvfNgLP5bKOveODprKRjU/+0H6LLr8Lz01xfUeJxiWsGj
QgfLe0Xvfp9AM7k643fENNhwQLnQIO4rCrvR5O0SLgsTaduVfI9Noogf9rvk
qfJQmf/3Xvb/plCnhZP05O1FsGmn2cMuchrt2lZGZdovhvDD5fjy2Wlkc3c4
60OdAvRYAppfVM6gCx/vib0DFWFq0RjXMfUbcovemPFxYgkMri8u4LNnUeQ4
Z9Y4TwlackKSeepzqFfzyOl915ShJFouNa93DoGPCoU3PJfB5HihoV/WPGq4
fXrtznV0qC9zOOwIbwFlLbULmZ6mw/wPpbRmxe9oVGJLqSv7GZbX0lPdn3xH
p64r9n1NUoEnXbmeN/k/kKWiZQTTcTm0UVmm9liFgo18TYLLdFXh1GQs9+ZJ
Ci40ci0IGFOFW1aMJNxqoWC/7NeX9UtWQI9wO8w1pGKXSVaflUANfpbWPQ8+
R8Xh89J+3vaV0OwbxzvkDRWvD65n5RDqMCo5skZpPQ2rtYS8MBerQ5RuNH82
g4atX583EOdqQOV/rFgmH2lY2OH78uUxTdid8ECo6iCDNUNv2fau04KG3Y2D
p2/L4E0JyyeJSS2YeWAqQYYmiwUCx4WUGm0YJZPuEu0ri5eyhpHGeR24/1bq
y9JqWSz1NAyirdaFJVkNPueM5bCg70QecVkX1lFnHvtkymH70s9M+owuFLI5
A3ZTclhb4NS3w0sPbtPN53z2lseqBdIpQbUeNONcEElfyOPOhQvFrSQDOlTK
H4ncsAgXOWhlOAgZ8Db3/Ur+vUU4f+xtW8MnBtRbq9lsqE3gVROhBmdHGXBV
svmosS6BH03Sw8zGGXDX85kDaxgEbpi118v+yoDaJRqMTQYEnpJ9EOw7x4DN
b0y5LqYEZq+MUqQsJmHEjoepKVsIPG+jY2/+CwnT8yx4dh4ETrAV5Qzpk3D9
c80IjheB6ds4n3INSagS0fjFy5vATIeEizRjEgZ0W4mj/AjM2TsqbTYj4TqZ
uRQUTOCioyjqKCDh7B/11exoApsH7WvXsiGhs85F5qFYAuPgCYPWrSTMMO+V
nhYQuOuUYZOFPQmF2oW8a4kEpkalaso5klAw0es4kUZgYYzR8TI2CecWkrwX
ZxJYVVBdHeBMws0StRadLAKzkqaPtnFISGzMKXbMIXBpcnrluT3//Sf7dX1z
Cbw1xZhuySXhE82G4YirBG5Me+Y7wiOh189nFLPyCczL9BDlu5FwaL9q/P3r
BP4XBgRH+A==
          "]]},
        Annotation[#, "Charting`Private`Tag$30149#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwl0gtMU2cUB/DLLdAWUApUHrbQlkJHtrmMRVjMAr1jDx9jgxDZw8hWQYkL
xpVlcVBQ2Azquk0C2cPEqBVMlMyxiHG6KdKhZY7NUFZcsonkFlML1gq1lJZX
Ged/m9w0v5zz/c/5bq6m8qOyXSzDMDtXHvpf+TVv6rPpVS2eLxjzcB9ZsWqE
PMmd+I+szjnA61v7Azsvf+ckG970PyDf3HbMRbZYQh5Yet1NZjrbffD61x6S
rTeKAuSs7D+9qN+pCyKvUTcFS80L+k1OE2senEZ+mzdM7lBGPUH+UDnDrXg8
3wYzv25jyZlT9/3w4xoRudJUOoN9VZ9EkT+Pzw5gvnMymtxvS53F/X7xiFEP
jcJc6aIU+T26UJ/wPmLR3+SHrYfOxpE78urm4If+1Zhn65rH+YaD8ajH+ARX
2mXIP8suYr/gpQTse/cMzB0vTySz46IlzMtKSUL/9i7Bqk64KFsdxjz/fjnq
VZJl3K/78BrujLHgt+JMxkr1ithk8ukjRsE10hTyZ4EBwa21sFPphvlrVano
v/5sBPz6K2nwdDts3Vy8FvlXtSyZ6/0bjjDuga1PDSmQVz8i+Fa+kqxpCgp+
Pi0deeNbRWTL7acz0H98GOY29sAa2SzMZJ1TIf+9rEjsY2fVqHO5sEVpgp2+
D+Bm82PBjiuCVVUanA8ZojA/3A7vKL4ouDog1DvKojF/qDoT72fUAfMlXvjl
mXox9nGs0wrzL4iF++0b0DtN8n/2Vtv1tE+SfYT89h8b/iUbpHO8vrYgRnGp
lCer99Q9gB3BcTJja/WSG7YuusjNjXYfecEtnyBz9e8GUE9c5yHzu5kgzl/7
6RH8zK4F8tUvW6ZwPvfTsP5KRkvBFvu0XvieGG7FvT9f9pGtKTqWvJ/3PcE+
qwwi1A1dfiHPFUlOz2+bwf6dEWLyPcVwAPfrYiWon6+dRf+3PVLUzWVB1Cdu
xcKub0K4X2AwDvkNG+ewT97YavKS7tC8Xvh+48kVL47BlncGZeSCm9GLmN/2
YwLOf9wL89KcRJzPfWkJeT8UJpFPJMzDlvJT8L31r4Zxv++b5PAx2TLOl3y9
htve2n+yTMpwNH/QCY/F5MDch1PJ8FsdsEVbn0LOKLwLq5d3pJILRzdEwHJ9
GlzSJjj+jbXwZBoLe2/DJ20G2LJsV5APGH6HDefylORwjUfoP5ycjv47m0Vk
5gVdBvaJc8CGOhMcvj8Lqw82q7Bfw75I9J8Wq5GvPQ9zA41w+IIsCv3dbvj9
vS0wby/SIN+oikb+kRtwofQRzHe7hLpWIcb7atqdif0u/gXzX00IdldIMM/4
nBb5kqMS7n/MnVpt
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk01IseAPCxzQ+RfaLQ/MYWl04pa/h+46ZcW+QdSYvGWqSbwu2kd0ui
UEnqXEaKiDSZauzHfbYMuSIJo7EvyRo1ibG99/74nA/JPOsZKE6hUM78z/8v
q8Ngi5obdtfU5RmaXeZAjT9+waE4CPxtbti5DeRBXNnX70rFUfBikaZUMFsE
4jQ+TYy4Csoh93bA/GtwOFi+a4kbD3/bF+reHCiBuMS/Ds77JYNp5ND+9Avl
wGRWlQqpdyHalWXi1FwJTzIzO6a5D6AxIq4p4+t/4E2F3HBIYjrMns0PUg+p
gdGumLlRv0zYVMd/zHSuhdQbRfGz1GxoTk/b/8u3Ouiou/3kM/cpqE6nzC8P
NkBAO69Qd2sBZOWM7bt8iwfCgbVXzMRnQDoji2LWCKqr4TX9fmxY31j979yo
Jihk5YdPUV9Bikire6WlGaY6E5JGuKVAakbmNn9vhd19OndiT5VBRPPZuo7w
NogZrU4lt5ZDZnG/rdSXNpD7/jP9RGIFtPn4uKaffg/GiiEFAr8qCOrwzvN0
awdzvdzhCWotDBp+6Zdd+ADRJ+LWh7g8eF/paCX63AlV0ZwfXrRG+LST8zqY
1gWUlE9TjX80go3Niu+5fV2QWLOD/8K2CZx/l/7OzOmCLLLv5cXGt5BmHzi9
6t0NvBEzppKgBWqDclp4XD7IFp9n0q+2A0u5tHCnpQCM8Wafz+t2ODlS8+3G
cQG4t2QdvjfSDsdetbx9HieAtNG3blTHDzCdBde83wtAW42+Z1q2A94fUr16
LLAXTKNaVMrTPsLFqIdevPg+8LHUa3Av6IZadomN6/MB8IxQMHbs6gahkUWm
afMAuLCXUm0k+XBGSfGD6MsAIL3Vz9CPD3s6xW9sVhkEfenoFXH1Hlhztu9k
uw+CsLtpV2nCJ+hO5ZV48gYhJTosRzO4Dxqrm9WTC4cgQNBTLUwdglxjpY9R
XiMwxml+Ob57HFziLIY3wWeIbE0eV/KYgZQTTtYjGyZg4VBES1jsPBSV/lms
HToFFWPUA2HpQtjuOxpP+WcGSPvf361l/wQfaw+B7uJXWL2kq+gXJYK04pif
+fNzMHik9kdvwio4ODaYaH2dB1aSl0uaKQWbnKxvpbR/A4221zkSGWIY4F1Z
GJr/HbYEXm+m0CXQZ9GDlZYghO5TqwfHkiRRm3LUzNXzB9BqJwq8aVSccgqQ
mTRYgILLNdfvpRNoeLOLMBEugLDAprZUXAY7E8re+Rf9hHp9k9bgRFkkelb+
2nNhEVxU6q0oixtQ8zd/fpThEvh4vovSj5NHQZi0IGlyCcoXai1pMgr4+AVt
9/Y8EUxIFrEXrBSR+9K3eP3gMpRblOg9W1PEvIGYA5oyKzBKKri5lyrhoesX
W+24K1Bh12955LQyyhlZc7IPr8L7uGA5tokKFps/caySXYNfYx3uzI+o4Km+
PTlznDUQFfSILj9TxUf39/kbMNfBR3xs29lQNfSc8fiXvTQF1VQcqF50Gr4J
uJYY6kNBFVfflj9HaWjk8Y3FfEXBcDve3kesTagvk2uZIiGGEcynF3Xc1VE+
icZ38hLDcg5mzCpp4MlzHwJ3sMXQt9jk9ItGDXQ3LZrOWBNDHP7I4CZvxgQx
lSvxh8UxtrE1kf3rFjzNqfth+EIczwzYlsgubUGzrTHscYoEZtCDmzhVmhg8
/UCr+qgE6mqMJB44r4VH1oOupnAlcM5aw3yblTam8LM2yqhIYuCdN0/ClrXx
4R/DKicjJNGCVVeT+3Ir3np2yWihRRL1QmxH7lrTcW72zX3znVJ4rL/O1vkB
HdNa9O4vpEjh5EzskvkcHRVQ2XvLvBSqKz825HmQqCF+jnA6SkXh3aCdbWwS
6yPVRj3rqRhpIc0JLCIx7GC9kX4DFRd6nxmvcEhUkFTjLvGo+NNgxsCQSyKp
bXwzu5mKor/Pa1+rINHq+Gc3YTsVKZNXNljwSCzSLD7+dJCK8vassawBEs3O
U67brlHx9riNv9kQiXFmSQ4aFAI33uof/GeYxOXD9AM/xAhU5JO9i2MkRvQt
6xRJEagaXvDBc5rESoNLRjryBG7OKKmmLpGodlmUulmTQBZ42z4UkWggH1Uv
0iJQc2yxctcKiQ4UNxvBVgK1dtiU+q2T+PxqIfFQh0A6r45dKcVAYsBORvcX
ArNDA4w8CAY+6m24QjUhkKFELRiXZiDlxKe9E9sJ1Dnq9ERVjoGZho7ZHFMC
c8Wm6M/lGfi2YRLu7SZQNz85a68CAxtvl22LNicwz2W7Jl+RgWrBHb6+lgTq
f2tLD1dm4Nz+wB6wJvC/6ColDw==
          "]]},
        Annotation[#, "Charting`Private`Tag$30297#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk01PsCAPCxzQ+RfaIs8xtbXDqlrOH7jZty7fKOpEVjq0g3FbdTvVsS
QiWpcxkpW5aGqcZ+3Pf9IkOurMVobFlSlrKMbbK89/74nA/JvOAdLE6hUM7/
z/+vrIehljjB/ra6PEOzxwJR405ediwLAYG2CfbuQ/kotvLHglJZFChZoSkV
fi9F4jQ+TYy4BZTPPNoN5t4gR8+qvavcOPC3Q7He3aFyFJv4l+dcQDIwu/L5
UPrlKsRk1lYIqQ9BtBvL1LmlBuVmZnZPc5+ApsjY5owf/0Fvq+VGziSmg+8X
CkLUz2A01nN9diwgE2yr5z9nutSh1ITSuO/UbNCSnnbol/l61F1/P/cL9wVQ
nU6Z+znciII6ecV6OoUgK2f84I17PCQc2njNTCwCpAtkUcybkOp6BB4MYIPN
rejfeVHNqJhVEDFFfQ1SRFq9a60taOpjfNIotwKQmlfyWhba0L4B3QcxZytB
ZMuF+u6IdnR9DKWSOlUgs2zQTuprO5JbWE4/lVgN2v383NLPdSATxTOFgoBa
ENLtm+/t3oks9PNGvlHrwLDR10HZpS4UfSp28zOXBzpqnKxFXz6i2mjOog+t
CXzaw3kTSutBlJRPU01/NAFb2zX/iwd7UCLezS+xawYuv0svMHN6UBY58Opq
0zuQ5hA8ve7bi3ij5kwlQSuoC8lp5XH5SLbsEpN+qxOwlCuK91gJkAm8O+D3
phOcHsXzCScFyKM16+ij0U5w4nXru5exApQ29s6d6tQFprPAbd8OAdJWo++f
lu0GHUdUb50I7kdmUa0qVWkfwNWopz68uAHkZ6Xf6FHYC+rY5bZuL4eQd6SC
iVNPLxAaW2aatQwhV/Zqqq0kH5xXUuwSfR1CkN4WYBTAB/s/iidsVxlGBtLR
a+LqfWDDxeEj22MYCXub91bEfwK9qbxyb94wSokOz9EMHQBNqEU9ufgzChL0
IWHqZ5BnovQhymcUjXNaXk3smwCusZYj28AXdKUteULJawaknHK2Gd3yDS0d
iWwNj5kDpRV/lmmHTaHqcerh8HQh2OU/Fkf5ZwaRDr+/38heBn42XgK9lR9o
/ZqeYkCUCKSVXV8umJtFw8fqFvvj14GjU6Op1o85xErycU0zo8BmZ5t7KZ3z
SKP9TY5EhhgM8q0pDitYQDuC77RQ6BLQb8WLlRYvRL1n1z3HkyShNuW4uZv3
IqLVfSv0pVHhlHOQzKThEiq8ge88Sieg0d0ewlS4hISFtnUV4jLwY3zl+8DS
ZdRgYNoWmigLib61v/ZfXkGuKg3WlJUtUPO3QH6U0Sry834fZRArDwXh0oKk
yVVUtVRnRZNRgM9LaPt25YvQN8lS9pK1IuS+8i/b9PyJqizL9Ys2FGH+0PXD
mjJraIxUcPeoUIJH7lxts+euoWr7Qatj55ShnLENJ/voOuqIDZVjm6rAMotc
p1rZDfRrjOODuVEVeHZgf84sZwOJCvtEN4pU4bPHBwMNmZvIT3x854UwNeg9
4/UvB2kKVlNxpPrQafBt0O3EMD8KVnHzb/1zjAaNveZZzNcUHGHPO/CMtQ0a
yORZpUiI4Ujmi6u6HupQPonGd/YRw1UcmPFdSQOevtgVvJsthv3LTM+VNGlA
D7PS6YwNMQxHPjC4ydthvJjKzbij4jimqS2R/esOeI5Tv2hUIo7PD9mVy67u
gOY619kTFAmcQQ9t5tRqwtDpJ1rouATW0xhNPHxJCx7bDLmVwpXAszYaFjut
tWEKP2urjIokDn7wNjf8pzZ8+seIyulISWzJqsd5r3TgvaJrxkutklj/jN3o
Qxs6nP3+9rHFHil8YrDezuUJHaa16j9eSpHCkzMxqxazdKgAlX13zElhdeXn
RjwvEmqIXyScj1Ox8GHInnY2CRuuqI15N1DxFUtpTnApCcM9G4wNGql4qb/I
ZI1DQgVJNe4qj4qXDWcMjbgkJLVN7ma3ULHo70vat6tJaH3yi7uwk4opkze3
WPJIWKpZdvLFMBXLO7DGs4ZIaH6Jcsdug4rvT9gGmn8mYax5kqMGhcBb7w0O
/zNCwp9H6YcXxQisyCf7V8ZJGDnwU7dUisCqEYVd3tMkrDG8ZqwrT+DtGeWI
ukpCtRui1O2aBGYBX7unIhIaykc1iLQIrDm+UrN3jYSOFHdbgQ6BtXbbVgRs
kvDlrWLiqS6B6bx6do0UAxJD9jJ6vxA4OyzI2ItgwGf9jTeppgRmKFELJ6QZ
kHLq04Fvuwise9w5V1WOATONnLI5ZgTOE5uiv5RnwHeNk+DRPgLrFSRnHVBg
wKb7lTujLQic77pLk6/IgGqh3f7+VgQ2mG9Pj1BmwNlDwX3AhsD/BRmBW48=

          "]]},
        Annotation[#, "Charting`Private`Tag$30297#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1AlME2kUB/CxpYBui5wFq7gFTcWjCsZoxFUHDxQEE0HxiMfs4qIxqVuR
rC6usdk1xAvUBdSghGpU1EjwBIOCYxAlYo2kHusBDlQKKmWBosBwbd9/JCEv
v3zf9950Zv4T8stvCb/KGIbZ7PqnSn/T7Y/mu0q4eKryvqvyy2a9JAeV+NTC
Nv8GOOl0HVm4vb+RfORDfCPWMwqbyXHpMz7CZxe3kZU+VU1kJnCpkzylo/MT
mR0X+w3eO7eVrD0S24v9B587yOaafX1ku/VKO+al+w+SddHnO9DPN4dhXeWi
26JO9Ft1bRjZ3VgP89enupEzvK52od8fSxTklJLUrzi/0uYO2/Xf0L8iyxPm
NneTTbkLh5Oj19kkv2sZQbavTetBv7hcJfbf74eZpgYV5jWn95K5mPyROB9l
FHF9H456Y/+IpD70U7+RXJ0hOaLUB3aq+tFv92Ff9FtQDrOi3g/zF60ewO+r
nulP1sXLh3D/+pbBKS9GSVZpA7De+BoWRvfDzjErGJ7Oz7ap4eWlMGvaFUi+
ee8LzA3+HUTObtgxjJee3yiytbECNv2cCifm1kjmYzVYX6WWof+l8aPRLzQZ
5tqrYL9jl2Cz3/MxOL8mXI7zW48HY97nPZI7r8E7Iw/C/IOTY+EBByxMm/Mj
rn/ecjesp4ZpMe+qTEHWXs6GE0PTYGZys7Re+QQ2dySEoN+Wuwqp3x7YubjI
HfOjBDhxrq8H9vdEIB+eDtMbqgJT/4pqzqbdyAFb7YF8vCixNlHVvuu1U+3q
/a+FKrfJ4zP8bCuqeVJQO9UZwZGtVE2lLPJxK6rWgf71AvJRlu2JfeyrKuTj
UNHaDqr89If9VPN+n9+J8xUFA1RFMQ5mx55APjR/JaMvt2G9jFymu9GF+TVD
cvLbwiVfyUz0BeTjbVgdbBbfIx9lvjtxHSZ3owf6lVth4QuLfIiB6h6cP5CG
fKzTn4P5vcHIR6RNh+vWbrMgH2JCBsw2pCMfmuIAEf2nKb2/z4OZp21wXmAh
vgNmYznyoflpHn43PycL+RBntUi+vh350Fju4T5wTd7IQ1mSAd8N08k2WGRT
h+Bof+Qhb8IxmEnphvXPfHDftDor8lGUtR7mWouRj/wL52FmZTLyYcmpg9nD
U5AHVXEwvkNsPoM8iAoZ5rM5M+HM25lY1wYFIA/xxkcwc3wQLloox3Pivd4j
H3o+EXa9z8iDISYXFnQRyIO+rxLmvBywSvkDnqspTI98WDaGSH48Ee9/ZrMT
5qx/wvFZBnwnmU/dsOGOGu+B+Zwc778hPBTmlTtgR8E/sHCmFrb8+1rB/g/X
PsaU
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVknk81Akfx2f4kSjrGJaYSa7HOjI7rhS+X9bV8VTKta0WS2jKJld5aFGs
NSpHi4jFULsWJUeJQQ+yjhy5G3ckOXKUsxmenj8+r/cf73/ef3z2/XTp1DkB
Eonk+2X/Z1Va0ePg0iiz5JFlnrGEHvyaxhgy5f8ECRMHACzYoGVoFUTh+4NV
OaU+rCsfkvZe5sWGhoFV8UKWW/YjuBbV/t9t3nXgPJ/4JdmiBOghntEHOTGw
M6ZEOpJZBpO+m7ZBoTfB0+SiaMzZJ/BAS9pnhZcErsdJDsXdz4CkPtKc5JIM
XL7bH5ueVXBGKV+LzkmFEI+ygYQxDojLwAIzNAMe/zNXXcCuhUPhBocWeWx4
69VY4GpZBz68PXM12nlwUi2eHdBTB7+HkDJvudwHTfN+u7Nu9fAhoHVLk/Mn
LFWxK4R8G4Dt4153LrQQOpb4Y6/dGkEovzFvnlcCO29mlfYMNEOGtzG/5/dS
WHqq81setABDvdCBo10Gy81CErN5LfBjbqJwnEs5HJG8JqV0oRUqMl18NDhP
AaxcfBvfvYSLSctaHqEcCA4U2dIq7IAZ0/jv53h1QLWYoFQc7QLHS9NR352o
BwsTezHPgC6oyzYvTs+phwLRuCFOehekC34SPmzdANbBuhrXprvgaLNz2f34
FyB/bfzpxYhuKLRX/spVuQnGF72NA3J74NKF8oZXNm1QXdOiOFvTB0MZ4osa
6W0QnPaVo/BoH9i2eytEzLVB6VTr/MpWHyh9u8d/f2I7RDQN7HAw64fO1V/2
xnE7QDJd5ZZaVT/Im6uasg1fQciwbHRq0QD85+V86g/N3XD/u7+3j4ZwoWKS
y3m50A3TafNpjDtcWOH9M24q2wN+n5vWSUVc8NNhayl59IBYY5OC4xgXvG87
1k7yemDU97z9e6tBsD9ZO+VL74PiLr37M7uGQLcnwSAidQAqncpCh+KGYXJQ
rzvv3DAEMpeLWVpjkJtjndnrMwEOIlnc81lvwOPKYp1E9DQYVD5Rjf08CTJm
f3fyD8/DSLJXQBhvCph36D6JB5e+/O36Xt3taWgaltCTbvgIJj8PvJIemIFs
pY2l+X2rcDLXNW49ZA7CP43mT5asQ15LzRE7zQ/Q/7zdQV/uMyxskrQSihZA
x6PuWMBlPugqaMRTbi8CK6XMpJ2/DYcyn9iVHl8CuruThLkuGafeEgpn+EuQ
Vdu9pREigOQVJcZY+TLsju1KEqkWxD/cbcY6vD5CxfHebMosgUfYRNZNkU8w
5eJU8JAhjA36w3cHyz6BnfewbpDnDgz7OTRI5fQKYOWb4uZHImidMs83463A
/qvMfpmVnfhsa6JPN3sVnBmrV26riuFalHo0y2gNhA3IMsm+u/AHxw5XOncN
lvQktJuyd6OaU2zsnN86cDNzppfbxDFpbuDKoOAGqGi87nQQlcCRyJnzLPYG
XAn3YDaxJfDeXat1dcNN2B2qIyBgK4npd83q+3s3QaWw4qLRjCQepgfqsvw/
g9OgFeVGpBQKxzZsdRI8aHsoVZmsJo3OOeyc5lweuEeMZ9TUSKNOuNOzkgN8
CIq5fGrCnoLC5S2Tjq18aGGYC3esUTBa28vy/IUtgCGptc54GTTep5/IJW/D
yjeqU2n6smhkPiP944NtaA4ykgppl0WLokLbRiUSKq6JSdqf+xpjTP3GHvmS
sERRSXxVRA5Hrmb16taR0BsNbR/myGGoPGtBV4qMLiI3I3Rs5DGnN1nBmknG
LqHcuL/ey+NujQviDnVk9CJzuo0j96DlXYEuMVkBNMmh7ElSU8AXH1I9KvwF
kA6XMkm1Cmhgcox8oFUA86TiPjIdFFHrKn9DWFUQz7CmbDLWFVFVjm0286sg
7idZvp5IoCJLZBFfvRVEjC1vj7tDRZxmaYe/E8RTUv9q0Euh4q4FyZM67wUx
WFX00Y17VHSmWgNrThCrbTujVB5QMXv/ynPrj4J4LNGF7lFFxaQcIe8WEoFM
5aCYN2+puOFKmecpEBhWMBXGmqZiprurcAmVwNv6zv6M2S/euvKM914CS6wP
nb2+SMVVlx3lXcoEbjDJesqfqWjT2cco/IbA30pvjbhL0HBjQJ/JNCIw3WS7
e6c0DQNbOahiTGDhC7/mxzI0lOxdPz10kMDO/tNlZAUavltfo58wI1COJ8/K
UaPh2WlSk5EVgZrRceGHNWionvV1zLI1gSbi/MAlTRoKOD67UWRLoJvSmKs5
nYYp34oaqh4j0D/fzuE9g4Z6DxdmR/9NYBSj/kiiAQ3ruC9H750gMKVKH40P
fOkhqiWd7Qj80/KBwfhBGg5ED0ZSThP4P6WYMOg=
          "]]},
        Annotation[#, "Charting`Private`Tag$30445#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVknk81HkDx2f4kSjrGJaYSa7HOprZcaXw/bKujqdSrm21WEJTNrnKQ4ti
rVE5WkQsM9SuRclRYvj+niHryNG4pnFHkiNHuWd4ev74vN5/vP95//E58NOV
MxfECARC0Jf9n3XZZU8jKuOtM0aWhRZyxujXbPqQlegnkDpxCABbNjIwsw8n
iUKAfTWpMZpXjNL3XxUmRUUD+/KFfO+CJ+hGfOd/d4Q3AQef+CXDtgLRIv0S
DnMSwe7ECsU4RhWaDNp0Co+6DfwsL0snnn+GHhkoBq4I04HXSYJrec8LRNAd
aU33zAACkfcfm3516JxGsQGNkwUifav4qWMcJKsEFhhRueDpP3P1JWyEjsSY
HlkUssE7/+YSLzsuChTum2swLAKndVLYob1c9HskIe+O50OgbzPgfN67EX0M
bd/W5/wJlurYNRJBTYgd6MO9EFUKupZEY2+8m5FEcXPRvLAC7L6dX9nLb0W5
ARai3t8rwdJzo9+KQBui65a6cgyrwHKrhNxsURv6sTBNMtmzGhyTv6Ggcakd
1eR5BupxngNg7xnU/P4Vupy+bOAbxQERYVLbBqVdaMYq5fs5IReQbSdINcd5
yO3KdPx3pxqBraWLjF8oD3ELbMpzWI2gRDp5iJPDQzninyWPOjQBhwiq3o1p
Hjre6lH1MOUlUL0x/vxybA8qddH8ykuzBYwvBliEFvaiK5eqm147doD6hjb1
2YZ+NJQru6iX0wEisr9ykxztR06dAWqxcx2gcqp9fmW7H2l8uy/kYFoniG3h
73K1HkDdq7/sTxZ0AfkcrTs6dQNI1Ubbim32GkQOKydklfHRf17NZ/3Q2gMe
fvf3zvFIAaqZFHBeLfSA6ez5bPo9AVoR/jNupdwLgrda1gllAhRsxDbQ8O0F
Ms0tam5jAhRw1w1NCnvBaNBFlw/2g8jlNJoKovWDcp7xw5k9Q4jam2oam8UH
te5VUUPJw2hy0Lin6MIwCGMslzMNxlAhyyGvL3ACuErlCy7mv0W+1xa5cgnT
wLT2mXbS1iRSsv67W3R0Hoxk+IdGC6cQ4x4tMO3w0pe/3dxP3ZlGLcNyxopN
n4Dlz/zXivwZVKCxsTR/YBWcLvRKXo+cQzGfR4snK9ZBUVvDMWf9j2gA73Q1
UdkCC5sEg9SyBWTkyz0RelUEqGp6KaS7i4iZWWXZKdoBR/KeOVeeXEI0H3c5
GyoRTr3D1M6JllA+6tnWixSDxBUN+lj1MtqbxEuXqheHf/g4jnX5f0I1J/sK
SLMYPMbG8m9LfUZTnu4lj+mSsMlk+P5g1WfkHDBMDffbBaN/jgrXOruCYO3b
8tYnUtAhc15kLVxBB68zBpRWdsMX2xP91IJV5EFfvXZXWwauxesmMM3XkKQp
USkjaA/8wa3LiyZYQ0vGcoYtBXuhjntS0lzwOhLksaaXO2Rh+hz/2qD4BtLS
e9PtKi0HR+JmLjLZG+hajC+jhS0HH9y3X9c120R7o4zExJzkYc5968aBvk2k
VVpz2XxGHh6lhVGZIVvIfdCedCtOAUomNW13Y0LU8VihNkNHEXqw2KzWQiHy
iR3PbWhQhEYx7i8qDolQeOLVMxMuJChZ3Tbp1i5CbXQbya41Ekww9Le7eGkb
gSGFte4UJWhxwCRNQNxBK99oT2WbKENzmxnFHx/toNZwc4XITmVoW1bq1KxB
wNXXZORdLnwNE62Cx54EEfAKdQ3ZVSkVOHI9v4/KJeAB0MzpMUsFRqkyF6gK
RNxT6naskaMqZPVlqDkwiDhPojD5rw+qcK/eJVlXLhH3J3J6LOL2Qbv7YjwZ
ZTHckkXal66jBl9+zPKtCRHDaeBKHgGpQVPLE8RD7WJ4kULyJ4arOjS4LtqQ
1BbHzzGnHHPX1aG2Ctt65ldx/CDB7s1EKhkypRbh63fiOEyq7ky+R4ZwmmkY
814cP6PwrybjTDLcsyB/2uiDOB6hLf3k1gMy9CA7AOacOF7v1B2v9YgMCw6u
4A6fxPETaZ403zoyTGdJBLQRMJyhGZ749h0ZbniR5oVqGB5dMhXNnCbDPB8v
yQoyht818Qihz37xDrXnAvZjeIXDkfM3F8lw1XNXNU8TwzcYRGPNLTJ07O6n
l36D4b9V3hnxkaPADb4Jg2GO4TmWOz27FSkwrJ0DtSwwvPRlcOtTJQqU71s/
O3QYw7sHzlYR1Sjw/foa7ZQ1hqsIVZksHQo8P01oMbfHcP2E5JijehSom/91
4rIDhlvKisKW9ClQzO3FrTInDPfWGPOyoVFg5rfSZtonMDyk2Nn1A50CjR8v
zI7+G8Pj6Y3H0kwpkCt4NfrgFIZn1plAi0NferB6eQ9nDP/T7pHp+GEK5CcM
xpHOYvj/ANbgZ2g=
          "]]},
        Annotation[#, "Charting`Private`Tag$30445#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwl0w1MlHUcB/CHlzO6ODmPA7k7YMdIuyQorOWkwfNsnjM0hiC1YlhUkohR
LVgurPWUO6WVaAgUbLRbzLGhMAfmFIoeJQLsKEAQD27xwDj0PJXjjuN4t/t9
n2e73T77vf7/z13cex9nFwQyDHPI/6Fv/6M/IdxgH2RdjTxbOPiH3/kvbOsj
18RmDJOZ9rExdsGQ52zcJpLNp0xT5H01piky//KFGfLf/xmnka90OOCni+xk
/alIF/kp6/Z76P/KhJuckPT+fcSjqr3oZ2tywjdO+uDiZx+SuR3fLiP/898e
oX7n5VX2uLqluynAhflrBetkWWEOrB+uYziK53ikeMuVAPL5Wesc+n0zFUiW
+RrdcD0fTLYLRz2wZ6OMvGVvMyw86ttALnBPzZPFzo0hZFNHrxd+8h4sMz63
gPrKfXLMv3kLFo13JDNKH+6nvDQU+QrVIvYd+FNB3h3UBHMTmWHIL/5gCfM1
WUrMH9Eso777X1g20gTnX43dBLOLsJBuge0VphW8r7lKFeoTDKvwcHo45k1e
lDzRKTk6Zg0+XKJGP90AzFd3weePKNfhgZII9J8+B4uKtEjcV3LKY+xz0y25
vhXWm45uRn28E+YvxUVxqfLRyoI4RqD41gOwm0+CecdWDVlVUQELI7clv2uD
zbW1WvIQmxpAzv8pVIf6ayWwWFYFD3WNw/ybhmjM250ZiH4WC5ydLcD8jx/F
IH7WEERmfL/CqhNvwdyxxOusumVP+oHUIZbmuUyD5CN3DDay/trqOCsfbZjv
e2eKLDZ8Mkmucr82TeZ+uXyXXFoXPgNf8TjIOb0Nki+kuRBvO+kgm/dMuslq
TZiTld6Pl/xSVPID9C9KWMT/w9h/F7+H7TNLiL9umcU+Pe0rrMmZpdV96CIL
pefWyctfKObg/U6G87uu45Ab5/ksM4DcPmeGRacQSF5urPIgP+J4MLywa57M
/xMiI2sTeZh7sW0DOYU3ecnMyOITcPOOBfjr6hDyWM4ZmPsrT04uK0/2Yb7R
AacMF8KisDMU8/Y+s4h5zkEF6u2KJeTb94eRc3tHJH+lUaL+d/0y6n+wwdqL
92E+Vb4J55OrV3A/wbfhsh4fLGTXqNDv055V7HsrIxzzGtLW0L+4G24P/1ny
G1+q0b9It47zHGuGc79LgfWGzgjsn6t8jH1eTYrEfdceluyaj+S6vIb6t5UM
R/mtBzeTiy1GWChXRZEVmTWw+HwH/DC5H86XxWvIicmzUrzNCp8uig8gm1u/
16Lelwdzp0fhfu8ZKZ5yXYf8XW5YP74EK0R1IOK11mhyxhYbzE2WxWC/hINB
ZP8Ti/mXrEHc/11wbSU=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk4lYkegDkcHPGNJWtl50uWlGUs5fejJkuGOsi1DLI0sss1Y5eeMigy
hG4YkZrIhESWLKdskyTm2MbRcSIMQtnlcrt/vM/73/u8il4hdF8KFxdX0Ff+
75KPqoWt5hmmN8Ji5QtkjsOamt2Y8EAQOGmYTyizH4F7mU3/a2Yc4Av/aeea
arg7vuGS4pEEH1g79j7KdSAW2G1TzkwDk7zZ7CvsRnjxxbZwuiQTpDU0JRbV
WyDazFA6yiMHwiPcD/eIMmD+taBgPrMARD5Pu4nUvgQ6LZqR03kXeIK8jE/P
tMHh8oU4dkkx3AukVa7QOmDm09BaqMcDOFal5dim0gXOcWUzWcw/QP+jxnIp
pxsMFOTvs6oqYG3/pHxS02tI4fxZmdlZCQ8DDorxZfWA71XToNGSJ2DKM6e6
odkLcq/IqUCPWjjKaI55I94HGY5bQzeZTXCG2HHWqP8Ldh7oGei9bAZj46jb
OfxMCNwIvjVc1QIpghXhAw5MKOkJe5jR2Qp/qu10c88zITF0ymek5AWsPj+4
ZkcMgnFt75i/Rwdsqm62XTk0DI/MinvTmD2gfSFAJm12FEzPbHj84/gGEi9a
tvGTLOh3t106OfQGnAa1nHi8WbARsyWyPdILUaOVmSkjLFByVVevWXwLvmXj
VkqMMQjJTvRXXu2H5tbosYpYNggIHv24uzsIFoYS1885c4Au+kPNHzgEV2X5
NbvDOJAnnRznmjgEZa8bg+RSOaBNvhN+RhmGtMWqDa8GDjieTNUOpo7AElEc
cEnmPRTHvw9hCY4Cd4Whl1j/ezBZzvxcJ8GGxxqmzUI6k9DgdijqAJ0NbsGb
9S9PTIJxB2M3MZ0NxT2kup/TJBTYRCbd5xkHLuvz30bHT0K+/O9ZwbHj4FZd
WN3VPQl57byPuYI5YMEfAUbeH+A/oq3vVc5OQNIJp6GMpCm4VWpgEyQ1DS4B
7M7gBzNgG+fqLBG/AImld7u8POfBx4m/qdR8GUr/6dTZXVmEq+Lk06fc61Dc
F/ODTMInuLYjXCMo+gXEVVzVYniX4cdGEftA4V24ornHqP7iCgz0zM/le3Fj
Lf3d+peSVfAb0NMtvcCD7mKUourZNShfYAcFWFKx4vrPDwWJDeAsSf9crcCP
0fZW5+IUNyEpVZ+qqEjDcIkK2QzzLWDp1ySd3BVEy8qIenvLL1AcKZ2WRhVG
7xf8tGS3bXAuoXm5Ub5BKkqJ03z/+7WnnR0aLILiSVryv5zbge9HXzW2h4hi
VXOUSaLTLvxqK81a9RBD1UWNzfuKXJiWNtRs6COO5fpnIqMKuZDCGEtu9t6L
l51F2x1kuNEuLttGni6Bmvxs7sYUbnSgtvRnOkji2y3dVX8KBY9K3qFzvpNC
2cZPxw5fomDyvuf1l45K42UNixuibArmzttNSOrK4E6A7r/vOPBg/Klsvhwl
WbRJD7KbYvDggUCbeVJtH1q75SvKGfKifpJ1/bbKfsznHAyQK+dFVfWthHKx
AzhbUK4dJE3Fntx9tJC9cnjeJrlQO52KtjcXrgtR5XGs7l5b+jYVLWIE1uaX
5PG2xRDzXxf5MFbGWjQ0UgGVotfETcf5kFHvpzK0qID+11P2HjzDjxPQetsi
TBGdzHSvtb/ix7DUpRTVWUXknd0vV20qgCZ2bQslnko4EbElMlclgJzNt0+1
OEq4Mus9N6NDw2W/2nVlZ2XkXp4vzi2lIaeJmac8qoxHorRXicOCKJSWU93m
ooIfGg5ZaNcI4j2FI5Z/9amgzKnQ4AD9PSh5h9d0jq6KK2KPOuhte3B1qLIy
tFsVS876x/V9L4QiGVy5uWZqWO/dvTQ3LIQC2invOhlq6Kmu9JNVhDAGZswW
+xqReEr2l2frQgSWepq2xJiQSOuzZZR9Q+CUTubor8dJtK/+aOkuRqBnn9He
ZjMS91i29XdIEegglnJN0ppE90jf4QIlAo/fIv06XUhkJGTMeBsSSNz20VKP
JfHV+j2C7kPgab86K4gn0Tphx1XiRwKTDYUuOF4mMcZdUWfkIoGUkerfEq+S
KFs0G+QVQuCaDI/I3zdI/O58i0VMNIHsvKLPqQUk/sRdW9uRQeD+wFWiqJDE
9CPrWZlZBLocs9J4VvT1z4ix7Z5DIJO15D1xn0S9UbVLm3kEdh3AAZPHJPrI
t6/o/U4gdSHr09lKEu3ODRtQywg0b54W9ntConTXNN9gOYHP3W+eulVL4okV
Q3rUEwI3tSe8yupIvLIr8+Z0DYEGuwYJrQ0kdk/rj8jVERjem5o3+Pxrb5QV
/rmBwMrCd8/mm0mUMvX4raOJwP8BIbAX0A==
          "]]},
        Annotation[#, "Charting`Private`Tag$30593#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk41ekCgG3HccRvLFmOys4v4aQsYynfR02WDHWQaxlkaWSXa8YuPWVQ
ZAjdMCI1kQmJLPF9p2yTJOZwGHScCINQdrnc7h/v8/73Pq+KTxjTX4CPjy/k
K/932UeNYmyZZX4jIl6piH4crWk6jIkPhAAXbcsJNe4j5Flh1/+anQDgi8Bp
17padHd8wy3NKwV8GN1x9FNrQFLB3XaV7AxgVjCbe4XbjF58sS+eLssG8to6
MotaCMVaGMvHeOWByCjPwz2SLDT/WlS0kF0EJD5Pe0jUv0RMWiwrr/MuEAzx
MT0904YOVy4kcMtKwb1gWvUKrQPNfOKshXs9AMdqdJ3b1LuQa0LFTA77D2D4
UXu5nNeNjJSV7o/WVIG1/ZNKKS2vURrvz+rszmrwMOiglHBOD/K/ah4yUvYE
mAvOaWzo9CLFV+RUsFc9OMpqjXsj3YeynLc4N9kt4Ayx46rd+BfaeWBgZPCy
FZiaxtzOo7JR8EboraEaBNJEqyIHnNiorCfiYVYnBn9q7nTzz7NRcviU33DZ
C7D6/OCaAzGITOt7xwK9OsCmxmbblUND6JFFaW8GuwcwLgTRM2ZHkPmZDa9/
nN+A5IvWbVRyFPV72i+d5LwBLoO6LoK+o2gjbktie7gXxIxUZ6cNjyJVdy2t
usW3wL9i3EaVNYbCcpMD1Vb7QSuOHauK5yIR0aMfd3cHgZWxzPVzrjzElPyh
7g/IAVcVqDrdETxUIJ+a4J7MARWvm0MU03mIQb4TfyYwBDIWazZ8mnjI+WQ6
I5QyDJaI0qBL9PeoNPF92KjoCOCvMvaR6n+PzJazPzfIcMFjbfNWMb1J1ORx
KOYAkws8QjcbX56YRKYdrN3kTC4o7SG1AlwmUZFddMp9wXHAZ3v+29jESVSo
9HtOaPw48Kgtru3qnkQF7UKP+UJ5wIoaBUx8P6D/SOL36mcnQMoJF05WyhS6
VW5kFyI3DdyCuJ2hD2aQfYK7q0ziAkguv9vl4z2P/FyoLeWWy6D8n0693ZVF
dFWafPqUfx2U9sX9QE/6hK7tiNeJSn4B0urumnFCy+jHZgnHYPFdcEVnj0nj
xRU00DM/V+jDD+uZ79a/lK2igAED/fILgtBTSqCkdnYNVS5wQ4KsKbDq+s8P
RYkNxFuS/7lWmQpjHW3OJahsopR0Q4qKCg1GylQpZFluoVHDupSTu6LQujqq
0dH6CyqNls/IoIhD3xdUWqrHNnIto/l4CHwDKVBOmub/3689Rm54qASUTtFV
+uXcDvp+5FVze5gkrGmNMUt22UW/2suPrnpJQY1F7c37Knw4I4PTauwnDSsN
z0THFPNhAdZYaqvvXnjZVbLdic6PHRJy7ZSYMlCHyuVvTuPHThTUn+0kC99u
6a8GCgjgo7J3mLzv5KBC86djhy8J4NR9zxsvHZWHl7WtbkhyBXD+vMOErD4d
7gTp//uOkyBOPJUrnKeqAO0yQxymWIL4QLDdPKm5D9p6FKooGgthwxTbxm31
/bCQdzBIsVIIa2htJVVKHYCzRZWMEHkK7snfRwvbqwjP26UWMzIp2P7mwnUx
ihIca7jXlrlNwVZxImvzS0rwthWH/a+LwjiebisZHq0MVWPXpM3HhTGrMUCd
s6gMA6+n7T14hoonAL5tFaECXSz0r7W/ouKI9KU0jVkVKDS7X7HWXASbObQt
lHmrwomoLYm5GhHM23z7VJenCldmfedm9Gh4OaB+Xc1VDfIvz5fml9Mwr4Vd
oDaiBo/EMFaJw6JYLCOvts1NHX5oOmTFqBPF95SPWP/Vpw7pp8JDgwz3YNk7
QuZzTA24IvWog9m2B69yqqvDuzVg2dnAhL7vxbBEFl9+voUmbPTtXpobEsMi
jLR3nSxN6K2l+pNNlDgOzpot9Tch4SmFX56tixG43NscxZmRkNZnz6r4hsBT
etkjvx4noWPtR2tPKQJ795nsbbUg4R7rtv4OOQI7SaVdk7UloWe0/1CRKoGP
3yIDOt1IyErKmvE1JjBx209XK56Er9bvEUw/Ap8OaLABiSS0Tdpxl/mRwKnG
YhecL5MwzlNFb/gigQWGa39LvkpChZLZEJ8wAq/RBSX+vkHC784jq7hYAnML
Sj6nF5HwJ/76+o4sAu8PXiVKikmYeWQ9JzuHwG7HbLSflXz9M2Fte+YRmD26
5Dtxn4QGI5qXNgsI3HUADpg9JqGfUvuKwe8EpizkfDpbTUKHc0NGlAoCW7ZO
iwc8IaF817TwYCWBn3vePHWrnoQnVoyZMU8IvMmY8KloIOGVXfqb03UENto1
SsJNJOyeNhxWbCBwZG96weDzr72R0cjPTQSuLn73bL6VhHLmXr91tBD4f1L4
TlA=
          "]]},
        Annotation[#, "Charting`Private`Tag$30593#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwtzwtMW3UUBvC70tIHLfIo7Xi2rAWGizFKhiZl9opMIhATJiMyN1cGqKsJ
GxqJQHQVgcxNhA2HxhlpxpZJ6jQ4MZ2bo9IZxtY5w0aggNqS6tIVFwp0lLIO
e75rk5vml3POd84/c9+BHXU8hmFqIx/9R37s1IJD3+4rn6oumx2O2Bx/xqm3
BzZLnzrrJps+8XjIjpRL/5Bt9kIfueyPQS+ZPX7dD+/8+V/0264F9O5meUeB
bgF5NyeC5PzaEj/m2dYwuXG9bwn9bz/PsBErXh1bRt7UQR45f/jj+2TXpRo+
uZc9tkI2/NkQTf7xTlMQeYfHhei/qlglq+s1EpbLD3HvyZIi//bAGpmZ1MQi
T2p6AM8q48iVqxlh5PdZ4Pykk7DrxGI88kxb11FPnktgG7ZJ3mzNZGy0b+1o
Ijl1/hBs6LDKYbtmA5m1XE4ir9k/gNWqHxTki6Jp2DBxVklueetpHplR79iI
/nuHOd/qTCbPLBVEkU3O91LIJ8VWziWPppJ1Rikf+TX1acgTzMHM39Xp8HCB
APe8WJ6BfmcnbPi8TIV7e/2wuptRk195vzQa8zEnOIt8sO0XZSbusZYJkRff
CLdUHIPNt73wxTw35+LqTXjPy5Ui7HOEOetkYrJrca8G94w2wSb9hOb/ugTz
dW9o4SE7bBv8jbM4JwZ5hc9k4X7HOZh5bBxe23NEinpXYTacuwqbeqzwTMdr
MuTdzcvB/RkTnO2nYN3jabF4n7vZod8mmVySbHbrKf/XLic5cWe/B250ecg9
LXVesnqkwwdPh31k9qrQj/4LB+6hnj4W0KvafQNn0v1k8+6HQfjC7kXU5fow
2WvPWybbersZNuKx0/oA2fR7Ho/80d4gbLPK+GQvc/M+9m0fFaA+GRVEXrtP
SH6hfXYV9/IsYtS33AlhXpAghYt2PcD8d/JY8sBMVRj933z5CDn3SNxD9FcN
xcEfDsKu5k/jkX90zzreE5pNYLtGAlf47zAszfePJ8JzK7D6s0NyMv96+QYy
m2ZJIp++NQ/bAl8rUB8p5pENgn4l6gnnYaZn/0Zy0U+SKLJrqCgZdeXrMCtt
TSF7toa5enZDKvp7qvhk8w1jGrlN+j1s63oiHfd9FYbVRlkGWctWCND/XKkK
7puHDTqVGvsEL0VjPvcLmL98Dja8G4K115ZgU4kxE/s6i4Xon5ZsQn+3W8jd
3wZ7RKUi7Jv6C9Ye7IKZhUoN7quRiXFftBvWhr6FzdsrtXhfRaIEeU4H3Gap
h9W7irKQ37QCmy034CueUzFc3rPZmH9SIcV9d8/DtaNG2JS/JQfv7ZuBzfsv
w/z1fTL2Pwa3RXk=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVj2s41IkegF0bTIxLuQyOe39ZKZSG8PvJuhbLrFt0SlRETdkU6cQi6pxy
iyTPstZWW2vRIOmE3MalDLnFuM24jaaopQwacjof3uf9+D6vXshZ+gkJMTGx
M9/4v5OVxRvlPDPtz4TGWsyG2kDKhNK2FsEZ6Nuewup3fgSJY/z5JMEVWD+8
5zCTywTdEyHTSmdTYYTeeNBp+gkkBPV4hwjSgB93RyfF5Rl8NC46ymHegpBC
E1q5Yy3o3PPPFT+bCztCZQ4UC+shPr9Vki4oADn++OwbXiO8kQNtu74iIB1y
uFcmbAJGez6th1kMyq6VA4nrzVDoSD+7yngAVnETCuf4LFi3bhx1E5SCD41t
MO3eATnLWitjbeWQO39o/wXll5AbWCtr3fcYZKePmTj2vwQzdXUjNrMCUk12
1ke6dsKR7O6gJUY1WM/0XJ1Y64K6f9t3OAnqQDpczbtkpgeuh8+9yRiqB2s3
6hOBaS/4uORPc9peQHPL1C71871wUUK0YdXXAEZ6vx2LXusFhQY/zVfMJtBK
slR3keoH+30K9E+MVuiqvHji8McBKDC/8sJRwAZq0L4AZgAHdqkzdFYjuoCd
u5BWm8GBlq9HEsrmuuD63dUFn1YOvHuFoPF3N2hb3IulWQyDpmXS0RjRa0jV
ip5Slh6BcLYT96BEH/DtrmzafHcUxCXY48uUQci9sy/CNpUL7hdY6b1eg3Dz
cQL7TQUXct7W2ZdmDUK3MJm0h8sF4+6ywhCVIehvsYoq0uSB5y+ZR9iqHAh4
/2jD/yce5Fv5jBdrj8DL35Nr+qgTsDtyZMzjOy4sLLE3ogInQZQVRR8N40KJ
+sz9C6cnoamG1BZxjwuJHbaF4fGTYCxJHWpW4EFBosBZu3gSqr2cG3nXeBCx
/Cyj9e0k9L0vzKbGTQDpYJYKnJ+CzfpetPQjU6Bh9ue7vivTEJ9ekXiBmIUW
n5UBs3N80Bl6vYbZH4DPXNzXPSoAN/c2KVmvT9DUZpWUbTIPh4PFB0qVlmEJ
Dzu1fPkInJ1kxoCBCI6q6sp3hi1A1VOHyyL9DUjwufx29MkiVD3fLihjiKOp
sEqTPP4JHGOpl/SiJXGqllmcqrQEda9Xdlj4SyNnMLLyo5EQwlLmtZp2kbB/
ItI403QZWKru57ItZFHtKMWn2GEFFL/PeSuhTEabtdiIWbtVUPJ0ZlVqyONp
wxc1+W5fAKsURqfUKDgusaXk6gERmAVNkjmXFHHQdfiPMNoa3HFfGOFdVkJ7
08+tm63WQUiKqX96WhnDvpRvcdf9CuWVu34sj1LBnKwkoVBzA35OW7rKj9qC
rtF+n2tkxNBlj3nHXPBWjFlNVaiLE8PwV0UvVI6rYrslTVpRKIYJO6+1y/qp
4VbgzBueEseyxlgGOKpjqLF7GnVYHPfuL2y9/b0Gxl8NKZPylcCnmTbmz3dT
kcvKzndql8AstpynuLUmju2hb5VylsRkGp90jaaFx21ttt5oksTIKFr/yDZt
NB94R/D2SmFpXj3de/s/MLidvv1hjRTOpD2fuk3VQeM8i4gMC2nMH5qQSZPU
xRG6a+hkiTSendiI5Sbr4lg4V37UfBOC96Gf7op0cdrGW96XuQltazpbQq/o
YWNVp2yWPQl3p14uui3Uw8iivIePWCSkvS93DzujjwYX7AX/8pDBUy5fPdw+
6CMRsP8leUYGb8tdH7510gADPmsWfrgoix9avmuYe2uAQV5hM1FUOfxR1Tea
H26I6QUe5/Ua5bCy6xnThWeICXkz4S9DyIjxNNdnx4xw8e5zxn2NzdiRsxh2
a9gIbZElH9i5Gf+538KP7L0NX0+8Y6wny6PO7I2CnJ5tyFUzGZ7zVcDRRV1G
ihuB80yHH2hGFBT1uqz/coBA17+CrBaMKUitZNys8iDw968ctRJTCgacr/1z
yptAP/8fOvV2U7D/k/+sQyCBgavOZE1HCrI/pwd/jSDQd3nHcbtjFKwXrtFj
bhKof/K/5U6FFBx7YzCZnk5gVPklGZ1iCq5Vu0c9yCRQ2muQsXqfgjYxeRkD
OQTGRXw+ySylYPWyZadlAYHmMYmqZnUULFuJcPq7lEAVDl8iaPRbbyirn/SY
wGxWcJITj4JzNTWhOhUEJlzv0jCfpqDJpU1JntUEdvNMs8lzFHyw+lv9X/UE
ihLvN7FFFGRx2j1aGgg8Zhi5pXGDgtPPPo6ONBG4J76hcVhcEfXj7ERybQQu
9pqMv5ZWRIfA4//R7/j2v1HT3ElSxGCbGxo2rwiM7jpo3SGriD9TKx56swlc
9bKHVrIi/vplaO+pbgLXxmYGmuUV8X9/2jKZ
          "]]},
        Annotation[#, "Charting`Private`Tag$30741#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVj3s41OkCgF0b93Epl8Fx7ycrhWgovk/WtVhmhXBKVESNbIp0sIg6p9wi
ybOstdXWtmiQOOH7yD3jfhu3GbfRFFlipHE5nT/e5/3zfV6doAjaeREhIaHL
3/i/kxWFG6TcM20vB8eYzQdbo5Qphb1NvMugf19K84Djc5Q4wV1M4sWBrQCL
AAabgbTPB80qRKSCMVrDCYfZVyjBv9cziJcGuLEPtVKcatCSYdEZFuM+CCo0
opbZ1yKtxz65whG5YH+wxPFifj2Kz28RpfEKgBR3cn6I04CGpICmTX8RIJ2y
e1zKb0T0tnxqL6MYKDpXDCZuvUWF9rSIDfpTYBk7JXeF24y2rBrGXXglwIvK
1Jt1bUc56xpfJlrLQO7iqWPXFDtQrl+tpFX/SyA5e9bIfqADmaiqGjAZ5SDV
6EB9uHMnOp3d7b9GrwJWc723pja7UN2/bdsdeHVAPFTF88VcL7oTujCUMVIP
rFwor3jGfcjLKX+W1YrA26aZg6pX+9B1EcGOZT8GBjq/nY3a7ENy2Fv9HaMR
aCSZqzqJDSDbI3K0z/QW0FVx/XzA0iAqMI1D9jwmoPgf8WX4stBBVbrWRlgX
YOYup9VmsFDT9umE0oUucOfRxrJXCwt9eAeB2t/dQNPscQzVbBSpmyediRb0
gFSNqBlF8TEUynRgnxDpB1ybuF0yj8aRsAhzcp08DHIfHgk7mspGrtea0/s8
hsG9lwnMoXI2ynlfZ1uSNQy6+ckkCzYbGXaXFgYpjYCBJsvIInUOcv8l8zRT
mQV8Pz7f8fmJg/ItvSaLNcdAx+/J1f2UKXQofGzC7Ts2WF5j7kT6TSNBViRt
PIQNXqjOPbl2aRo1VpNawx6zQWL70cLQ+GlkKEoZeSvHAQWJPEfN4mlU5eHY
wLnNAWHrNRkt76dR/8fCbErsFCCdyFICV2eQjK4HNf30DFAz+fNDf9wsik8v
T7xGzIMmry+DJle4SGukZxNmfwJcxsqR7nEecnFtFZP0+AwaWy2Tso0WUUCg
8GCJwjpYgwEOTV+XEOuANH1QTwDOKGvLdoYso8rXdjcFujsgwevm+/FXK6jy
zT5eKV0YGvMr1aUnPyP7GMoNnShROFPLKE5VWEN1PV/2m/mIQ9ZweMWSAR+F
pCxqNB4kwYGpcMNM43XUrOx6JdtMEqqcIXsV231B8t/nvBdRlIbWmzFh8zYb
SMHdsblCTRZe0kfV+S5fEayUG59RIcNJkd0vbh0XIBP/aWnWDXk47Dz6Rwh1
Ez10XR7j3FSAtsarLTKWW4hPiq5/fUkRhnwt2+2qvY3KKg7+WBapBHOykvh8
9R30c9raLW7kbugc5b1aLSGEnSxM2xcC98DojVS5ulghHPquCCmdU4Zt5lRx
eb4QTjhwu03SWwXuAaxF/YvCuLQhhg7sVWGwoWsaZVQYHz5W2PLgezUYfyuo
VOykCH6daW365hAFspuz8x3aRHAWU8pd2EodTljQ9og5iuJkKpd0m6oBzx21
3nO3URSHR1IHxvZqQtPBDwTnsBguyaunee77Bwxso+17Vi2G59LezDygaEHD
PLOwDDNxnD8yJZEmqg3HaM7B0y/EccTUTgw7WRtOhLJlx013YeB56qdHAm04
a+0pe5KxCx+t7mwKjtOBDZWdklm2JHwo9WbRA74ODC/Ke/a8mYSpH8tcQy7r
Qr1rtrx/uUngi07bbi6fdCHhe6xDek4CP5C6M3r/gh70XVUv/HRdEn9q+g4v
vNeD/h4hc5EUKfyj8skobqg+TC9wu6rTIIUrumoYThx9mJA3F9oRJI1hPNW5
5qwBXHn0hv5ETQa356yE3B81gEdhs6xfpwz+5zEzb2nPvbBn6gN9K1kWa83f
Lcjp3QvZKkajCyfl8PiKNj3FhYCLDLsfqAZkLOhz2vrlOAGd//K3XDYkY0oF
/V6lGwF/32apvDAmY9+rtX/OeBLQ2+eHTp1DZDzw2Wfezo+AfhuO0ur2ZMxc
TQ/cDiPgyfX952zOknE9f5MWfY+Auhf+W+ZQSMYTQ3rT6ekEjCy7IaFVTMab
Va6RTzMJKO4xTN94QsbW0XkZgzkEjA1bvcAoIeOqdfNO8wICmkYnKpvUkXHp
lzCHv0sIqMTiiviPf+uNZA2QXhIwuzkwyYFDxgvV1cFa5QRMuNOlZjpLxkY3
diW5VxGwm2OcLb1Axk83fqv/q56AgsQnjUwBGTez2tyaMAHP6ofvbtgh49ma
pfGxRgJaxOOGUWF5rBtrI5BqJeBKn9Fkj7g8tvM79x/d9m//O9VvO0nyOND6
rpr1OwJGdZ2wapeUxz9Typ95Mgm44WELWqTl8a9fRw5f7Cbg5sTc4FtZefw/
sSJpGQ==
          "]]},
        Annotation[#, "Charting`Private`Tag$30741#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0ntMW2UYBvDTG1BKywoF2g26tqNbwkKM+4MYFugpznUxXiZoVNiWtkBm
xAiToa5ZoTJY5kTZFI1AwGJwy8AtGIOyLMOCWQmCc8Yh02ltKxM2Lq43WRkF
+z6lyUnzy/O9l+/kqM3VxZVchmEqog/9R3/2ZItT1zoa6j1jmPouagfb+Ltu
n8eSMyDxwvdqPeT8Tt8MmWktuUfueGTuLtlufN4Hl1YvIe85HNL11hQsyubv
k20lR8Pkq+x+P/LBcxFy1z/zAeR5/QwbdUTqDcJxNVxywYQrFJv3Cx+Wly+T
3d5vBOSs04uw8Wh2PPnP69cekNnAB8KN+jD65faI0P982wr86FsS+MfZh/CM
P5l89b0Lq7iv5+4m9H/WGsH9bo5LyV2LT66hf+FcCnw7bx3zJbmpmHfmddhR
9a6MLR7qLnyxiHGQFc+lketN7bC9c086ebg4ArNdtgy4qI1DVulOyslK+Srs
vvSFAvWn67jIxyybyWt1YzGPntyCef1aHuZNtmTC0i7YfcIFH2pwxPJPdyth
10t81MvW4bXzF2FGEdi60U+AnP+JCvvdcsJGoUKNfcZ3xyGfeRxWlrwGu6+J
Nej/8wOY/XAnXJizKR55xzl42NoEqw5Ub4MXmhPwftTX4W51KCH2PvZmo779
rJBs07vh4abyROTJVVrMK5OLsL/LC3c3Doli9y3bjvOBiiTMP9IXc9skrHoq
bgfOZ+rFuF9RPTy88j2surw6pvNYZOmFb0/oyPUtv+mOFCSKpGu3yG6ucEY3
pGyu1Nxwkx2ByAK5efNHd8jMqaAPfoE3h7zpeIh8p7JsHl4aD5Of2HV5Cf5j
MKI70DpqflrrI9sTnQwbNXeqz4/5A29wyd7prwNkW62TRx5tsARR3/eTAH7z
fohsbHg5nlwUcPxHZg/lC8maYPcy9tNYk8ift0+E0Z//q5hsThlcQX//QDK5
8XbHQ+T5KdKNfBX9Gs0w94QfdnxWmoL9vvVEkPvKU1F/nLuOfhatDPvcnITt
2t409pLBxMkeYVjad/ZKOnnkYAWHbGs5lkH2fDwBO/ZXyZH/kM9lY9+Tgqzv
n4bt/87CakcQVvk5W3D+bB0P9e874XduTMacdiWTbFrYx0e/ab0S3sMVoD6S
txX1uw7C0e9Zhfrav2Dj383wyFeGOOybq1YjDwZhpscAe8IZ8djPMAKbpmww
W/OMBvc/JU5A/Zf9sPoxG+zOOrwN/V3HhOg3uwCb9uYmwjsN2TFfhN3zblif
1CnC/umvatEvy5yE89UeuIfHiJGPlW5H/St9MJtzAeYsSySwUbAD94nUww6r
FVanrkjY/wF+NU95
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVlPk71IsegDW2YZj5ImSJ7N+Yp6Y6utLJ5zM6QtlKQpS04KhDUUo5Wg5S
ZBlLR3UVsmRX1u6xRGhKIRq6DcdYBpNjp0J1uz+8z/sHvM/z6hwN3HeCIiYm
9tsP/u+muHReX0+ChfGW/QUWKz/DFYkkpfvCAJAsuWyj1FQAUvka5R7CcPhV
S2vbrYwnIBzbOvWEeR3qKZC5mVYN3BUvCXNhHFwTvaRlNf0HDkQ/lxtwTILX
L3bF9cjWg7Wiu2oW8zZY35tKbBd7BsaG15jrhekw5dexEJ3ZBHS3GI0Q7wxQ
VU/pfND1HKT+/e5Bj2MWvOkPom6bb4bPhv4Fd5i5APMHvynIv4AP5kkN64TF
YPpyVXFcyysQ1U/qsv1LQTxSb3NORhv4DCaNnPEug1/ME/P9Ql6Dl1G/f5fj
E7h0+PLWOXo7OJUFnUtlVoFxkfitSPFO2NJ896amsA6cDfqanuZ0Qeko2tv3
1YPm98nisfkuUJGckwb/BjB1dCv6yO4GjtGfLwO9n4HreMP5h73dEHNq0LHT
sQkgw7JffekdhC2GHExmtkKUXSG1a3UveMk+CFQXvgEas6X71tsPwC/kb19z
qh1MVE9LjdL54OaoRlWZbYfQ34P7n+3mA7nbtoN6uQMquTMd1Gd8WBff6CcR
0wkjc0t2Jnl9QKhVpC1ndkFY0TT749G/YYZ5Z3n8bQ84c6P8+XsEwAqvFowp
98LQ9JZS2+MCCGjntY669cKh1T5vU8IEIDqjlDzS3wtW4pLtbYUCGKyMZQpE
7+G+dgWviTYIb/HyoV4KHw706FnseD4I7saPvY6pDYDuJytLQncYVEQzN/PN
BsC/696JFtNh6H60qXLGdQDSPl7V87cdBof1ZXJXUgfg4j+ndl46PQy/kKU1
95QE4GtHKeLWDgPLsFiJJz8IguNzkmyXEZDSzW+1oQyDKN7zesMFITxWy9y4
4eMo+JL75R3SxuAEbL1dnjIFpc7xZh9cJuDSXxU8m7k54F8SdQsnp4CxY8i3
uPsTnEzNjXgVPgMca28nkFmBvCzelnfSc5BZ6UZRVRZDbvuRBOcz83Bk+82/
ZSgUTD+/KUGnbOFH3+N+nDUSuGxfusF3ZREeo/XZVJoUdpoa2EYafIbhG0o+
3HlpdPq6mrEZvgB9TbQ4R1oWVeof2BX4LoHWGil93iINQ3aPZS2cXQbDQ8zp
EgYdg03GyiU5KzDYs3avJ4PA2TbLwIWsr6Bvnn9SS1IB6Zu28ybTv8Fgnaxn
AUMRfVjToi/53yFpZUo+hKqE6i/npKecxLDe81EKTWU13ri8zuxf78Swaqdr
QrWWMjInR7cMuqzCzKEbdlnKKkj7J7xa+fUqpOYk9LvpqOJZB9d9+fYU9NbR
3GynsQaH0qra9jZTMErv3ucDhBramO7QP2sujoY208lMdXVkr89ojqsRxxoD
7iwoamCsxsRXX5YEvjAIMdTS1kS9iNDJ8jIJzCxUfa1ktBYDHnYePLpJEgMn
dphar9XC9J3Z790fSWK1g1mwFamNtUs7EvOYUrhU7lHTQKzD+uWVr3fzpPBb
ZEqQ6OY6PB3srZejJ43oV5MaytDBsuCyYLJAGpdz7t81itHB6uKfaxtMqDi/
GEjbrqCL429dOH01VPTJonj+FqeLFhvPXgxhy6BFEsPHREYP74fmll7kyuD+
ZKkPDnF6yGIEcMaOyOLQTD0rUVYff/LqG/aYlcXSI8dmzBL1cZGxf5yeQsMh
xasnTykbIJ03W3bHXA7jdbxb6hIMsLiybtfof+UwlG0SG6JiiGOpi9c+x8tj
X23VZvskQ/RxpvOeIh1zfq/jlMgbYV6rO2XbIh2LHEoOnecYIS+in5vWzMAN
YUdlDtNJVFWYzjaxJfCa5V3r6wSJ03+8YVP2EPiO2h1ZqkjiRm+B+3s7AsNS
rCjiqiTSLHu+RzsR+KqYXM7VJnEb65zJpCuBfoLJiRkWiZ2P2606fAjM3HWp
I9KZxACD1MqFCAIX5crpJS4kZnIwiB9FoG3XhF2vK4mUqxvKm6IJnPY6zDX2
JPH6rFFbUiyBEMpubD9O4lzFiIt5MoH8AulytRDyxwVUNDOyCGQF4azlBRKF
8lbHE7IJ/MMslHXqIolLqGd2JZdA42ZRYV04iee+7IvwLiDwQv/r7GPXSXzl
urfa+AmBbQ+lhmNvkJj0/JWvVgWB2idBtzKGxMi2lmzFKgJbPpWmUxNIHG4t
fLPylED1unH+Jg6J+lGOT2f/IjAgQlfDI5lEwblB0/E6Aht3e7hHpJLYsb2R
PdBAoLJC8u2iP0ms5e7p72kk8H9m/Rnh
          "]]},
        Annotation[#, "Charting`Private`Tag$30889#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVlPk/1OsCgDW2YRjfyC778o35lOXoisP70hFKKAmlpIQjh0JKOlqOpUWW
sXRarkKW7MraPXnfCE3IPnQbjhljLDl2KlS3+8Pzef6A5/N5tE6GHTxNERIS
+u0H/3dzcjZ7eDDVxtDsUInNxs/oqki63CNBKBCtuOIo11yCxIpVq48KYsGv
6uq77uQ8R4LJnXPPGYkAUUCuKa0esTZ8RSwFyeD69FtaXvN/0OEbr6VGXdNB
55s9yYOSCDnIeivmMe4Ch4dzaV1Cr5Ch/nXGNkE2mAvqXrmR24zoXrdVo/xy
gKJKZs/jvtdI7N8Djwdd88C7kXDqruUW9Fk/uOQ+oxCA5SPfNku/QR8s07Gm
oByYv91UntzajqbRrLZtcCUQjtcxLcjpQAG89PFzflXgF8u04qCoTuRrMBLc
5/ocxBy/snOJ3oXcqsLPZzHqgGGZ8J144R5k1vLglpqgEbjrDTe/KOhDlRNw
//5hBNS+z5ZPLvchBdElcRCMgbmrV9lH237ENPjzbZjfK+A5hS88GepHt0N4
rj2uzQDk2I2orA2gy6tRRzIYbSDBuZTat2UI+Uo+DlMRvAM0Rmv/nd4PiFPK
sVIK6QJGimfFJugc5OWqTFVY7ALRv0eMvNrLQeRep27qlW5Qy1ropr7iIM2U
piCR2z1gfGnN2ahoGBHKNffWc/vA5bJ5248n/0YLjPvrU72DwJ2VEMzZx0XG
sfXcSfkhMDZvVunkz0WhXey2Ca8hcGxLQG/mZS6aPieXMT4yBOyFRbs6SrmI
V5vE4E6/B480atjNNB7qhVeODVE44PCgjo31ax7yNnzme0p5FGh/srcjtPlI
YXrhVrHFKAjue3i61ZyP+p+a1C54joJ7H6/pBDvxkcu2KqmrWaPg0j8hu2PO
8tEvZGXDQzkuCHSmlLFe8pGxfrkcW5oHuP5LorYe40hMu7jNkcIH0yk+ifii
AD1Tzt2x/eMECCQPSbvcm0Snwc671ZlzoNI9xeKDxwyK+auG7bi0BDgx0/2C
2TkkYz0WWN7/CZzJKoxrj11ATAc/NyCxAYry2GYD4ksot9aLoigvBFldJ1Ld
zy2jE1a3/pagUGD2BZNUraqVH339g5hKInB9f+X2wI1V9Aw6RGbRxGCPuZ5T
vN5nxL8pF8BaFoduX7fImIIviK50Q5gpLgkV0GPnksA1pK4kpstepcGovZN5
K5HrSP8YY75Chg4jjCarRZkbiDe49YCPDAEXO+zCVvK+Il3L4jPqopsh3cSK
PZv9DfEaJX1KZGRhgPH89Jfi7yh9Y046iioHVd4uic+5CWHk8zSTprAF3ryi
afGvASFct9sztV5dHjJmJ8x4Hptw7thN5zx5BUj7J7ZevnMTphakjnhpKcJI
F8+Dxfsp2E9LzdRZVQmO3avrONBCwQk6Dz8fJpSho7m1bqSlMNZ3nM9gqKhA
2205LckNwrhBj7UIZFVhkurM10BjEfxGL0pfXUMN6sRFz1ZXieDcUsVOOYOt
MPRJz5GTJqI4bMba3GGrOszenf/e+6kornexiLAnNeDLNeu0IoYYXqs+2oAJ
TYjWN74+KBLD3+Izw6dvacKzEX46BTriGAY1ZEXLaMGqiKoIskQcrxc8emBw
WwvWl//8EhtR8fJqGM1qszac6vVgDjdQcUAexee3ZG1osyPyUpStBLZJlwkw
ktCBj6ILKy+xJPChDLEPLsk60FgmlDl5QhKPLSDjNEld+JPvMP/ooiSuPHFq
wSJNF67KHJqiZ9LwmOy1MyHyepDOXqy6bymFU7T8WhtT9WB5beOeif9K4Whb
o6QoBX04mbV6/XOKNB5+WWe6P10fBrjT2S8gHRf83siskDaARW3elF2rdFzm
UnHsAtMAsuNGWPdaZPD2yycljtNJqLh5Pt/IicDX7R44JBIknP/jnS1lH4EH
qP3xlbIk3OHH9X7vTODLmfYUYUUS0uwGv99wI3B7ObleqEHCXcbnjWY9CRzE
nZ1ZMCZhz7Mu++4AAufuiemOdydhqF5W7UocgVelqukVHiTMZcJwTgKBnfpm
nIc8SUi5tr26+QaB532Pswx9SJi4aNCRnkRgEG3b1OVPwqWacQ/LDAJzSsSr
laPIHxdQUMvJI7BxOFy0u0hCgbS9f2o+gf+wiDYOuUTCNahjcbWQwIYt06WN
sSQ8/+VgnF8JgS+OdOafSiRhu+eBesPnBO54IsZPuknC9Nftgeo1BNY4A7Rr
b5MwvqM1X7aOwK2fKrOpqSTkt5W+23hBYJXGKY4Jk4S6Ca4vFv8icGicturR
DBJyz/PMpxoJ3LT3qHdcFgm7rZpsRzGB5Tdn3C37k4QvWftGBpsI/D+YRVBh

          "]]},
        Annotation[#, "Charting`Private`Tag$30889#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1G1MW2UUB/BbWCkUKAwpSIG2UEoLiCyWKS/ivTCzF9gcTKqwqHQMonMS
gnaxMjJqFB0Y4QMyNFu26rZIgPCBaFhkGVdrXIRkxmGZJG6WyUtYJ46WdlI6
sOd/bdI0v57nf85zn9x70+qbDzWGMAzTEPzSb/Bj7Tg8xXa4qioDVb9P0B/V
f91m7V793jDHXbLTsjxPfuM12QJZ/ZZlhTxwPu0e6nnjbnJ41NJ9srWr28fO
tcavjdU+wPojdj/ZfCfZjfUl723C7R94MC9jQMQF/c3idS+ZV3aEwjN3fGSu
sk1MXmNO/0u2jZ+RkM3VgXXY91EEOf9j3k821Umk/+dhZuFINOqlZwPYn+po
DPpdVGwif0wZi34SC+xclm+HF1q3UA/VxXEtJdJ7OUUMT9fjuguXD/XCvCwl
HvW6ChHqBTo5efC5YZj5UpdAlraIQuDlZxLJXSHNsMnih6XpN4V6kiEJ/cfb
QsnWzDIFebL+N5g/vi+Z/Gb7k9uQrz6UgnpWj+Ck+lTk92/AfHu4EvWJUjGZ
++kVFeZfFoVhv335aux3plOwrx+enPTBvNmQBhdflGB/9kuwdHgVduZo01Gv
LQ8n2/zn4GzXGMzPZWnQ33oyAut798Dlmguw2vYznB0fL4WPvpAB13QL9t0S
nCuJRH74sBbnfb0JZh7KM3EePf1ROK+2HbC0fQI2NS0IXuFk8KvP6mDGAfOV
Lh13RSm+XCyKxbzUY3pyo7UWNtmnp9iT8SM9XytnWepfMDNLbnaM3IZfNC+y
JdJbicd3z5OdbezfcOXAElndfcJNHmt52kVmckd9qH+66x/k8/ZvsKoOV6Sh
0022aec3yS79qAfr7Q0iLuipc6974avB5yPonH0eH4v7oVNMdv248JAVnk8J
ueKCaJ0V7vcI5B9l+5EvOxiJ/BXzBuZpCqOwvik5QDYV/ylDv9X+R+i/44sY
8ie75gSfjtuOfjcObKFflyqO6/nBa1wRMxzNV+U/Rt6ptcHMtQewvCNBROZW
NXLytw0O2DmWlwB/qAtBfu2JRLLjpgV2Dhc9jvofTtg6xiSRT2SUhaJeUqjA
/AqP4N49yciPVG7D+vMHUlCvG4VNTxlTYYtWLNSjldjvzk7YFKhRof9yVRj2
/3yRGv3ckzA/cAmW67Mk5OD7Iw397Kdg5zt9cN9XN4T6UG46/Is1HPnpIVhe
mhKB63Wla5D//F3Yeo2FvUVnYc4wLVj0khT7u38wA/nFWdiZ+StslNVEYp4i
T4v1hqswX+sQvDUYhX5aYybOc7A1GvMLlmB55ikZ+r/foMN5eApjkJ/8Hjau
fwfbPmvUc3vn/Iq3X47l/gMk7jZH
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV0Hs41IkeBnDkfmumMMVMjAy/VVpERZrvN7mr3XW/Va7tFpWOtNqQ6+Gc
UihCuYRRUh63kMOUdT3amHEnizG5xea2I5I4zh/v8/75fp6X7hNof05ESEjo
0lb+36GCWQX2chIzg8ckbnQwoWaxtfciLRBqEi0pmVHFIJXdvUHQIkC5m2Jl
M/wSHuV6t7U7xcPP7Az+hzs1oBfstlOClggMl7Y5jWg2+OUXHlALug+N+tED
YhH1UJLA6q5zSgO/wfSwozsawNwzk/aZmgPtSn4AI01gpXHS2zoyFxbTfmCH
qbfA3K63FZSgfLiwLXVE16kVjERaXF86PYUy25LO6sQ24PSw8z5RS0BI1T1q
M7Yd/jOetXYmvhSG1uibXZc6QG70z73mkWVQ8/qyy+yPHKjodv91Z1AFCA9r
z0hEcWGjzlml1Kkafot2pfEVuiAl8YdzH6lvQKDFuuXG7wFBk4XltHQ9dHfK
mQQY9gLNdHLII74eYplxdIjvhSsmDLETkb9DrsV2Dz+tPlDUy3chBzVCXogp
b9G9H7yUc9aLt9wxtISiU2mDsPLXA4spKgecMvrGa5OGIW87s6ornwM9JT1T
fdxh0MxY2uGpyIXW3vaEANIIcGszom0yuRD5qrhL/u4IMISnvelFneBYkzWS
HDMKHbdj1TjN3cAaEKmaecEDtVx2lva3fvjrjapoixcfruknOz3GAfhlb8qj
qht8eNvoJ6cUOwDgqLIUk8KH4EmZcGGZQUitukWvbuVD2z730wO73oOuztXM
u/s/QFDVZ+U4gz/BR+t8XuDCB+BPUN4tGPIgjDV/ZsB3Au73Ol4JdOJBaDE7
oPn6BJg1JyvMBfPg/ceciew7E/CEJXNmtoIHvJWoTUr1BFzw3fw0oTcGVT1h
bwipSVjgTW4f0uFDtYiKYOHZJGwOVTo0M8YhQu5VnNPoFFC7HIYyFKehtEb9
gS59BhTKPw6/ap+HY/tWJf+gzIHccth/i5QEwGxZa5AXLMDQ4oX9SxsrsK6S
Ppp5bwlKlVPOrxqvg3n5J/cX+gIoyzbkZOoJ4T6WVqJ82TL847HD/Be6CPqE
f/anbFsBgyNJoYdMRPFZkG/VF69VOI2bCSX64sgxfb0R//ALBDebqVioSiKb
ILckNK5BIq9Qsc5QGusrrCSmvn4F8kVIvUzIYtNwUp0H5Rs8uCOIFDKXRw8Q
j6Of2AAxpXpB/z4S2owRudM+mxBEy5k9tZeMNyrrWxiGQsgLvJNe8f0ObIkp
yyv4XQij1hT+dVh7J7YaccRnTIVRg/tc57mRAspai0eatwsjc7w4WcdMEU+x
Nl8UO4jgbV3rIx0mSnj1/NHPUlwRfN/6d8pZGwq+VJTKFXbehqfTDhvIWezC
h0cGZyO6tqFzwWTyW5PdaG+idPfgSVG022AVhFgpI4vab0PiimJE4vpXU1MV
bPhptUnbVgxLAnwlN36iIk3s08dRrhg6xxl2t7rTkLmqt1jkKI66g495JfZ7
0JOv88iSK46yISqseE9VbD0oY2fvIoF3n1B6mTpqKLMn3u52nwR26bocPl6o
hjGW4QkpjpKY5pUdXKtDx3fFxvqUUUm8tl+/26yIjhqd4aYmPlLYk9Uua6Gn
jm3tu693LknhyeeVvziXqKPNQtLxi2HSKOTaTZ/T3ovNDryR3eIyaFi0WvWt
dC++7s56IciWwZh0/0vUAxro1VZo4qoni/b7xzfKKzVwPWeKntoji2c8789z
jRno/29eCPWGHEYfSBTeqGJg7J6A5b7d8qiVf28u75gmykUd809vl8fJCv66
c60m/jG55u0dth3HfM/73zukhbKcq6WJFBKerlkuN6/TwhDPi6ZG4SRcLOJQ
JY0IdG+7a00dI+G7SGNdw6ME1sSddZvkk/CJc8EJn2MEln7f3l86TkJ3kVD/
uuMEvj+SSLecJmGDm+arKzYEhj2dnr8+T8J7kuEOgx4EzjKelS9+I6HBz9q3
im4SuJzOKjVSIaO8SWpWf+TWXtRHyg4aGafJQmWiMQQefHj588weMmaye/vP
xhPIDfNQzlYno6hiFGNnEoFVtFoxaW0y9jb214fmEqhhrfF89QgZSzNMewrz
CXRr5hUOGJPxVmDxVG8BgfA0Qr3GhIxMlRh53SIC7ymm3gpFMj4JOnB6vJzA
lL9vHhK3ImOkVUYguZLATtdilRlrMrrvEY1hVhOo9x0josN2y/t28Fl6LYGa
0t81pP+45c0xYzezt/wVdnk37cjYcK2Eu/SGQP8v68LnHLb8tsrjqg0ELjX8
NmbrRMZf6f9cOdm09acB5fhBFzL+D/YgJBI=
          "]]},
        Annotation[#, "Charting`Private`Tag$31037#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV0Hs81OkCBnCE3JspTJkZGgy/VVpERdO8b3JXuysNhXKpdotKR7XakOvh
HMktQrmEUVI+BkUO0/uu69E2DOOaxTS5xea2RBLH+eP5PH8+38/D8As8fl5G
Skrq8kb+3yELU+r8xWR2lphN3Gpjo5q5lu5L9EBQk2RPyY4sRYq5ojWCHg60
RBQHp8EX6GG+b6uAEwd+5mdJPtytQabXT23bTE8CTPfWaf0oPjpXWLxnZ9A9
0GAW1ScXjlFZAldUx8kA5/ozQw9urUe23tn0z7Q8INA8B8BQI3LQP+rrGJEP
5jJ+4IfqNqPp7W8qKUGF4OKm9CETTguylGk++YLzBJQ7l3VUJ7Wi9i5+wSda
GZDS8YhcjxGg/4zkrJyO44GBFcZ65+U2pDr8p55tRDmoeX3FferHdlQp8vh1
W1AlkB40mtwcKURrdW5UHqca/BZ1ki5R70RpST+c/0hDYMGQG39K0oUWGu3s
J5QwEHWosgIsuhHdemzAMw6DGHYsA8R1o6ssptyRiN9Bvt0Wz3OGPUjDtNCd
HNQACoKtxXMevchHK2+1lNMCoukJJccy+tHSX/ftxmntgJPVM1KbPIgKtrCr
OgvbQVdZ13iPcBAZZM1v9dYQgpZuQUIAaQgJa7OinLKFIOJVaada4hBiSk/4
Mko6wImanKGU6GHUdidmZ3uTCHD7ZKomn4vRznx+jtG3XvAX0pFt9pGgG2Yp
nEewD/yil/aw6pYEvWk4p6oZ0wfACep8dJoEXR9TDpNW7gfpVfGM6hYJat3l
4dW3/R0wMb6Wnbj7Awqq+qwVa/4n8DO8UBA4+wFJRilvZy3EIJQ7c7rv7Ci6
133iaiBHDEJK+QFNN0eRTVOK+vR1MXj3MW809+4oesxVPj1VKQbipch1SvUo
unh2/dOo6XtQ1RWKCMUxNCse2zJgLAHVMtSF2adjaH3gpWsTcwSEq76K5QyP
I1qn60CWxgTg1ejeN2FMIvWKj4OvBDPg0K5lhT8o00h1MfS/JZoLgN28Uq+2
MIsG5i7unl9bAqvUzOHs1HnE00q7sGy1CmwrPnk8N1tA5bkW7dmmUnAX1zBJ
rXwR/eOR68wXhgz0C/vsT9m0hMwPJIfsY8nCp0Fnq774LCMvuJ5QZiYP261f
r8U9+IKuN9lQ7XQUIJ8gNyc0rKAkcbFGnYUSxJUOm8e/fkXkSyD9CqECGweT
6zwp39D9uwsRUrZq0BPIxzKOrCE5TbzQu4sEnd4T+RN+6yiInjd1TI8Mb73E
zUwLKSwOvJtZ+f1W2BxdXlD0uxSOXFH/136jbbDFsl1+0loa6wufGT+zVIcq
jvIRtgJpzB4pTTG20YDHuOvPS11l8B0TxwNtLE147cLBz4pCGfyu5e+0M04U
+EJDMV/abRP2ythvrmq3HT440D8V3rkJuxWNpbxh7YDHWZqJe4/KYpc1blGw
gxbk0nqdSEJZHJ60+tXamgrrf1puNHKWw2UBZxXWfqJButynj8NCOewWayFq
8aBD9rLpXMkJeWzS/0hcdlwbekuMH9oL5bFKMJUb560DW/Yquxx334wTH1O6
2cY7obJ2nMudns2408R9/+HinTDaPiwh7YQCzvDJvV5rzIBvS63MKMMK+MZu
M5FNCQPqd4RZs/wUcVeOQMXOVBe2Cnbc7JhXxEefvfzFrUwXOs0mH74UqoSl
TooY00Z6sMlVPLRDXhlblCxXfePpwdeinOcLuco4OtP/Mm2PPvRpLWadNFXB
x3ePrFW81IereeOM9C4VfNr73ozQign9/y0Opt1SxVF7kqTXqpgwRjtgsWeH
GjYsTJ0uOGQAVSMP+WcK1PBYpWTVrdYA/jG24usbugW/P3vBP3WfIVRpv8ZL
opCwV81ihW2dIQz2vmRtGUbCcyXtNAVLAnq0JjrS3pPw2wgrE4uDBKyJPXNq
TELCj92KjvgdIiDve0Evb4SEPWRC/OsOE/DdgSSG/QQJ158yeHXViYChTyZm
bs6QcKpCmGu/JwGnmE8r5r6RsPnPRvEltwm4mMnlWVLJWI2VntMbsbEX+ZGy
lU7GE2SpctloAu59cOXzpDYZZ/O7e8/EEVAY6qmVq0vGshqRzG3JBKyi18op
GZFxd0MvDsknoL6j/rPlA2TMy7LuKi4k4KkmcXGfFRnHB5aOdxcREDwJ161h
kTGbGq1mUkLAVI30+BBIxo+D9niNVBAw7e/b++QdyDjCISuQ/JKAHSdLqZOO
ZOyhLRvNriag6XfM8DbnDe+b/qeZtQQ0UPquPvPHDW+eDb+Jv+GvdCm47ULG
9TfKhPOIgP5fVqXPu274nbVGdOoJOF//23tnDhn/yvjn0tHGjT/NKYf3upPx
/wAnd1qS
          "]]},
        Annotation[#, "Charting`Private`Tag$31037#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJw11HtMU2cYBvDTUqAXoOVSKAjlgEBxBHWsuuEmPSO7sI3JKOySdZqiQtSO
OBpInG7Qf2RM1A7DopFA6rxARiVOUcuWQYOYSSjJLriRKY4qElyNgFK7FSzr
+xxH0jS/PG+f9ztfWtK27tZXChmG2R580Xvwz3LOPaxL3e9xz3VMDJB3tEzo
rIPed8ZfnSY7m36dJivsNffIzIV9M+RzmfkwVzAzpyty7z1miJ1D3r/WS94h
r55H32c/+8lNBW8uIA+MBZCPmL1ktuKKgAs6e1X/Y/T9Ei2ETYdgo6NDRO4q
7/0XfbqLYWTx9Ak/zmdgJeSijAOL5MnO12TkJvfNJf55oiPI12YlAbKtWBmF
PuESbNz+ogJ9m4aWsX91QzR36pONrSk7GSflVWdiyOWj92HuuUfwUHKzgMz2
LcWS43bnCcm25CQl5sdPwM6Goniy9vQDPrftSUD+zIchyD9vVz2dhxk2JpG8
UNUogiXSJPRXh4fiPPnaFeSxwDaYHa5MJte2fwc7TV+mkHvr0sPIlorzauzP
vcP35+alIt+QF+7k75uF6+2w02WH4/ISxOTJr/Vp2DfQDnOCUVh7cJH336J0
5Ieel+D5/uqAW09PwNzq1JXoFxdLYXMfXKv8kbf/7Qz0Hc6S4XxXS3i//A1y
o16Tifu4II1AXmKFy3faYMtlNgv9sx9EYt46CNfmV0bheXyP4AV7N2xcZdLg
vIZSOX++ZQ2nd6h3ZUcp4PmT2eTjd+pgxlrm0rn3xm3JUt3U8d/XG7qajdI1
yy432XJ4aposz918m2wbYmfIJQ9C75GNhQVzmI9X3iczjcNenUO933elZB65
Q+0nH7Ufe0h2NnYuw4mzC8irr8K+HLMX+57cFXBBX15ufwyvKRaRffqTPuz/
XRtOPvr9e358vvEFCfmP8Y8XydzWr2TI2U1LmBe3RZLfl6swb2u9Cyf82fcE
86P7FNxH1kGZ51mGo76uumjyW0w/PMl0xJA9/iQB2fmGKxb5b80wt+4WLJvS
846tUMLDvUKypcYQTx6ZWhsC3/4iAX1H9sBsZ5fq6T4+rzAnkrtf0YjQ909h
EtkU38Xb/OkKzGdUhWJ+ypyMffU3YOO3thTMZ78URmZcPWpyc8gl2NY2BOeM
D/D+YT2L87w7EY75zWfhkYtlYvhWYRrm58/DTsVPsOdS8P8S7us63N2SA9tU
p9Kxv1QlhYvXreTv7zjMXHfApvV+mK0rzEAevU0G93TCsrIxmDsjzUS/ZksE
9hlaYE99fiT6DqRmwW3CKORaJ2w6IpGjb8NDPq8thZmGXRrkFi9sLAxouJ7X
3XWsUcH9//sgn72m4P4DORA2xg==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVz3k81AkfwPHJfYSfo1jLOscPkVZtIXy/zkTOEso9RK7BE8qxoyhht6wi
G6JWRW3YwrO1i1WW8jRyxTrH0YQ0FuMayuw+f3xe778/GsF0j1ABCoUS/W//
d7kjyTD4RJ6laeJi3/H/WMIJp9+TwykxkB/4KshZ/xGkFOyVJSnfgnNyWHtO
WR1UXMhc2p5+CVqYLnfA+inkmtF9RShXIH+SbfZSvxFMeQZT/OZ8CHFTmzZw
+QMMPDWLPjEKwUdBd3vDSAvIS0kJrPJLYdN19lhkeStk7Dt/kscqB/EnLtLs
8T8hbXKzfq35DjT8aS0uTrRDrOVixDLjHtB7szs5Nq/Aa3W4j8N/BKGVl5PC
DZngVnHc6COrBqTS7boz5TuBWjVju8KqBdqDt428pU5Q86KVcZsfQ7exhYqI
WxfIPfE+tsBoAGWdhCEdVjfwImyaZvmNkMM7mGRc0QerLelzM383gW7q89nD
q32wpNSkNMNqhiZ9F33y0FtIpJWYcll/QH/UXfvT7LcQK6t4fbH5OTA7hWI9
dwwALXr74XlGGzy7yByfdRwER+ra42k+E870fCzabzIKde/akX++EwKtfln/
LmkUVCuKOncKvYGSgNkk/4ZROCuruqIp1AWvHoW0MozH4EheE+Eh1g0maQW7
ZagsWPp+m0Mt0Qsj+YGCvcnjYJmd1RClMQC1e1wWg/QmgTtDTzsbPAChj38K
3GYzCZUO3raZPw3ArCpjIc13EmTF9HqKqX/BZLVHLXF1Et5d6uB06A3CeoLY
jYdLk5CTKUXVMx6Gq3ZhQVp1U9DPuHaNbc2C8LQy/oImG3SjXcduM1hQQuVY
Fx9gQ8oJST3/31nQavVax/gIG/JuWgXMKY+D+9WrNToJbNif8HSZdn0cqlPL
7+9pY0O6fpWaZ9YEnDsXu2855D0oFFxOOBA9Bbd8WNn0wmmwiDik8clkGkyu
hc5MdM3CglNcceiDeWDe8BtUfsYB/f3+tvf9uZBGG3TNaFoAk3LzdS2tNVBi
33mo5bUEZVUPQwNNNqGU7567tcCF/3bGvvvOjA9n8xyGI06vQP+pA13jKdtQ
uf9yBrd+FT7Xb0kMXxDE8O+FGyal1kEuPjjEJ0wYb+6kHhy14gH/YFybq7Uo
ii6f1vUL3YAiTwfhe3bi2DHiKl5xYxPUR34LTteRRFIjoNH90Sc49nit5JmR
FJYqdm9U93yGwMIxVpSRDO5W1X+4NbcF1dzacvdLBM575Afs4vBBoLW/WSVb
FhcSCwNvMijI7HCcr0qWQ9bxluL0zxSM4WlKhqXLY4in2QCRuQ03q90MAs8r
YC+nqb1ARAApxa99v4zbgQakn68uQwCHq39OEUnYiZeWNdZ7KIJoyBuqehKm
iGDjPPLFOUGM7PAfKfFUwrnAHccS5wWR8cL+c73XF1ihmRPvGy2EEtxUwx8c
lPHcvB/vhykhjHJUPFLi/CWKxYT5V9KE8ZmuKH3KWQVtfFYar08II8PC7vZH
c1WM8l9c8fcSQeXk6RYqfoX2bieNqwdE0IAzsKhurIaudOVvjNxEsYArLf+z
jDpW3tu7w6hdFBlCIRUBeeqosPeyVPphMazYE2hxRkwDg8Y2ORGtYlgXe4VZ
nqOBLqmiaQFO4kh5TQvdLaSJP8oNXrD8nzg+/0Dj+6RoYuE0JeJHRwmkqxbm
lX7SRAUXwVz7AQn0jqTrWSdoIUNtdsLaTxINmMlPt9a0UHst40HboiQmLtU6
+ZzVRttK98SArO24aXyFrbCgjXY1pnG/7ZTCqKzSxJk4KrbOyEoPNUih0tpR
GdU5Kr5X8jho6y6NZvrfPPg7SAdHZj7M9nGk8VCcg/nQpA4ObQRFm96Swbxe
gX7qSRJfqWpsDWsT+K18zoalH4nKEi/kaDoERh6VVfMOIBE3A+I/kATa96qF
59BINEjbJb+hT+Bmj/nGfCSJ9KJ4lsrXBJ7qSfzq11QS7zrS2mItCDTv/nDK
8RaJEOu+4HGcQH3Z+FxaOYlzXIm6KS8CFd15Nal3SLx9c7X9jA+BS12ivOp7
JGqHyU3c8CXwfpd2rnwNiT2D2qMTwQTKdfnXjDST6CVyUusinUAK8b53pYVE
YbnBLeU4Ajmu0evSrSTuaXQx/CWewJdvUqysXpLIPNGfMZbw79+bot67XSSq
GB5VsUglMEpGfb2ph0Tf0ezrb9MI9HG9r/JXH4lF8jpBMQwC972pD5UYJFHe
yWG9/AKBGjIWOVrDJHrv3/XCLJNAadfWavNREsdSDKf6LhL46YpTryeLxLKx
NG96FoGznT1rMRMk8tBJSyKbwH8AjU0h9Q==
          "]]},
        Annotation[#, "Charting`Private`Tag$31185#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVz3k81HkDwPHJfYSfo1jLOscPkR61hfD9OhM5Syj3ELkGTyjMjqKE3bKK
bIhaFbVhC89Tu3y/ylKeRq5Y5ziamDTWzSCz+/zxeb3//miF0r3ChSgUSuw/
/d/ljhTj0FP51ubJC30n/22NTrn8nhpJiQMFwW9CXA2foLTC/fIk5TvgmhrR
nltejyovZS3uzLgCWlhu94Dtc5RnQfcXo1wDBZMci9eGTcicbzQlQAUgzENj
2sgNIyNv7eItZhHwU9Lf2TjSghRlZIRWBWVg0517IrqiFWUeuHiaz64Aks/c
ZDnjfyDG5GbDGroHGv+wlZQk2lG89ULUMvMBoPfmdPLs3iCf1eE+nuAJCK+6
mhJpzEIelSdNPrNrgUyGQ3eWYieiVs/Yr7DrAO3R+yb+YifS8KGVL6GnoNvU
Sk3MowspPPM9Mc9sBKp6SUN67G7Ej7Jr5gqaQC7/cIppZR9abcmYnfmrGein
v+QeXe1DiyrNKjNsBJoN3QzJI+9RMq3UfImNQX/MfceznPcoXl755gJ6CVid
IvHeuwYQLXbn0TlmG3hxmTXOdR5EztS1p9MCFjjX87n4oNkoqv/QDgUXO0Gw
za/r36eMIvXK4s7dIu9AaRA3JbBxFJ2XV1/RFukCb56EtTJNx9Cx/GbCS6Ib
mDEK98pR2Wjxhx1OdUQvGCkIFu5NHUfWOdmNMVoDoG6f20KIwSRamqEzzocO
gPCnPwfvsJtEVU6+9lk/DwCuOnOe4T+J5CUMekqof4LJGq864vok+nClg9dh
MAjWkyRuPV6cRLlZMlQD02Fw3SEiRKd+CvUzb9zg2LJBJKNcMK/NQfqx7mN3
mWxQSuXZlhzioLRT0gaBv7NBq81bPdNjHJR/2yZoVnUceF6/XquXxEEHk54v
026Og5r0iof72jgow7Bawzt7Aly4EH9gOewjUiq8mnQodgrc8WPn0IumkVXU
Ea0ts2lgdiN8ZqKLi+ZdEkrCH80B1q2AQdUXPGR4MND+YeASYNAG3TOb55FZ
heW6js4aUOHce6zjs4jKqx+HB5ttgjKBZ972/BL6T2f8h+8tBOB8vtNw1NkV
1H/mUNd42g6o2n81c6lhFX1p2JYaviQMI38QbZyUWUcKiaFhfhGi8PZu6uFR
Gz4SHE5oc7cVh+LLZ/UDwjdQsbeT6AMHSdgx4i5ZeWsTaY78FpqhJw1JraAm
zydb6MTTtdIXJjKwTLl7o6bnCwouGmPHmMjBveqGj7dnt1HNUl2F5xUCznkV
BO3hCZBQaz9Sy5GH88lFwbeZFMzqcJ6rTlWA7JMtJRlfKDiOry0dkaEIw7wt
BoisHXizxsMo+KIS7OU1txeKCWFKyVv/rxN2QSMywF+fKYSHa35JE0vaDa8s
a633UISxMX+o+lmEMgR2riNfXRDG0R2BI6XeKnA2eNeJ5DlhzHzl+KXB5ytY
qZ2b6B8rgqWW0o1/dFKFF+YC+D9OieAYZ+Vjpa5fQ4m4iMAqmih+oS9On3JV
g3Z+K003J0Qx08rh7mdLdRgTuLAS6COGVVOnW6jwG+jocdq0ZkAMG/EGFjRN
NaA7XfVbEw9xXLgkq/iLnCaserB/l0m7OGaKhFUG5WtCpf1XZTKOSuDKfcFW
5yS0YMjYJi+qVQLXx19jVeRqQbd0cUaQiySmvKWF7xXRhj8pDF6y/p8kfvmJ
JvBL04ZF05Son5ylMF29KL9sSxsquQnnOQ5IYd9ouoFtkg5kanAnbAOksREr
9fn2mg7UXct81LYgjZMX61z8zutC+yrP5KDsnXjT9BpHaV4XOtSaJ/y2WwbH
ZJclzyRQYeuMvOxQowxWWTsupz5LhR9VvA7be8piC8NvH/0VogdHZj5x+3iy
+EiCk+XQpB4c2giJNb8jh/N7hfqpp0n4Rl1re1iXwN8p5m5YB5BQVeqVAk2P
wNHH5TV8g0gIN4MSP5EEduzViMylkdCIsUdxw5DAmz2WG3PRJKQXJ7LV/kXg
Mz3J3/w3nYT3nWlt8VYEtuz+dMb5DglBvOe810kCG8on5tEqSDi7JFU/5UNg
ZU9+bfo9Et69vdp+zo/Ai13i/JoHJNSNUJi45U/gh126eYq1JOwZ1B2dCCWw
Qldg7QgioY/YaZ3LdAJTiI+9Ky0kFFUY3FZNIDDPPXZdtpWE+5rcjH9NJPDr
d2k2Nq9JyDrVnzmW9M/fu+Le+10kVDM+rmaVTuAYOc315h4S+o/m3HzPILCf
+0O1P/tIWKyoFxLHJPCBdw3hUoMkVHRxWq+4RGAtOatcnWES+h7c88oii8Cy
7q01lqMkHEsznuq7TOCtay693mwSlo8xfOnZBOZ29qzFTZCQD110pHII/De+
lVh1
          "]]},
        Annotation[#, "Charting`Private`Tag$31185#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0n9Qk3UcB/BnGwO2wZjjNxPddGORoZWdYTvuecRKqT/EHXWdJC23PJU4
wGSeJLWrzY6syJ/HrdJp6EVmJCKJw9whnHJQaf4BNZRRpG7Y2LAVEMz4vB93
99zude/P5/P9fJ9Ns6nS+IaQYRjL3EPfcx/b2HoPWyAdKM3Mv3ZpztyjzTfI
7tALt8im4Ibf2YWOscSa03fItreeD8A/eINk9aeuENvQFbHWGcLoP94WIf+z
z3+f7DEenia3P/NJBK7LjpJXTOXx/jhWwJE32yfJvt7VcFqRG1aPbRKR2z9f
NoV8hVNMtj7+PWxb1h+HnO2aRn3XHin6B+WzmM+9l0A+LNRHke9+XQ5XGGHP
0DnYmhyEmaEBBbd2pPa/QDXjofucbp4HXwrAJkmHErbXCuDG/mTyZ8nDMNPZ
k0J2S3YKya693lTkAaGI7LuzLY2sGl8D264tTyeXhg7CzJ6iDORNQdhTtzGT
bLjwSgz63z+SBe9YLob9qSrML66FTfKK+ehvF8aiP3NfNtk7a+b91SisGnwX
9jlvL8B9lt7j86hSjX2+ccZh3uaTsPe4Jp6snhBoUB8uhhnlQfjt7hbYN6BZ
hH3u5UngXjPsdVlhV5mf97hOivd7vXox+pPqYdOXAi32axuA1Y5yuNS3RMaf
9zfsPvE17BtT6/A+DEHYtuEs7D57NwH5U+ty0J92N5H//X7l7fDL4ZUlepz/
0rdJsPiynmuquviXU6fAvI7yDvZy5BHLH+uGWJp3pfEGO1Kbsv+d4j9ZvK/W
YbLyZbOfzPQ0+GFWNf4wD7HVBdL632ZDyBtvRsi9rcH7ZFf4lyn4kC7C8v/X
KHlrxs5/yWpP6QNyrqIPNpUYBdycm7cdmcQ8Q5WIXC92TJFtBxrF8Jlj02Tu
uTXxcPGtGfQ3FErJRes7Z3F+hj2BLPmgPor7Vb4mR335bpzn2b4liTu/wKH9
yMBwNG/4ZwXZIr0Km/q/mEeOsRQIkG9tUcIzTt5tV5PJz/YJhA/zFLJ95QmY
UZakYt72AGyrqU5D7twi4v1EOnn0zFHY53sxA/sYRmBu75uZ5O5d+THYp7Iq
C/mVU7BP2ari910rJntaRPMxT2mGmbwns3Fez7iYr5+ALRdXx5LVNcKF5CaP
G/ZcZ9T8/bLikE8cg7U53bDr9k149KgsHvVDhzTIZSdhU4VuEfLcJRLc77tV
sN3K8c4bgbVMGDZ17liM/KddUszve8B744+8HzNrUf+hQoZ9VoXhmPMu2FUm
0SHPvgAzsnNw99P+BMyPW5qDebmdicgLvPDozKQceWGZHvX7TyVhvwODeu7V
hkJjfrqC+x9zW0VD
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk41AkfAPAZw0yOzes+BjU/NpHHa0tEx/eb0VLbUiqLDtlEO648dlFK
7ishLU2ryJkWu87cco8QGTnHHWmSc105333/+Dwfxs9uFtcFSCSSy7/+f3fm
b7ec9cOPiQ1MNHQP6UHKoQ+UZwxHsHJ54JkzmQ7FJ0TiWAwvyD7trBW49hdE
eUmcp1j7w2/hKpeCVvPheOuzy2cZoVAedfm7+ckiWNyt6ZjEj4SxEeoLAd8S
6DS8WLJs9RD0fCmqT9+XQUj0ZI0x4zE0smA9ar0KRkpzGp2E/gA7Bbtwd9dq
MBj3aInlP4XK5u8oshY14Knkx5qzSoYGh5Cg0K+1oOEu9usxxgswTdUODuU3
gGWI2/LZR5kgmuViaB7fCAEJXO/rQn+ClRGhKXeMAwMN7LuR/GzQXY4IAb8m
MHkQy5y2yoOqf7xkHvY0w9qoyo+HGcVAj+NcViW1Q4zzmZ0n+ouBVRdYZefT
Duor/u1mj0pgM7NphLPYDufFJs7+LFQGK8rxLG33d5Cjl2UZzq+A5LR2k9MX
OiC3gZ47ZVUD2mQlz7pNLlxTzCw1YHCgMGhhW2quC7RcMntDgjmwb8+HS+xd
3bD4OnOlk8+Bi+dq3paYdUPQ9ZcHXfOb4MIIK7UnqxvScv/MS2E2g8r+nOkW
ux4Y/z7npajDW5jdEX6eWdUL+QZ9ra5dHTBqq+u0xeSB7DXrS3E0Lphxyo+z
WDy4Hdk3VW7AhZx+t4TkGB4YDfeJCCdywcOcq+85wANuUL9pqkMn2LGtbr11
H4CFdl59z8p7qPaOI/U8GoQDDkMVqNgLwS2CV5+UDsMVV/0A6ZO9EDuXsRjT
OwxhnjEmn7x6Yb4lxcZpZRiGQoy40V29UJS0Z8lecQQiXmRMDsX0wY9ult70
n0Zg5JOr5F0aD0g+bbbCbSMQ6bTtWLo4CByv24Ed+aPgcShG+MnkKHxr4Xu0
+/IHWKmO78xOmwTOuhn/j1MfwZQhG2Q8NA0VxNSpMgU+GOT0etV0z8P01xVH
DZ8pKCoae56ysQhf5BvbvAenofGerXWH1CoosmVSg6lzYKzHcutcWoPHB1az
jTbnINMqz1tOdgtYPi7Dm+vzUHmgzu2xHwklMr1sMoYXYJY++fnNDBmvAcOt
8NU/IGP40lb5DgWX488paLMXwd1sf2D/jCCKZ40HqdovQTXb+nmJHxXTfHR+
Vzi8DDymYfBR0R04f/C9Su6OFdg3MSqv5SOMbLLQZ6J+Bdwq1DMOi4jimLrm
KfP7q8AP1x0r9BXDvJ4fhuqPfwXLB8Ny5pI7MVJ0Km+v4BpEzzNlYhLFcYMu
XitavQbb6cVXlcP+g/53b2psO6+DjuvTA4FnJLDghqD5yT0bcCdvfPCZqCTy
UzvLPTs2QDtd+ItonSSmMguK27w2oa9g01MkQgr7e/U0BjW3IOnohb5KpjQ2
h/TlDbzbAtsxnxLyNzL4+stV1rvAbQjSv7fO5sqgju5zdTsFEjbQPspMRMhi
a6BlRAWLhNsL9JwaCzkccAob76gl4XnrIvq5b+TxStfhUrIMGcVv7pvRr5fH
WrZyaPJ1MtYl3zyaE6GAitn5/zWtJGOsmYJ9D1MRexLuPD8jLoAXZR/SYsXo
uExqf5N8QwDB2jmA3ETHDY+pX/0rBDD8tJpd/T0lnHAI/moiTsFWm6wKORNl
nF++ndX6CwU1x+Nmd5FVsPdJga7sawoGhJknlTSroEuX9M1QJUGEwYn8tJhd
OKS8EO9xSxDvd8+2pajtRhl/ydALHYK4+MP7gPKw3ahmU/lOcb8QTvmyUrQ/
7sZX+nd45CghlBaZ9Wg5zkBxqfLJcr4QlhG8QJ10Bibx7e+eNKfizKr39iyZ
wKdBNJJWLhUTB0eJKAqBiiZ/J4zmUdGs9tT3WkIEOks12j8uoGLOfaUHN3YQ
yJt9dI9STEVnlWrF0Z0EOtWs9g1WUnGKSdPj0gmU1jihm9BCxU9Rcc6FBwmU
26yXMpikIttjK9pCn0CrvcyQxU9UNLVyLJg7RKCyGW9v7mcqvmAYrGkdIbDJ
MW9LfYaKDoUDoelGBFZIXJlVWKLiRJ9qarw5gRZvVFepFBr+XhXZqHuWwHGD
FM8GQRoapy7xuRYEJiUn7gmi0jDNmaMjbklg4SsnuoAIDe23WVWhlwhc7u6w
IUnQUHq8c/TbKwSqPSlzrJakYX3TEaF6WwJ/UunJ8JOmoWrsztOkawTGKNEq
yPI05Hp6uSXaE6gSbBpbq0DDgIsjsUccCGyPVkgIpNNwP5581e9IYKbZw25j
ZRqOqeX3ef9CoOFQozF1Fw3/B89TMp0=
          "]]},
        Annotation[#, "Charting`Private`Tag$31333#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk81GkDAPAZw0yOzes2BjU/NpGP15aIjufJaKltKZVFh2yiHVc+dlFK
YZwJaUmryJkWu87cnsctREaYMe5Ik5zryvnu+8f382X+7Gl9XYREIrn/6//3
Zv92y80o4pjUwERj75AhSjv0gfKc6QJs3R/65E1motITEvFspi/IPe2mG7z2
F4r2lTlPsQsEv0WoX+KsFqLj7c8vn2WGgcroy9/NT5agxd06LinCKDA2Qn0p
ElCGuk0uli3bPgKGARSNZ+8rUGjMZK0Z8wloYoP16PUaNFKe1+Qq9gdwpDtG
eHlgZDzu3RYnfAaqW7+jKFrXIh/V++w521TQ6BzKCftah7S9pH49xnwJLNL1
QsKEjcgm1HP57ONsIJnjbmKV0ISCkrh+18X+BLamhI7SsWY00Jh4N0qYCwyW
I0PB/RZk/jCONW1bAGr+8VV41NeK1kbVfzzMLAWM+ObLGqROFOt2ZueJ/lLA
rg+ucfTvRForgZ2Wj8vAZnbLSPNiJzovNXH2Z7EKsKKWwNbzeofyDHNsIoRV
IDWj0/z0hS6U38jIn7KtBXpkVZ/6TS66ppJdbsxsBsWchW25uR6k657NCw1p
Bvv2fLiUuKsXLaLslW5hM7h4rvZtmWUv4lx/ddCjsAVcGGGn9+X0ooz8PwvS
WK1AfX/edJtjHxr/Pu+VpPNbMLsj4jyrhocKjfntHj1dYNTBwHWLJUCK1+wu
xdO4wLK58jibLUC3o/hTlcZckNfvmZQaK0Cmw3wJ8WQu8LbiGvkMCBCX02+R
7twNHBNtb731GkALnYKGvpX3APvFk/oeD6IDzkNVUIUHQtpErz4tH0ZXPIyC
5E/yQNxc1mIsbxiF+8Saf/Llgfm2NHvXlWE0FGrKjenhgZKUPUtOKiMo8mXW
5FAsH/zoaePH+GkEjXzykL1LEwCSf4eDeMcIinLddilfHATNvreDuwpHkfeh
WPGnk6PgW+uAo72XP6AVnNCdmzEJmtcthX+c+ogsmIocs6FpUEVMnaqgC5Fx
Hs+3tnceTH9dcdH2n0IlJWMv0jYWwRflpg6/wWnUdM/BrktuFagkKqSHUOeQ
mSHbs3tpDTw5sJprujmHsm0L/JQUtwDb3314c30eVR+o93xynwRlsn3ts4YX
0Cxj8vObGTK8Bpiexa//QQomrxzU7lDgcsI5ul7iIvKy3B/cPyMKpXPGORpO
Swgn2r0ou0+FGf76v9MPLyMByyTkqOQOOH/wvXr+jhW0b2JUWddfHCaSxT4T
DSvIs0or67CEJBzT0jll9WAVCSMMxooDpGBB3w9DDce/IpuHw0pWsjthlORU
wV7RNRQzz1KITZaGGwzpOkm8hrYzS6+qhf8HBt69qb3tto70PZ4dCD4jA4tu
iFqd3LOB7hSMDz6XlIXC9O5Kn64NpJcp/kWyXhams4pKO3w3Eb9o00ciUg72
8wy1B3W2UMrRC/xqljxsDeUXDLzbQg5j/mXkbxQg+nKV/S54G3GM7q0nchWg
vsELLUc6CTfSPipMRCrC9mCbyCo2CW8vMPJqrZXggGv4eFcdCZ+3K2Gc+0YZ
Xuk5XE5WIGPpm/tmjBqUYV2iWljqdTKuT715NC+SDlVyC/9rUU3GcZZ0pz6W
CuxLuvPijLQIvqj4iBYnxYDLpM43qTdEMLBzCyK3MOCG99SvgVUiOOK0pmPD
PVU44Rzy1Vyagtvtc6qUzNXg/PLtnPZfKFhnPH52F1kd8p4WGSgiCg4Kt0op
a1WH7j3yN8NURTEYnCjMiN0Fh9QWErxvieIHvbMdaZq7oUKgbNiFLlG8+MP7
oMrw3VDTvvqdyn4xPBXATtP7uBu+NrojIEeLYXmJWe+240woLVc5WSkUwxWE
IFg/kwlThE53T1pR8cyq3/YsmYDPODSSbj4VJw+OEtEUAqqY/500WkDFlnWn
vtcVI6CbXJPTkyIqznug+vDGDgIKZh/fo5RSsZs6VhndSUDX2lX+YDUVT7Fo
hlwGAeW1TxgktVHxp+h4t+KDBFTabJAznqTiRO+tGGsjAtruZYUufqJiC1uX
orlDBFSzFOzN/0zFL5nGa7pHCNjiUrClNUPFzsUDYZmmBKySuTJLX6LiCb5G
eoIVAa3faKxSKTT8e01Uk8FZAo4bp/k0itKwWfqSkGtNwJTU5D0cKg1nuDXr
S9sQsPi1K0NEgoadttk1YZcIuNzbZU+SoWH58e7Rb68QUPNphQuWpeGGliNi
DQ4E/Em9L+u+PA1rxO08TbpGwFhVWhVZmYa5Pr6eyU4EVA+xiKuj03DQxZG4
I84E7IyhJwUzaHg/PPm634WA2ZaPes3UaHhMs5Dv9wsBTYaazKi7aPh/AKpp
HQ==
          "]]},
        Annotation[#, "Charting`Private`Tag$31333#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJw10wtME3ccB/Bry8PxUEHAolCvaCZ7yMNVsmSQuwRWu4zEBN0UB66KMDQ6
ZxYzZcR1YWuW2a2biE6GE9fBNt3MIpGBmnHQMTBsCrbJNKg5YLShoNBCKcVS
1t/3tiZN88nv8f/d//pT7zlUVC5nGGZv6Eu/oY/B1G7lzF1e5cZRW0fIwsXb
A+SjFeWDZH2La5DTDVU9n+URyYaeZ/4h/+lxjpCZ2h9d5J+Mh5zIf7V3knyg
8MEYbHxxmjwxxD4ii6nfe+Gfl02i352Hfu67d/K0MY4pnG/ODsAXrrnJbPXu
INl4vcoDZ38i40NuVvRNI78tVk425i6fITcqw8LI2msbvJjvoluyuRkW1psj
yX9obLNwaR+sbX4Ms+PDT6Ffod+H+Ae9UYgPHJkj879nx5Iddaf96B99Fa74
ckDyuvTlqI+wz8Olj2DtefOTDunK4zD/V+dh/q/rsCOdD+C8kYQV8K+1C7g/
qw2OiCgPIn/71wnoP+uCWfvORPTLKFrE/UavSILP2WAm3p7EF7WpRnZqGIHq
3zu4klyz7ADM9hco4bLbsLBnEVZcVcrIjX0dyXDLQVjs2bEKNt2A+X2Zq8nW
jTlyxPePSx4xSq75JgXnp9+CG0+8kUrOD09UIH7LB5dd0MHC6X4V5jFdghvz
T6whW1Q+Kf8hyyJetymMbNhyHLa4ymHBZYOtexuk+PBmNXntpaxwAe+rDlas
q4fFd71w2eHYCLhSn4b5bJdh/Wh/F3c4L6pHl3mHo/7ve+zkt26+dp/MlphF
rk318XTkkSGy3iJzkFviHoyQGcvJCfILXNDBSe9ziry1TzeGeP2SaXJtd844
WVxd7UX+FucE7Nw/j367dk9y0j4scCXmrvZJ6xTm2dYZhL/l3IgXPi3jQ05+
yeTBefU+Obn4bswM+gntCvIxTQOs7/whnOz313vJvOJoJPJfLpvFfNqmJXDv
Wh/yS0ui0P+Geg75ca3RqD/jn5Oeb2sM+ey9Yj/Oq2SW8tJ889z/+0H1mg1P
OGm/JHPDsPjb0jjUv50RwPPkl8Sjv6lgAfXxof2g+UcnYP6zv+HkpntB9Gv2
w+375mFDVVMC8uWti3D1F4n85c1DJa0fMjz9v+w3k8i5bjds+PTzleTq7hgZ
4srQfpC1abAo+OFA5iuwIaw7Gf2KT8FC5/ZViM/clfI1of2g/nEFcuQ3TcDV
z30Es1fOpcA57bDI7EpFvVKmgMVoFbnhpA5mf7kCB2ZrpPiOM2vIKcKY5MrQ
flD+2fVhZH7TcTj3WAXM5A3CgWfrJL+eocb5dQOSt1nU/91POFkf+Ri+75yD
Rc+baYhntUXw/wKKNGEv
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjns41IkagMeYX4SVcU9y/bE5k0JIhe8rB9EuNXJKkuRJ4bhMEwmlCOck
FDa7wk5ZrBJK4x5D5bZulUFGrjWoHNfcaTt/vM/75/tqnglgnqVSKBS/7/zf
cxlHdTtjb1kGL/bXshNM4fzSzoo+hg/kY2dfdlo21OTHPsxihMKtcItNMfEF
cLZgJSyfEwWVX7jK1dyn4BNTrBXLuAluo6pPWtK4YFbI/WDgehtOCzP2lf1Y
Bnvv0c0yOckQ899LjhuDKwDZTf0hjDS4mVgsCgnVYOWuYyQMzIDEaz+wWMY8
yMrm1em5coD7Rmftk3wt5NxRVUzlZMGFdsr4xZI6eOTdWcViPATSWsF+4t4r
yHeP9NrW9gjC47gsW5t6KHA2kBkIfAw2RrKLTz/XQ49GvaGuaxFM6sp4HNZr
BIGUVnQypxj6QpcidEKaYfDDO4Y/owIYYR2y0XfaYGig6FrTagWwT1D11yXa
Ybg3lk+2VcJVlyfG2ZHtMNJhEiEIfA4/e9EKvUw7gN1/0Jt05cEE/3eL3Uqv
Ibj5j6o7nBcgKSdfFl7+BsIenPT8N6MZDIr4rRkcPvQPCTXG0puh8i4t37ed
D6jJ6veU/gukR8QFXWt82MCJdnGd/gu4tIS6BJcuSMoocLQvbYWgvU+K6qS6
wfknilrK/Q4I2W6ZPO7ZA362TIkL+p2g9efWNM5AL6idUxrf6dUJDT17iAuE
ADpi+homMjshJi4qcRNDALvqvaK9ZfjQFFDl/DRIAEv/DKN4zPLB7/Lpunzx
Pog+8Me8Y3k3yI9bCRR030OGxfywvrUAGuKOSfzvwAB0+Qt19UIFQBs/ddvT
YwBkOF0+ZKEAVEaczKoiBiCSWjqjsrkP6BzmHuWqATjfcIkqPtEHAbO272s3
D4LRkSXN4ZR+OHYimspNGARPo6sGh2YGoaH+ev7vAUOwYH094Nv+D1CS7lZg
KjcC/FQlJV3eJ1A68+qB8cxHmBT9efHuxykQKVwQ0ovHIOBoze7pHXOgbtoI
0WKfgfbsR5mq6gVwEb6LErpOwNy242sfLVbARlE+r+XKJJwu2WMhvLYOG2O2
rO0unAJWnngcgxDBhCti5mM50zAl2qrR/oiKXTkeB0aiZkDV+ytq2dPwzkPe
M9ujs/CW/+vjx5IbsNDB1u/0925jW4oVWSiGF0qXdx+anYOD7ZK6b4M24rMs
tltA3VcI6hUmGRpL4u1IwVbyP/MwyFLRC+uUQnvLuXcS5gvQJdMkuZYqjZez
v9m3Li8AoTYmyVWTwRSnj8478hbh7G69MjFROrqJPefFn1mCLf9K1zMaoWOe
geGog8IyTFVU7mQ+k8XcN6bzl8uXIS5L+aR0qhwadf1pOX1+BazfaG7l+cjj
cUPz2ByJVXDe4JZlt1cBQ4LnNX1zV4FRzXcM2KKIhxS3Mqsd10Cjavn2zQlF
NHssluv5eQ16LdwW979WQpXtOfSqpHX4/HKafF2kjLblETUDJt9gS5KR0Pn6
Zozz/SJm2PoNZEaKWoM9VfDWExuWrRkFyVCBXbzpFix3XtWxuUHBREWzuDBC
FT3kQiGjjYI1pm9mCKEqrhzTeWuoLoLSGcqT0aVb8er7q50ePiKoHZtOf5Cm
hguHvY3WK0XwWGlLY7G/Oi4ktQR7ilMxMDj1gYO6Bm74IaAi3omKyk6jbPpt
DRSnbRgNz6ZiOzN+k+OSBnaY6xCBM1T0lmdWn/DVxPwSdbEQG1Es6Cl0ZAo0
8ahsXUPNb6IoyvN89NJKC9lLdxP2j4niPm9TFYKrhWOJJlG+ljSMNHF34qlp
47BXvv5KIg0v0jQDzsVo4z76dm2tIRra/SKS2Tevjcl1dTVP9hK4w84stcWd
RLV596n+RAJNBi233fcg0WZURMH9DoHml6zLgzxJPOLGPjmQRKB9NlOgdo5E
poPU0cFfCDwn4qfO8iex20pqbOQegZzy+7kKV0j0M95UPJ1LoOw/JMtOpZHI
CNJz3sYjcHMt3W5XOokOrLn5/FoCNY4r94plkhjl3fvc8MX3nxid1aL7JNIX
DlTuqyfw0DCgaB6JlvS04CMtBN5Iu9iYW0qids5myo0eAuMMw1zCy0kcD7+x
KtFLYFLj9U+HK0l8sWiuniT4/jOfILVcTeLcyw/dnH4CnzPzDv9UT+LXOSNl
3gcCX44XDmk0khi6rG93UEhgy7WSC1+bSLx6Su5+xyiBvQUvUjJbSbzn8OXV
0CcCh6ybddjtJLqFiCX7fCFwrK+jxPY1iSv7TsbOThA4ye62VX1LYl3E+oPw
SQLnJfp7pjpJ9N9FFRLTBP4N5LIlFA==
          "]]},
        Annotation[#, "Charting`Private`Tag$31481#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzns8lOkCwHHGvEZYGffk7mVzJoWQcnme6iDapQanJEnzSeG4NZEQRTgn
5b7ZFXbKYpVckrs8j6nc1q0ykpFrDSrHJY27tvPH7/P796t9Noh5jiIiIhLw
vf9/MddVvy/xlk3Y8nAzO9kcXVjZXT/E8AMlsG+oILsAoZLEB/mMCHArynpr
wu1SdK50LbKEEwcaPlepNFU9Rn4JlTqJjJvAc1KtojO7ClmUVb038kgFZwS5
lrU/1qL9d+kWeZwMkPDfy85bwuoRZLcPhzOywc2USjGQ3IQOeemZCIJzQcq1
H0JCTDHKL8BcAw8OqHqlt/FRoRkVpqkpZXHywcUekelL1Vz00LevMYTxAJC2
io4zd1+gEq9Ynx3dD0FUUlWIvV0LKnUzkh0JfgTsTOSWH39qQQNaLcb6HuVg
Vl/W+6hBG+JL68RncCrBUMRKjF54Bxp9/5YRyKgHjMheufi0bjQ2Un6tfb0e
sE9SDDcle9D4YCKP7G4A0e4VpgWxPWii1yyGH/wU/OxDLfMx70Xs4cO+pAcG
M7zfrfcqv0RhHX80pnGeASl5hdqoulco8v4p1r8ZHcConNeVy+Gh4TGB1lRO
B2i4Qy3x7+EhqB0yzJL5C8hMSPD7N3hInBPv7jH/F6iiJnOT3ftRem6ps2NN
FwjdX1HOlX6D3H4S0ci81wvCd9pkTLMGUIA9U/KiYR/Q+VM9mzMyiDTOK0/v
9ukDrQP7iIsEH/UmDLXO5PWBhKS4lK0MPtrT4hPvK8sD7UGNbo9D+Wjln5Ei
3l94IODKGW6JxBCKP/iH0LnuDVCYPsRX1H+Hcq2F44a2fNCadFzyfwdHUH+g
QN8ggg+o06dTWd4jSJbT70eW8YHqhItFY8wIiqXULKhuGwJ0DnOfSuMIutB6
mSIxMwSCvti/a942ikyOrWiPZw6D4yfjKVXJo4hlEm10ZGEUtLZcL/k9aAwt
2V4P+nbgPajO8Sw1l59AvCxlZX38ESiffXHfdOEDmhX7efnOhzkgWrYkoFdO
oSBXtHd+1yLQNG8D8bRPiPrkR9nGpiXgLngbJ/CYQYs7Tmx8sF4DdkoKxZ1X
Z9GZ6n3WgmubYEvC9o29ZXMopFgiiUGIwuSrNKupwnk0J9al1fOQAvsLvQ9O
xC0gNd+vUMeRCtMe4Cf2rl/Qa96vjx5JicMyJ/uAM7sWUVt35iGyjAYv1qzu
PfJlER3ukdJ/HboFPslnewZxv6LQQUG6sakUTI3lq5P/EaLREFWDyD5p6Giz
+FbSagn1y7ZLbWTJwCsF3xy7VpcQoTElVaUhCzNdPrjtKl5G5/Ya1NLE6NCT
9hTfPruCtv8rx8Bkgg6LjYwnnRRX0Vx9w27mEzlY9MpceKVuFSXlq5ySyZKH
Jv1/2sxfWEO2r7TVsZ8CPGFslVgouY7cxD3zHfYrwvAwobZ/0TpiNPGcg7Yr
wSNK6swm5w2k1biaenNGCVo8ohWxPm2gQWvP5QMvlaHqzkJ6Y/om+vR8nnxZ
rgLt62LQiNk3tD3dROB2fRtM8v9MM+76hmQnyrvCWKrwVoVdiL2FCCYj+A63
zbfDOrd1PbsbIjhFySIpklCD3vIRILdbBCPzVwuEQA2uHdd7bawpimVyVWbj
a9Rh9LvoPm8/UaybmEO/n60Bl476mmw2iOLjNZ1tlYGacCm9M4wlQcHBYVn3
nTS1oPgPQfW3XShYxWWSTU/VghJU8cmoAgruYd7e6ryiBXut9IjgBQr2VWA2
nfTXhiXVmrRwOzFcOlDmzORrQ1c5biv6TQyLYdbD54d0IHvlTvKBKTFs6Wuu
SlTpwKkUszh/GyqONfNywRq6cNynxHAthYovUbWDzifoQkv6Tl2dMSp2+EU0
b0ioCzO4XFSxn8C7HCyyOr1IqCH0mhtOIbDZqM2Oe94ktJsUVfRKI7DVZdu6
UBYJj3myT42kE9ixgMnXOE9CppO06+gvBD4vGqAZEkjCN4ekpybuEphTd69I
8SoJA0y3Vs4XEVjuH1K1p7NJyAg1cNuBCbytme6wJ4eETiGLwpJmAmudUBmk
5ZEwznfwqfGz754EvfXyeySkLx1ssGwh8JFxAMWKSWhDzw471kngG9mX2opq
SKhbuE3kxgCBk4wj3aPqSDgddWNdcpDA6W3XPx5tIOGzZSvNdP53jzBZerWJ
hIvP37/hDBP4KbP46E8tJPy6aKKC3xP4+XTZmFYbCSNWDR0OCwjcea364td2
Ekaflr/XO0ngwdJnmXldJLzr9PnF2EcCj9l26LF7SOgZTsvw+0zgqaHeavuX
JFyzPJX4ZYbAs+w39mqvSciN2bwfNUtgoeTwwFwfCQP3UATEPIH/BhYJW5Q=

          "]]},
        Annotation[#, "Charting`Private`Tag$31481#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt039Qk3UcB/CHzdFaAQPGj/FjG4pAZheHJZVye05iaXr8sLggPZmiF/aH
W2JKeuEjF44zlew8Rp3gMrozvZtxdlFcxSQvMCIXcEE7O5814kdjMoGxOX61
z/tpd8/tXvf5ft6fz/e5e9L2GXYeEDEMsz/00D/9Kppva+vdJXrdvz1dIWoG
DIPan3xZnH3PAFmfU8qTLc6LDjKrip/QOo8r+OIaJzzifUDWdI67yFyWZ5as
P5Axjv73rT6yZa92At7WEiRza+vcZN47t0RmDps96FdXMizlufKnyZYvRSL2
nTyZ0faJl8yIrovh3f0PUecyJLC1fgb523vDyV/Jm2bJttOZUrJ9NHsO5++W
ysjyfpkP+9f9/QTqJSaYSW6NQF7poXm8j/BTkWTvGj9su1YkJxd3JgaE+6RG
oz7SArPGwhhytq/hEeoPkmJR3/FaEPf93Asb1TkLmHetXYF9Gz6DLR8fj8M+
LygW0f/ic/Hwuzdg3s0kIK+wdgn7ZcQmwgHDMuZP/AkbX7LD3Pk2Jfmjw7kr
qF88moT7i4KCy3XJ7LcqifRWGWOj/NbNKeSt0j6YefwXuCpsCrZlNqbCLeow
eNNvKvQ3lcCas2fU5KvqOphNeVpDziobgfXyZsH8DhHm9QTgq9+dEXyzPA11
3W3Ydm4MlsZtFpO5ItVqzP/5BMz/aBV8MHIV5ndEr8H5zGLBGdWC138AcwsO
uGHLXzD/fWU67muvlKDOX4KrXrkAW4x53do82XAFWzWkpfM68RD55EbGQbb8
cMupVde7u0zjPJnZ/+sk+X7umy6yfjl/iqzuDcK8tm2GXGGqGSezx57xky8r
X3aTuY3XA/D2dVNkjSl+EflpXg/mid9i2MZu30llrBdekYvIjW97BG+4IiYX
fdjyEPuc3iYhG9q9M4LvhJNvbBicRf55n5R811c+B9eelSGP74ctbYVPkqOa
I+exb0FPBOq2BZj7Yn0U8rcY/MivKJMjP8wD2+49Hw2bvgng/smL8PRjhx7h
/WSvi0X/QUsQ8/ZMwo2b5AvIN1sVmL+rWrC9Og7nEyZg9kR+POpHxhYxP+b1
BOQvu5aQn6lJJD8bU7CM/smxxP/nwfpd7UrMu6Bawb6dNUl4f0N9MJMzlsRu
dQaP/RHHsNRvnU8m5+5sgC19XSnwP+0wez/0fYTsdzgEf92rIr8xoA0ja4Y+
VZPN95pgruQpDfoNvwtON8Pmo2oR+s/54eHuApiPqE3DPtMNsP7UqODRQVhz
Z+1qckeqVEy2+W/C/iOVsGavCx6+Ug0zytD3QfvpfDDXwcMdPe+tQj+7Lx11
RZQE993dCpudr0rY/wB7oljn
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVj3k81Ikfh8f5lfsoxxhX+SbptI5CPp9iVetMRLlqN12OVrWFrTRFWEdq
x0Y2UqaUkiOyK2bIhhzJFMM4W8W6xjDu6+f3x/N6Xs8f7z/eej+edfUXpVAo
QSv83w8v7mIYJCZYh+nbe1G/mUPd4UzhVVoADNjZNDT/+xhctrtybWi/AtWi
7Hj81jzoajfU1HePhPoW7e96mwtB5f7GH9bT4oAprDBQ7SuGrJfJVgxBElBY
5iODd/8ClqKq2xp3BnQkcviBq96AsFn1hhotDXgH4sJUtrFBweTuvZSIdOi2
cWQkGlVA8nuZtnjBA3hBzSeDNSohzyh+TM49CzZQo6j9nLfwdSReR5GWA9If
uyXzv76Dc9qOOU0Nz4G/J7nH8l41UJzlzG9H5ELV5wKvhP01IMe1M4gV5IHr
hVCvLfdqYcPOamtp91dgcz72yRnZevCZrw6SpZXCqaSm2OPGTZClkl04LCyF
idriT9XnmmDQKGa2vuENcHtDfEwKmiDUe19UQkQ5iFX3Fxzc8hFqfY87RQvY
MBGjRs2lNUMfq89fyr0KmCU6bVu5HNC4/pUhTauD7laux4HhFhAXNWSn3q6D
eZWw6imtVhijBw5tIOqhin2n5jvnVqihT+zeO14P8L3Hk6t5rRBKF+HfqGmE
sgtbw1ODuRDATsy6avERuIUeP+e0t8F71rOl6W+fIJyVftL+SgewIxwYLL3P
8LzohN5ZZgcUw6hhtPdnsL38YMmroQMesra7qzavdAP7KYPWubIryTEpa4He
feWGqSWdYMh65xnyOxfSqV+I1P4uiCn/UjAIHbBf1M1VeKcHhN7T1IaLHXCJ
k7FK71EPHJuXufHyRQeMTO+5Zl3YAxY7TA9e0OyElLeCIw6cHhjOj55YnOqE
tgEV/xLlXnBhbjJRyu2GzIMCb2FiL8jalbZrrrgr1MiQf+ULcDZJeO9Z6AMN
9nTjpGUfvBvZxdIsHgL+b7klU/v7IXOyhTN+TQCn8/LcenYMQjXPih85IIRm
npPSuqJhMD5q7aiQOgOXjynf3G7MByffOzy/HQtgMJpIUS0bA47N6ts+qcvw
m3yOWGy5ABr/Tal6mimCJVRrse9rxuFEqrXbrx5i2Oky+qWoaAJa4+QWXopL
IDFLj51MFsIZx43/HG2RxIlxmc0S9EkoEO3SG4iRQgvn97Gp7lNAi+7OGPKT
xjI1q/C7ptPgt0/azHWLLNbmCrMrZWbg0GKd361OOVwecjafb5yBs3Tes335
CjjkdNrTK30W0hfYtsMFiuhrK/fYznsOVHVLbc9lKOHrXbSihPXzMN9b2/Q0
WhmnP5glUQbn4W+trMcOR1XwT/sRd979BZDeTSZstl+NGz1HcsN9F8GkK6Qs
bP0atNS/le2ruAR1GpywS4trUM6yNX5z2RJMWPHsCr+pYkVRo1Dn0jJMtuX6
HGGr4c5A+9kSJQrG+BpGwXN1BHPP4tvBFIyml+xo+V0DhfEqtg61FDymrWLG
DaCiTWd+FVNLBOsfrrZVP6SJATTe+tFQEVTK7E17u42GJgc8xRUbRbBy19sI
XUILQ9iDabF6oiheaX+hlK+FP0bJU60vi6IeO6OgokYbhzmuQtWPoviBeU9E
8pUO/vLkWWrAZjHMub6toX2vLgYVaimqRIohUyTdL65QFw16C9Li2sTwlNB3
7sgGPXRjv0GhmTiqZ0lYHE3WQyNXVvxAojgmVS/TI2XWopXA1tqUL47WFuJJ
9Ii16GFsptDvJIHtp0f3vBpai/knxwI8nkqgtdymJYlj65CzbkHQJiuJt4Kc
fRMa1+G5uY5HewMkUVXrSuTITn28VZHReb5WEk/gUkFgrj6GTAS/ydhO4CNd
/5t6miRaLZzPG2QQOLP4YkhSi0RH5sz0sz8IdOJNuQxrkyg4bhwYkELgXHKM
5uu1JCZ7qvGG0wh0lXme57CRxAC3gU+ChwSKTI23X9pJ4jVBww/i+QT61V3b
2uhBosXusmb7BgJfZdcyCg+TGDzk06b0gUDpm8pzKV4kOgcdUuA2EViMWVU/
+ZFoW85c5f+JQPni6sOzJ0jUVtexoPMILHsgH6l/kUTFM9n3K/8jUPmqx3+r
QknMLZbIihsi8JTXAyd+GIkublSe2wiBq1WNNf6+QmLG60pe/xiBgXHuuc5R
JCqxrhsqzhBYeSpdxTSaxP182ZL2WQLV7fpDqbEkmnaJhDLnCayihNl8jSdR
IvhmvOUygdSuiuz3iSt/frLplRSRwp9LpeXzkkj8wPrnZLOoFL5LOXg++Q6J
/nv1ddPFpVDz4p/ccAaJbdW/SJ+RlML/AQCHMPU=
          "]]},
        Annotation[#, "Charting`Private`Tag$31629#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVj3k81OkDgGdcX7mZGoxxlW+STusoNO9brGqdiShX7abL0aq2sJUUYR2p
HRvZSJlSanJEdsX7kg05kimGcU2rWNcYxi1+/f54Ps/n+fMx/PG0e6AUhUIJ
+cb/ff/8DrZxSjIrwsjRh/HFCjUczJFcZgaBQQe7ptZ/HyK3re58O+avgGFd
cTRpcwHq6TTRMfKMAY1tet8JW4sR7e76H9YyEwFHUmVM7y9Fuc/TbNniVEBB
VqNDt/9CSI3uscqTDbpSeKLgFa+QpJV+TZOZCQT7EiNoWzBSNb99Jz0qC/Ta
ObNTTKtQ2lvFjiTxPfCMUUiGalejAtOkcWXPXLCOEcsY4L1Gn0eT9NWY+UDh
fa9c4ec36Iyec35L01Mg2pXWZ3OnFlFcla1uRnFBzccin+S9dUiZ72CcIC4A
7ufCfTbdqUfrtteyFDxfALuzCY9OKTUiv4XaECVmOTiR2pJw1KwF5dLyikck
5WCyvvRD7ZkWNGQaP9fY9ArwhWF+5kUtKNx3T2xyVCWQrh0o2r/pPar3P+oS
J8ZgMl6TwWW2on7UHyjvWQM4Zfodm/k8pH31M1uB2QB62/le+0bakIyUCc64
2QAWaBG107rtaDw6eHgd0Qhq8K2671zbUV305M7dE40AfO/16HJBOwqPpoqu
1TWDinObIzNC+SgIp+Retn4P+MVeP+d3dqC36MnSzJcPIBJlHXe81IVwlBMb
GX4ET0uOGZ7mdKFSMGYS5/sR2F+8t+TT1IXuo62e9NZv3YQfs5ndKBKV5ZtX
tAHhnkqTjLJuZILeeIf9zgdZjE9ExkAPiq/8VDQEusBeKQ93ya0+JPGdYTSd
7wIXeNkrDB/0oSMLiteeP+sCozO7rrCK+5D1Nov953S6Qfpr8SEnXh8aKYyb
/DrdDToGaYFlGkLkxtlgrs7tBTn7xb6SFCFScijv1EkRgp5wUxPRpU+It0HW
d9diP9DGM81TNv3ozegOpFM6DES/ccum9w6gnKk23sQVMThZUODRt20I1Qps
RTGDEtAqcFFfUzKCzA6znFUzZsHFIxrXt5qJkIv/LUHAtkVgPJZCoVeMI57d
ypt+GcvgN5V86YRKMWr+N73mcQ4VljFY0t/XTaBjGSyPX72kYbfb2KeSkknU
nqi8+FxGFhJz0QlTaRJ0ynn9P4fb5ODkhOJG2egpVCTVYzgYLw+tXd8mZHhO
I2Zcb/ZwgAKs0LSNvG0xgwL2KFi6b1KC9VxJXrXiLDrwtSHgRrcyXB52tVpo
nkWnowVP9hSqwmGXk94+WXMoaxHbjxSpQX975YcOvvOIblBufyZbHb7cwSxJ
XruAFoT1LY/jNODMO8tUytAC+ls396HTYRr803HUU3B3ESnsJJM3Oq6E671H
uZH+X5F5T1hFxNpV0MboRp6/2hJq0OZFXPi6CirbtCdtrFhCk7YCh+IvdFhV
0izRv7CMpjq4foewJtwe7DhXpk7B8f4mseCpFgRW3qU3Qyk4LrpsW9vv2lCS
RLN3qqfgI3o0S34QA9p1F9ZwdKm48f5Ke60DOjCIKVg7Fk7F6jnCzNdbmNB8
n7eMWjMVV+94HWVA6MIwPJSZYCiFZaodz5WLdOGPsSoM1kUpbIizi6rq9OAI
z11Cfy+F33HuUOVe6MNfHj3JCNoojfOvbmnq3G0AQ4p11Wgx0phDzQpILDaA
xsKizMQOaXxC4j9/aJ0h9MCvoMRSBmvlylofTjOEpu4oaTBFBqfWLkfHKK6G
tmJ7loVIBrOsZVKjo1ZDLzNL1QEXWdx5cmzXi+HVsPD4eJDXY1nMUt6wJHtk
DeStWRR3KMnhGyGu/snNa+CZ+a4Hu4PkMF33UszodiN4oyq7+2y9HD4Gl4qC
uUYwbDL0VfZWAj8wCLxuqENC28WzBUNsAs9+fTYsp0tCZ87szJM/COwimHYb
0SOh+KhZcFA6gefT4nVeriZhmremYCSTwO6KTwuc1pMwyGPwg/g+ganTE50X
tpPwirjpB5lCAgc0XNnc7EVC650VrY5NBH6RV88uPkjC0GG/DvV3BFa4rjGf
7kNC15ADqvwWApfC3JqfAkhoX8lZEfiBwCqltQfnjpFQT0vfOlpA4Ip7KjFG
50modirvbvV/BNa47PXfinAScktlcxOHCXzC556LKIKEbh4MgccogVfSzbT/
vkTC7JfVgoFxAgcnenJdY0mojq6aqM0SuPpEFs0ijoR7RUplnXME1nIYCGck
kNCihxrOWSBwDSXC7nMSCWVDryfZLBOY0VOV9zbl289PdkI5qjz+uVxBpSCV
hO/QP8dbpeTxm/T9Z9NukTBwt5FBlow81jn/Jz+STcKO2l8UTsnJ4/8BMc9n
dQ==
          "]]},
        Annotation[#, "Charting`Private`Tag$31629#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1H9Q03UYB/AvY2xN5McGjA3mNhgDTBPtqNCy7xfrAruuS8KaSMfkR05K
J9odZEErjuzqhM4775rpmkeG/NGPy6s8pXOyDBVupZTDwm5ANHQtYLgNN37E
8/6yu93ude/n+TzP97PdsqrNZXUChmFql970ufTS+kZ/ZjevcI+1XR28uGTu
rVY3uVUhvE12HDCNsJo23/TpzFGyx5Dug+VXvMgf/mmS3HC55S7ZktsbIF83
Wf7FeSpfEPXtg354jznCdvQGmwpWTqF/68pF8pDrh2my8Y9MhqM8ISmAeX8Z
BeRztfUzZMZlFZKHziqD8PguEblIGoK1dVYx+ZPXu0Jw33kJzvNeCKN+dWU8
eTahZRbzmtcloH7xhfuor9mXiPOdggjy8rJkzN97D/b06KRkxZ3GKPI1IXhI
kj+HfsefMuQCH++211LIhp0N85ivPZqKfZ4pX0Be2ZGG/X+ULeI+djwix35J
3bBxTpHOlY4ceuKmnnFQfvcsPHehDtZuuqFA/tEAbP9+VEmuvCaLIXui3RnI
v9waw9eXZZKHjx3l89wGFfntnDDvpw2rkLteFuC8yTw1+cTaTphr9MM96nE+
l45rsE/3tliyMbhDi/Oix2GmdgBW9U/x+fHHslDflStEf8kpeNhk5P2pMBu5
7QTMnbTAw1FJHPp/9/J5aDvsebRCh+fb/xXs+NoJq/x+3oNrcrCPfKMIz89+
wful27Dn3RQ9nq+/Soz51jfhYfNF2Fho6WOdwfyejTo3S/2jBjc7cijV9Uq/
h0X/wb/Jz+dp/4FlgTvkfd8d85Idl9KnyOu+CUyQLfE5M+T/thX5WHxf1WFy
e7HHT2bEVRFyoss6uZzPsw2bV5RkMNPIt/zCcEvuetAQIHNrywXkkveyZ1jc
bzgWedrj9zB/4DkR+fCt5iD6X20Uk/uaVoewT8WLEuSbisPoZ8zx5Dxr/Szq
Lycl4LyTBfcxb3ZLIllsvgQ7lNJk8u6m8xHUf6iRIu+8EcV9dE7BXZ+3z+H+
Nnwgwzy5ch7Pt/tgCvZ53ws71G2py/UL2M9gSoOnZYvLlsMHzsD2j5PSuXPq
tjGTluHwf3AKbo1WwBbbEQXyX3th+5NuJVywM4bMbd+fQe48fBrW2myZyCUP
CGDNGyr4ofWwxVW6ilzTUc3nxRvUZGfct7DHHaNBnjwL2+uuwGN9RbGoF+3S
knX5NpjTXYOde3+DLVcLs7DPngXYcd0OO8cKhRz/e80mPxU5AjvEzXCs2wlz
N8dhXb0fZiTP6uDe3DjMv+WCne9MwNzQ+hzsu1Ajwr4TZ+BOvVBMNn4Wr8d9
llbBHqZFvzxPzP0P/2tR4g==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk8FIgeAPDBjJmRJiL3PWacsUXO+P32KUeJpaYSeS0qG7ookVC06UCJ
HNMjKVZIDBKjSIttjGPlJkPkeLKNsjLIvvfH9/PV9jvleVScQCCE/M//X+nZ
Yvlse5L90nkTL1tFS1CIkhvJ4AbBn2afR7nq+VC+nnPUh3sRDpokZFCcSqHY
ZG6zBT8e7s7wMEiPA7E94gb23JvQTevTY2pUgeGrdRvzWHegpWqquKimGuTl
7m3Q46fCJVp4q4ZiLUzWPJEy5bKh6o7TmRjnV9BB20bhmOVAoaiwwDm9Hg6X
jVxhs3KhpjG/1PhSAziRTsRq8h9BwGOrxQ79RlAtib6oxy2CGuWV0H1aTSDT
6xA5HV4CdDqH2N/WBEQxakSRWSn84itJ87zQDOFPXGrTWWVAsN1sUVfXAj9/
76pW5VfAWSjKM1Llwbb8KQ6dWwsBmw81NLq1ww+2uznELC7UvAvMdOW1g2FH
SflEeB2EOcQlrOh0gIbobFmB2Ss4EZj6K5ndAcSC6N40VgOkSkecu3O5E+ZE
lG5l/hsQnzA/xzbpgtcP1Tu0uTxgF+ze7WLQA7KHdm47bt4Kjr9n+B7w6oEj
siFZxcWtkOycUUe43gPfY7gBlv/hgwc7ZrPpZA/YHvZeco1uh64XZy1scnph
4Kar7PYHnaBvUmnVsNYH+xxv2Bz364bWHVf8tycOwoq2xqfr2d1g/HCiSati
EPJWy3KKB7qBltDo2TEwCPMV/cR5zx4getN2p+oNwW26QXuUQy8IJZNZTS+H
gE9o8U/R7QdTkbFu+PgwONaSEus+DsEvEut+LKYI4LWfn+y4xjDYnGEG+igJ
wF7qVZrUgWFgOcl8WNUTgIXXhewDzcNQrZx+aZOTAPQWZ0qFBe+h6KB/LTte
APHKgdMp5gIQtjlUMVYFcIy1R7p5YRSKP3lcVJkYBQO+oqfphQngRT0UP3Dv
A6j9doNX7zULT12bKtYlfwQF/a1uP00JwfYQCWSDpiHwhdHeVf8FIMyed6/s
+y/sKuuL8zBcgrwoKfNU5zkYyw4zkhxZAa8WdsKXf32GsUdti8sGBKyzISez
UAjsEu6pFqo4asq5/57oOA9L8sJznD8kUIzqlxG95QtsXbz/vC2WhC5Ce9WV
DV+Bc0sn2e4wGVWCTaljS1+hL3bu61tlKl5euZJLa1uAnfqpn4uWpdCG7BO2
/+nfkLirTK/unTTWnvOyunp1ESJ58p9mE2noVsKf2r/rG/Su6etaWcig3Prm
UEO1JXD4Y0bp+iZZDHBStacNL8He4My+OPJGjLxdO+peJILOVokqhYWNmGJt
0hwWugy5PncGqv+UQ1LmDWKQ8Qpsalr3ltgoj8QHGrrHvqzAoG8h4UjeJpSk
hyiSi1dhQ6U4a2+MAi4kyXKsj3yHyXHnsM8hilixbB2sSl8D2R3lA/ddlVDQ
Fn+/qG8NRqIo0l/slNGx2JJU5UZA1VAV71FDFQw7UtodXErAwgx34XuyKr4e
kHw8RhXDwfQznr8uquKaeKNLYLAY/rupSrS9Vw1PhMXIT7eIoUf58/qb5erI
VFtMtNYVx8nwxx7xDzRQWfOYoXGCOLYHVxncitbEa9k1l/0+iuNT9UMfsy21
cEaBH1e3RwKz75/wXivQQmlzJN4tlcCdooMjRgra+Ff9SNykDBHr3tQ5lyRq
o0qILm9HFBFHmBUsi1Vt1PGJUzg8RsSuBS1n+fM66NYfedJjLwkv5QW5vJzV
Qb7pLW7vGxJ2TjnNnfKmo+LWOXvfLZK4mJV14XwXHU8H1OfbPZHEpvHo/HgH
Xfye49t/UoOMrut//OBbpouRNrlR3XfJmPcwgpSkz8BA97Tl24oUfNTuwHuT
zsAogevx9ekUrIz75leZyUB+jOcpj0wKNlmWiB6zGcjpSu5PY1NwOkfB8FoO
A5Nmz3RrPqCgyenpBJcCBj41UTttVUjBaplkx7YqBv4Wl+8dVUtBnsdAQ283
A43t9hz7SUDBIVKyV0svA69MxMnnjlFw7oWDsLqfga58Q6P5cQrK6JRoZQ0z
8OeNGSlp0xTcNx8T4zPBwFSFbPfReQq+T2HYjX5loEqawbNbJCr+5TjwrvNv
BlZMDK1+IFORsJwU/PobA9WsXJ7bSlGR7v+NnbfCQOn99JOzNCoGmvFER4lM
vHSvQeipRMWIyZiU/ZJMlLDWyitRoeINtrmhE4WJthJTDRR1KpZIZHvpSzOx
7Gqic702FV8+9xQq0ZjY+rbvmZouFTuCyNepMkxM8gi8FsGk4qgmV0sky0Tc
Gtrao0/F+a7T1TNyTKTn/xBrbkTFfwDkghYk
          "]]},
        Annotation[#, "Charting`Private`Tag$31777#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk8FPgCAPDBjJmRJiL3PWacsUXO+P32KUeJpaYSeS0qG7ookato04ES
OaZHUqyYxCAx0+8nLbYxjpWbHJHjyTbKyiD73h/fz1c34Iz3cUkCgRD2P/9/
tWeb9fOdqY7LF8187JWtkVKMwkg2LwT8afF5jKdZhCo3co/78S6Dw2bJ2RSX
clRmNr/VSpgE7s0KYIgBFyX0SBo58m6BblqfAVOrBhmjDZsLWXdBS810WWld
LVJUuL/JQJgBYmmRrVrK9Wiq7qmMOY8Nau66nIt3RaiDtoPCtcgHJeKSYtcs
jI5WjFxlswpAXWNRuWlsA3IhnUrQFj4GQU9sljoMG5E6J+6yAa8U1Kmuhh/Q
aUJyvU7RM5EcQKdzif1tTYgoQY0qtSgHv/hL07wvNaPIp271WawKQLDfasXn
t6Cfv3fVqgurwHlQWmiiLkA7iqa5dF49CNp6pKHRox39YL+XS8zlgbp3wTnu
gnZk3MGpnIzkgwinxORVvQ6kJT5fUWyBwKngjF/J7A5ELI7rzWQ1gAzZqAt3
r3SieTGlW1X4BkhOWl5gm3Wh1480O3R5AsAu3rvXzagHyR/ZveOkZStw/j3b
/5BPDzomH5ZbVtYK0lyz+YQbPeh7PC/I+j9C4MWO32o+1YPsj/ouu8e1g66X
563s8nvRwC13+Z0PO4GhWbVNw3ofOuB80+5kQDdo3XU1cGfKIFrV1fp0I68b
mD6abNKpGkSFaxX5ZQPdgJbc6N0xMIgWqvqJC949gOhL25thMITu0I3aY5x6
gUg6jdX0aggJCS2B6fr9wFxsqh85MYyc60kp/I9D4BepDT+WUUbR64AA+Qmt
YWB3jhnspzKKHGVQpsyhYcBykfuwZjCKrHwu5R1qHga1qlmxW1xGkcHSbLmo
+D0oPRxYz04aRUmqwTPplqNA1OZUw1gbRSdY+2SbF8dA2Sevy2qTY8hIqOxt
fmkSCGIeSR66/wFp/HZTgH3mwDP3pqoNaR+RkuF2j5+mRcD+CAnIh8yg4Jcm
+9cCFwFh7qJndd9/0Z6KvkQv42VQGCNjmeE6j8bzIkykR1aBTws7+cu/PqPx
x21LK0YEyLcjp7GgCLE5vDMtVEmoreD5e4rzAlpWFF3g/iEFJagB2XHbvqDt
Sw9etCWQoJvIUX1101fEva2X5nCUDNVCzanjy19RX8L817eqVHhl9WoBrW0R
7TbM+Fy6IgPtyH4RB5/9jVL2VBjw38nC+gs+NteuLaFogeKnuRQa9OAIpw/u
+YZ61w31bazkoMLG5nBjjWXk9Mesyo0t8jDIRd2RNryM9ofm9CWSN8PoO/Vj
nqVi1NkqVaO0uBmm25o1R4SvoAK/uwO1fypAUs5NYojpKtrStOEtsVEREh9q
6Z/4sooG/UsIxwq3QGl6mDK5bA1tqpZk7Y9Xgoup8lzbY9/R1IRrxOcwZVi1
YhuqTl9H8rsqBx64q8DRtqQHpX3raCSGIvvFQRU6l1mTajwIWD1czXfMWA1G
HCvvDi0n4JJsT9F7sjp8PSD9ZJwqgQezznn/uqQO1yUb3YJDJfC/m2rEO3s1
4KmIeMWZFgnsVfkC36rUhEyNpRRbfUk8FfnEK+mhFlTVPmFsmiyJ20NrjG7H
acPreXVXAj5K4meaRz7mWevAWSVhIn+fFM57cMp3vVgHylpC4r1yKbxbfHjE
REkX/oVHEqfkiJj/hu/KSdGFamH6gl0xRDzCrGJZrelCPb9EpaPjRNy1qOOq
eFEPevRHn/baT8KxhSFur+b0oND8Nq/3DQl3TrvMn/GlQ+Xt847+26TxUm7u
pYtddHg2CBc5PJXGTRNxRUlO+vB7vn//aS0ydt/44wf/Cn0YbVcQ032PjAsf
RZFSDRkw2DNz5Y4yBT9udxK8yWLAmFH3kxuzKLg68VtAdQ4DCuO9z3jlUHCT
NUf8hM2A3K60/kw2Bc/kKxlfz2fA1Llz3doPKdjs7EyyWzEDPjPTOGtTQsG1
cmnObTUM+FtikW9MPQULvAYaersZ0NRh34mfRil4iJTm09LLgFcnExULxil4
/qWTqLafAd2FxiYLExQsp8fRyR1mwJ83Z6dnzlDwgYX4eL9JBsxQyvMcW6Dg
9+kMh7GvDKiWafT8NomK/3IeeNf5NwNWTQ6tfSBTMWElNfT1NwbUsHF7YS9D
xfTAb+zCVQaUPUg/PUej4mALgfg4kQlj7zeIvFWoOGoqPv2gNBNK2eoUctSo
+Cbb0tiFwoT2UtMNFE0q5kjl+RjKMmHFtRRXrEvFr154i1RoTNj6tu+5hj4V
d4SQb1DlmDDVK/h6FJOKx7R5OmJ5JoTbw1t7DKl4oets7awCE9KLfkiwNKHi
fwAV2Uyk
          "]]},
        Annotation[#, "Charting`Private`Tag$31777#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0wtMU2cUB/DbB6WiTCjI29KqZaAbqxsxasLakIzBlmWmTiZujmrmpILr
UIOmc7N7dAGckiUb2XDTbnFiyWCG0E4gc3fdw3QGs5TXcDjaBjPaiWCxLW2B
rud/bdI0v/zPOd/5enPl+/WaA3yGYV6Pf+k3/mFvtfym+iVQOHxt0/BPcauL
YyPkksuacbK28iuPym1IvxVZ5yEz/E3/kttDnVNkdn7pHlwzOE2WnX/NTzb4
/vChf84UQF778l3UNznD5P6cwCzZWGCPqRpKk84YxH742gWeOu5kpXQe9W6d
gNy1i/8AuUGRAB/MCCB/xSwiPy7sg7V17WLyjN4eRP3m40nkwykDIeTvCVeh
v7d9Afcx2JLRv68gjLxNvpo8OHSWc2NrCvlM7lsRnHf4WCrcnR0lu/aUSbBv
qw1mr76QhvzE7UX8H35eOuxtXsK8l5zwzPUo7Kpl16D/ctEybP0wA/sNJsNM
WJsJx+Zh49HyLPiGJ4bn9WtDtvqq1JThPsawZHcEtnmucL44mUNutCzCrvHv
csnBtG08srbfkYf63Z9w1hxcS97S6IBdwl4p6t0aPpkZ2ZqP+i2fwmpjCK6q
d8NG62cy9H9eLkC/oUSO83k2mM28BI8+ky9E/2zWOnJbtR5m956GbSf7YKZm
gXPNHGzevm895m8rTsB5HWPw6FOnYfZUxQbkZVtFmL/RwnmChY3PbVTAbecS
We75cn6nUAwzs/DoZAdstrzvUJUmja1Unh9S0fyi7aPwkPIfssyz263KN/2X
YFK4yebIq16yQme5g9zcfA/5Y49Mk10VxX7ynR6rF/N8R4PkA/XyGfS/Gw2r
Wu0B55h0DvlI1RJZYmq6T2asl3jquHuqmufJ6h+dnH/u9aM/Nf5+UP+X3QHk
aW4RWSKSBsnGhnNi+EYXzAYKkx46hP1Oqlah/+zcAlk78Xsy+UhhSxh5iX41
2W8WRlTc80ohP7njC9j15zepmLdrMIo88w0J+p1vLyL/4Yk09Ot8nB2CdPQ/
WrqE/cqHYY21B5aN31yD+3XWL6N+jz0D8w5Vx1B/sylTXeE2FOkTGTXdd/LF
LPKKC2Ww0VuQDV9s5LzzAWz5tgdmXDM5ZId5mctXTuWSKx11POR7u/JQf8gO
m3uPr+XmBWFtf6UU/QN5fLguJx/7DO2EzYJEGfqvfw+7Oj6Cm5VKAVl2ewrW
+VpgdsfzcrK3cwRW/3UFtrSkC7HPifj7QfXVH8Pmp0OwJcpyee3+9XDffdjY
MACvqNucgPO6n92A+/0d4+z/GtYdOSXC+Xeliof7JyJ/8wNYNz0JuySSAuw3
MSBW/w/XOmDO
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVknk81Akfx8c45ue+ct/Xb7bElnYdW/l+aZNNJXIsabPJ8nKsTekpN615
XCUMvcptI5myg6atQWpSWVLOyabQQbUaMckM43g8f3xe79f7v/cfH7MjMd6h
VAqFEr22/1N7XWSySlGes/7BD6LrGfYQFXTh6yRxFCQbfhzyLaiB4sPxss7i
RKjbcZA2kdYACZnM28bcDNCZevGuqaEJrF9F/mYszoWp05kJ9wo4ICit0lQ1
KICDoarlA8a3YOcPyp9UuEVg5jiWHhbFhS9Vb2tUxKXQyR5uDj5zB0h6Hf7X
oxJMa/TN2m3vgvfyIVuaQTU8vp8zL1G5B/VX/5ancWsgYEdeiyGbB4HUqrty
4mvQuK1y9gvzATCG/RoYjxpASB0XbYKHEOAvt++MBxtmRSH+qW8fQoZN61Zp
gyboXRqsE5h1wst/6DrSXA64nHeIS/mtC87arfZQxa3gaV0qdTPrCVQbPe/g
jbVBk7ZOxGbpp3CL4LSkP7oDudNWW1/EP4XYGI5PmsddmCn6xiTTrhfKd0a6
ShnwgNfhxozS7IP5Wb6RFPcB7FZ1fzTP6Yfa3Q2DFPFjYE+zudTyIRgYZC5V
xPUA6Hj/8fbxEFAOJ1jC5x7oOZ3x41HJEAQcdz+RNP0EDoUev+3mzwe5fbPy
SbG9YOHlRA4pPAPuyZyrC+H9kGRmpPPwyDCYd7a/F/ryYaJwq8dP48/BUbk5
kcfkw4p/z/x+uRHw9K5VKxjgA0t/2VBt4wgkvsh13Oz1DBrPdG8QnRwB/kxA
ZsyeYSindfskK7yAbL05+kfX59D5bsBCff1LmI34Kmzi61Gw7Z3yiHcfAzuW
YUROxCgsSmkV64aNQeyUWvTmmlE4otfy/aWMMZiLXIhN0h8D6ieW3g+8MUi0
D23Ppo7D4PWWelujcUhxsO82F4xDvpZ1YW/BODCchl97815D+KmHOpviXkHh
dkON5qhJGD060kcYvgFnkfPn6lIBNDefNqmiTkJG0kKP6w0h1JveDw7reQ9q
diEaJf7zoMVgBZ3bOAX1OUXcj+6LsGk+J0bpnACUnLUs+fQVEJ26PL3/zifI
9up31nxNQQnNk83nz0CxX7KR4zMqeqj5lXz3bBbmvrE7ocaSwZgN0l7SbUK4
2Z7LuhEnhwPvbro3FH8GSlk30zeMwIiCpZLChDkoO6Axf9VBAcfFDnluHl+A
F7RdXmKrhIsJb9hvyXnw0FBd1jFSQeMYhzLWwjzQq96Hv/+gij7XWh0zuCLY
6XLg/vNpNZyz6IiwzRRDlbG9isGwOvY7Ux7t3bkALlaKTf8MauDvbU6/XlRd
BM30LW4rjzXxgmXKhGhgEc51Hy5OvLEOl2yFjalZEtjrnAyn/9TCbZWOsi/3
LAGnrPLy04vaaGnoY2tHXQbPA9qLOSk6GHZY7sS25mWwsUuue3hKF7nyIuUH
sSvAWf6gcfBnPbxV69TtZrUKacJd/OhD+ugSmSvonFyFlO0LWZM+BijwO74u
15uCZFzDwq2thmgdYp3GZFFQne/Lk7c3wnTl1BmmkhTWWEjtumFijKqXfk1n
h0lh5KPVlg4ZE1z/bbx83T0pjGPOZB1YNsHBtknWeksqrrsilC+PNcWNAf9x
Ukqj4nndXxK8Zkzxr/EpC8kkFYNTR7oaQ81w4ad+5dRd0ri7MF7jwbAZVrhe
Nzt7RRqHuAWMC77m6MSrD8lSl0HO8LVh7S5zZN49fizgpAw6KKK/r7sFVmy+
ferfCRnsf7/U49ZhgRmC7G2afrLIa20xn3CwxGBtz89e92TRp+bzH64cS9Ro
OHqly1EOv/vdRnrvBivMT1mNrGOtuUp+oEKZFVrZU4+1mtBw5Fr0KEOPxNBR
94nVKhr2uexB9lkSw7uSJBqmBLYmsD7dzCPxfu2Okv3mBNZyFCra8km0+mpH
6TlLAuPX/73cVURiQDyLp7ieQHN1t5aJMhL5w3trFewIPDEO9gYNJM5IioT6
3xOom7JlI+MJia/lWoWMcAKptwtGcntJ9Dgg1u6LIPCjcDa7sJ9EncaMaoNo
Au/9wv5QySfRd+nQTOOxtR/vs7nSMkriRV5h1Jv4tT4juvnsNIlGpgLNwLNr
ff6MPtEMiQrVtg/q8wg8nz+RuiIk0cZcPC7JJzBU9vKYoojETsncjxXFBKoI
TMvIVRI9BQH7pyoIFJOpe2yk6NgeUn4Qqgl8HTwm2SJNR1qr+kDhZQL/GiwL
dKHRcX4okOZ8lcBqlWV5d3k6Xuos6ShkEZjrHnR7nyIdv119Nf3hOoEn01vC
fZXp2PZzCAPZBAa36usGqdJRT+ybc6GJwP8BOcsnAg==
          "]]},
        Annotation[#, "Charting`Private`Tag$31925#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk81OkDgBnX133lvq/vrMSWdh1beV/aZFPJvY42mywfx9qUfuWm5ecq
OfuU20YyZQdpM+h9Ta4l5ZxmU0gRqxFDZhjHr98fz+f5PP89Bmcj3YIoQkJC
EV/4v1V3hSXIFebYafrN8x6kWqFw/5tfx/PDQYL2xzHPvGpUdCZGzI4fB2oP
+0nMJNej2PSCFl1GKlBbeP2hsb4Rmb0N+02Xnw0WrqTHduQ1I05JpbK8Vh7w
C5IvG9F9jI78IPtJjlEIDGwmU4LDGehz5ftqOX4J6KWzmwKuPkEktRb+17kC
6FdrGiALjNy2TltIaFWBZ0+z1gRyHaju3t+SEoxq4HM4p1WbzkS+lEoszr8P
Gg5WLH8u6EJpbK/6tJ56wKVM8faCbuTjLX7yqjMdLPMCvZPed6NU87YDIlqN
YHBztJZj0Ive/ENVE2E0A/sb1tGJv/Wha5Y7AxR+G3AxKxF+lPEcVem86mRO
toNGVbXQfSIv0GOiuTWl5wnIXjQ58DrmBYqKbPZIdsZgqfAbvXTLQVR2JMxB
WIsJmJ2OBeHKQ2htmaUjzOgCx+Sdetaah1HNsfpRIf4zQF+kMyhlY2hktGCz
PHoAADW3P94/G0NCZ2KNwcoAGLiS+uM5wRjyueB0MX7xOTgddKHF0ZuFxE8u
S8ZHDQIjV1tyTOolYlzKurceMgziDXTUus+ykWEvmuN6ssBM/gHnn6ZeIRvZ
pjhmAQtsew+snRIfRy5uNQp5IyxA09zSVtgzjuJeZ9vsc30JGq727+ZdGkes
JZ/0yONsUCbR75Eg9RplaqxSPzq8Ar0fRowUTd+g5dCvgme+ngAWgwvOMU6T
yJKmHZoVOgE2hFWK1IMnUdSCQsS+6glwVqP1+9upk2g1bD0qXnMSUD7RNH5g
TqI4qyCUSZkCow9a6yx0plCitVW/IWcK5KqY5Q/mTaE0W/a0G3MahFzuVtsb
/RblH9JWagqfBRPnxocI7XfIjme3UlXCAU1NV/QqKbMoNX59wOEhF9TpPw0I
HphDCpaBSsXea0AljeZ/fc8CqssqZHx02gB717IiZa5zkIydijGLug14l+8s
nnryCWW6DtspTwtBgYQLncVaQkVeCTo2LynQWcGr+LuXy2j1G8uLCjRRGLlb
xFWknYseoWzaw2hxOPLhkVN90QoSKu0v8AwmYGjeZnF+7CoqdVdau2ctBaf4
1jmOzp8R0/+QpMBCBm7EvqO/J9eQs5L8lpqOHNSNtC6lra8hauVcyNy8PPS4
32aTyuChI/buT18tKsBVo85Qi3Q+qtS1ktNiK8JhO6GeE0fWkb2JdOM/o0rw
93bbX2/JbyDllP2O28+U4U3jxBneyAa63n+mKO7hLrhpwW1IyhCgE3YJ4Mqf
KvBghY3Ym+ObqLm04s6LW6rQWNvDwpKyhVzcVTeyEtVg8BnxiwebtpC5ZUJt
92V1yJDkyXZFbaPmrXklv5814OMa235Hkx2UzD3KijitCe3Dsjm9szso8dB6
xqyHFuR4XdiV7SaEyej69ccHtKFZoFlyAU0IK7I8mZJWOjBFNmmpQEYYVxsJ
H32opwvlb/+aQg8WxmE9O62donrQ9NsYydoOYRxdsJThvqUHR9tnaabGFLzr
LleyLEof7vH5j61MMgXfUP8l1nVJH/41tWAkmKXggKTxvoYgA7j+07Bs0lER
fCw/RqmLbQDLHR4YXLsrgscYeWk3PQ2hLbMuMENRFDez77NV+wxhAb5w3ueS
KLaWht6eTkawfF/L5X9nRPHw3OaAY6cRTOVkHlT2EsPMtlbDGWtjGKDqsuLa
IYY9qlf+cGg2hkr15+722Yjj7343Fzmx2wTmJu6E1dK+tFyur1SpCTSxopxv
05PA4/cjJtI0SBg04TSzUymBh+yPQ/o1Eob0xQuU9AncFkv79CiHhE9rDhef
MiRwTbNUeXsuCU2+Olxy3ZjAMaZ/b/UVktAnhsaUNiWwoaJj60wpCVnsEzVS
lgS+OAWstOpJuCQo5Gp+T2D1xP170p6TcFq8jZsWQmBKS9549iAJnd35qkOh
BP7IXc7MHyahWkNqlVYEgTt+oc9XsEjouXl6qeE8gUNPmt9tnSDhLWZ++LuY
L386VMPlRRLq6HOUfa99+fNOG+ItkVCqyqKrLofAN3Jnkra5JDQ35E8Jcgkc
JHZnUppHwl7B6o/lRQSW4+iXkjskdOH4nFooJzCfTDpuLkyFKLDMD1QReDpg
UrBfhAol2hRH8u8Q+K/RUl97CSpcG/OVsLtH4Cq5LUknSSq83VvcmU8jcLaT
f8tJaSr8duft4vwDAl9KaQ3xlKXC9p8D0yCdwAFtmur+8lSowffMutlI4P8B
axNdgg==
          "]]},
        Annotation[#, "Charting`Private`Tag$31925#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt021MU2cUB/DbllLsRDpsAVH6AgIuzYA4icmY3CubThSmkOm2zmhHim5Z
GNZtYS9CqxMwnRH5YJaNOa6azUxIwQ9LnDZaBGERN4hssiWSXakgrCtUoJUC
bbfzvza5aX75n3Oec5/kGiqqyyulDMNY/n/on36lx2+x9d6yf2/zf9wgW+78
xXYH1p063CmQ+cI3POQcze8esvBmso8cmYiOk81LKTNkbcvZCbLeOxogF9oM
XtR73SFyXc1DH9n+kyZM3nexdRq5qYjhHnym/ntuyo/+u9VSsi1BO0N2r++R
kVtru2AuxyYn30i3zaI/t0BB1vXa57BP1ZZlqNe0BlDfdl1Jjh6zBDFf99Fy
zPfpn+D9+m0r0N+ZNI/3736YgProBVjwz6nI+52mEOY3VyUiTy1aQL2+fCXy
/W2iG4rVOL/l3UWc36LRkNna8iXk/qQk7H/pwzDuY/s/cFS2AAvqkWT051sj
8J72FNyPewTmP21chXmKw1HcT8GpVM66yTFg3Mi46bzXylaTbTFfwfasojXk
pq+9on+LS0Oeq5WQma1jcLVrK6yvN+ow78BFmJu/CU+/5BPrja/q4WiZlMz3
uOGdtjZYcGUY0P/8KGy2hUS78mWY9151OjnBYYXdJ+7CA81OWPC/nkHOVT4X
g/M+6Yeb7jWIvpy3ltyx8TYsfN8CJ0wukyMfk2SiPloBCydPwLmFL8Zi30Np
Wch3P4bN9xtEH6xXIB8ZEn0+ANvfWX+LDa7b2+jM7mFpX+7YPfZztfOLX9uG
4atXPOwm5bAhctJD5nt3+MjnTF8+ItvPvDxNftC9AAuv/Bkgd3Vc85K5uPYQ
efMHb0+hf2JbmNXVe821Sj+L76mC4ciaCZi+XLLdmTgDN0dkcHPxLPrPX5CT
uXntHPpLshTIN9yH+brFOLJwdCCAfRxhJVx6PYi85MxyMnOp9An2D1euQL5z
EhbUaSrMu/PzPOr31j1L1ksbQ8g3TMOCdfypOxKf5guseN8rkU9lLuL+howa
zLPWLGHfzY9hric+jPMHZ5PIfPsj2JwtJKP//coI5n/nSsH87cMw94NjFfL2
PVH09/2YyjXd/PhQQTzDYb51Nbkz4yDMWErWkHcV94seM6Sh/oBawqF/Eu7c
XQqbd/yiRX2vA9bH8zrUfzsIc/tMerLK9YIU84x9cN5oA8wbcgxk/zNdsD72
nOjYeBnyFEs65h+/Bps9Y7DKmB+D+j5TBrytDha+6YVPG1yw+3LOWvhIRHR2
B6ySviXHvCsReNdZp1w8/2gm9r9aE4vzg+PwaZNEAUuOZJEHq0Zhu2kIzgtu
ieP+A2vvWvg=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk81AkfgMfxyyYGM65cMaNIhI0OHd/vOjeUq7Du6pWUyfmipCJlklyJ
UailRQhJxtES8XG0JGeDGLJr3DkiYnt7/3g+z5/Po3La19aTn0QiMX7wf+sb
q81IQsyR4hyfAmq6PmRyVsVDqeeA34hJiSl9Albf3yUZUUPhitXHdzYmz4DH
TIzzJEeCyx0v/Zbp56BOqbbbSWXCnxrDc82lZXDu4ZjsjEwcvLIT/dVJlQ0n
KEK+juQkuMYeslj8rRKSH+roKVBZkBI3lWdh+ifoeTRKX5V6CFyl/G3SorXQ
req0OiyTCblHi0KzXF+DcN8vwzbkLNBlpmyvnqkDc48LT6SoefDveo6TcVkD
PKh/ed80+SnsO+KqcNOhESZVSdEhUgXw/vGO30WWGyFmItmbI1MEBzvGTP13
NIHnAffU4+RSYOYClLu0wB/1TBcKtQJO7X5ZnmTeBu2LWj35XRWwf41LImrb
YFm165hRciVsDtxOqdRtB9NoRQiSqobJOx6heyjv4B+LUpVemRoYTdKJy/Lo
gHuTjEVLcj2UXBaqLJ5/D12BqRXi1Gagj/yaebqqG3LWGhKDw5qhSABazca7
4XLEwvnBT83Q6iR5p53aA7T4Y4p5ZS0gJ3xmreVCD/jlC0SC/Vt4efYF74VM
L4iM+FpcTGuHlTQtq88efUBXU537O74TvL5m6wm94UDsZNWAbEMnaM7elzox
zoHlZzbNFl87gfI0wtV3Sz+06l37/blHF7A+qtlK2vVDgGG/XbhuN8hwC1Y0
uf3w2jWhQrKrBy7KBsjvWRgAl+T1CCNpDtSRysbTVj+CsWL9GMmMAxrelwoH
pIdgV060WU0IB/ZPNXzk0xuCNTZF9ACHA+LV0m/WGUOQNqDO2p3eD4kPNJfK
uEPQSztZtJU2CPZuXv6MumGwev6sf05rGCR55d4DFVxQ8Sre2p41Cg3+heFm
lqPwaa7HYPQhD/4jdtU9R+xvyHQp2JkgPQdektOF6+XjEPNK09c0cQHWD3CV
ipcnoO6Qc4nEhy9wKjGYrrtvGrgBDT0JYqtQyVXyrzebhUGSnBtbbB0SlCmR
8yKfoZtk1pZv/R02biaQ4zY+wwnNknc0LT7sKHSUYHXPw897+jXM8/kx0Nt4
terRApAXfVf7zAQx4JTwH+VBi8AZCrtU2UJgsCJfmYf+EmTfWPTh8xHC3Zra
LH/Sj48bTNvsTZvRyko2Pr/+C4gW35tg3RRGB8p6ypvAZWDfE15aUhXB2ZOm
kUvaK2D9ZKX4SZ4oTokrC7kPrsA/DOvhKksx5B1adpRK/gr7j565fj9IHFsz
6pcKTVYhyJ/jvaIngXW0FjWtiVXQDibuxhIUHLZ3+ODOWoPRhGmmRTMFfSb6
PY0MvoHYb6Ph+6KpeIuRPpPR9w2qN+4W2ttL4ou7bo+FI9bBrWLpxSMZKSzU
kXFVV9qA61YSX+QnpHBQKzY1tWkDFJIPaTeWS2Nba7KaJeNfKJ6lGbKCZdBW
3sQ3TOg71G2vjcs0lcUek3Hy1aLv8DZAuqz9p60Y69GZtWc7CY8zrnTuatqK
5Ke5MWx/EtoYszRe3ZdDctgv44sNJLTQ9XUOtpfHE2fDDXkUPmxY+9Z4Rk0B
K2jvDTlefKjXb7Q5bFIBpw5XWBex+VDJ64FJ7VNFtNLpKLq9iR+jO3Kq915S
wr19kqkDLvzIs7oo/MFgG8a2L0SZFfHjWM9/j9pvUkZ/3XOXWEICmNh/UNiB
oYzm9VGltz0E8MB5d7ZPmzKm+f9k2FQmgCo8V750fRXU+dQ7VSwhiMR85T5u
igpyvG5zqecFMcc6Y9JgWQU/O9RoBNcL4q1MZ4NiVxouxCR5R6kSeDokJHh/
DQ3j4oJCzCIJ9HMSiBqvpSHh+1fo3A0Cww/HJ6bU0bBorSo/9SaBLIHcwqUG
Gmo3sR/zmAS2x/eOlrylocyVsr7YeAIP5ulb7eTQMNeNdGsonUBJzqKa3BIN
E9iOzFw2gbRX1/RbvtCwZfZ1y8lKArUfbTEKXaHheELpEcFqAs096W69azT8
4H3vzakaAq/P2yYn8dFR9/jKwW2NBE5vLiVtEaOjYnfbenYngWvTh8lV4nSM
kj8WebKbQKGOFnlvCh1rIriHhHp/9FJG9jZJ0XFmI9fmAodAR5oE44YCHb8W
XF7X5xJ4lsi4/LMSHf3uOGtNjBAYyFNnjmyjY46fXHL6JwLjijAb6HR8tIsl
IDhOYHriXyWzqnR0Fo8RqeARmB/kWJOxg46Dsq8tfCYJrHAYe2upTkfZabs6
5WkCGw38ON920rH4sDujZ4bA/wGk9yZb
          "]]},
        Annotation[#, "Charting`Private`Tag$32073#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzXk81OkDwPFxfLOJwYwrV8woEmGjQ8fzrHNDuQrrVispk3NRukiZJFdi
FGppEUKScbSeh3g5WpKzGWLIrnHnjth++/vj83r/+VE7E2DvI0gikRj/9X8N
TTVmpEHcsdI8/yJqpiHK5qxJRlDPA0ETJiWu/Bmy+f4+xYQaAa7afHpvZ/YC
8ZnJCT7kaOB2z9ewdfol0qTUOuymMsGfWsNzLeUV6PzjMfkZuQTwxkH8Zxd1
NjpFEQlwJqeAG+whq8VfqlHqYz0DJSoLpCVMFViZ/4kMvJpkr8s8BjyVwh2y
4gj1qLusDctlg/zjJRE57hiJ9v80bEfOAfrMtJ21M/XI0uviMxlqAfh3I8/F
tKIRPWp4/dA89Tk4cMxd6bZTE5pUJ8WGyxSBD093/S620oTiJlL9OHIl4HDn
mHnQrmbkc8gz/SS5HDDzAah0a0V/NDDdKNQq4L33dWWKZTvqWNTpLeyuAgfX
eSQCtaMV9e4TJqnVYGvITkq1fgcyj1UGoTK1YPKeV8Q+ynv0j1W5Wp9cHRhN
0UvI8epEDyYZi9bkBlB2RaS6dP4D6g5Jr5KktgD6yM/ZZ2p6UN56Y3JYZAso
EQJtFuM96ErUwoXBzy2gzUX6Xge1F9ESTygXVLQCBdGz660Xe1FgoVA0cHwH
Xp97xX8l14fERgKsLmV0gNUMHZsvXv2IrqE+93diF/D9mmsg8paD4idrBuQb
u4D27EOZU+MctPLCrsXqaxegPI9yD9jGRW0GN35/6dUNWJ807KUduCjYmOtw
Tb8HyPGKVrV5XITdk6qku3vBJflgxX0LA8gtdSPKRJYD6kkV4xlrn5CpcsMY
yYIDtPwuFw/IDqE9ebEWdeEccHCq8ZOAwRBaZ1PED3E4QLJW9u0GYwhlDGiy
9mZyQfIj7aUK3hDqo50u2U4bBI4evkGM+mFk8/IFd05nGEjzK/0GqnhIzbd0
e0fOKGgMKr5mYT2KPs/1Go0+5oNfJa575kn8jbLdinYnyc4BX+np4o3KcRT3
RjvAPHkBbBziqZSuTKD6I65lUh+XgXdyGF3/wDTiBTf2JkmsgWqeSlCDxSwa
JCl4sCU2QJIqJXpe7AvqIVm0F9p+B5u3k8gJm1/QKe2y9zQdAdhZ7CzF6plH
P+7jalkWCsIQP9O1micLiLwYsNZvIQyDvUX/qAxdRJyhyMvVrQQMUxao8DJc
Qrm3Fv0F/EXgXm1dVhBpGXnfYtrnbtkKbWzkEwsblpF46YMJ1m1R6ETZSHsb
soLYD0SXltTF4Oxp8+gl3VVk+2y19FmBOJySVBXxHFxF/zBsh2usJSD/yIqz
TOpXdPD42ZsPQyVhW1bDUrHZGgoN4vitGkjBelqrhs7EGtINI+7HExQ47Oj0
0ZO1jkaTpplWLRToP8H1MTH6hiR+Gb12IJYK7zAyZ7L6v6HazfvFjo7S8NV9
j6eiURvIo2rp1RM5GVisJ+euqbKJbtpILStOyMBBnfj09OZNpJR6RLepUha2
t6VqWDP+RaWzNGNWmBy0VzQLiBT5jup3ooRsc3nYazZOvl7yHb0Llq3o+GE7
jPfqytm3k4RPMq527WneDsnP8+PYQSRsZ8rSevNQAZIjfxpfbCRhK/0A1zBH
RXjq3DVjPkUAN65/azqroQSraB+MOb4C2IBrsjVyUglOHa2yLWELYBXfR2bo
uTK00essubtFEMd25tXuv6wC9/dLpw+4CWK+zSXRj0Y7YHzHQoxFiSAe6/3t
uOMWVRikf/4yS0QIJ3MPizoxVKFlQ0z5XS8hfOiCJ9u/XRVmBP1g3FwhhNX4
7gKZhmpQ73PfVKmUMCbmqw/w0tQgx/cuj3pBGOfZZk0arajBL051WmENwvhO
tqtRqTsNLsSl+MWoE/hMeHjYwToaTEgIDbeIJnCgi1DMOKJBIuCviLlbBL52
NDE5rZ4GS9ZrCtNvE5gllF+81EiDus3sp3wmgTsS+0bL3tGg3NWK/vhEAh8u
MLTZzaHBfA/SnaFMAktzFjUUlmgwie3MzGcTmPbmhmHrMg22zuLW09UE1n2y
zSRilQbHk8qPCdcS2NKH7tG3ToMf/R689a4j8M15+9QUATrUP7l6eEcTgae3
lpO2SdChck/7Rm4Xgdenj5JrJOkwRvFE9OkeAot0tir6UeiwLop3RKTvv1/a
yP5mGTqc2cy3u8ghsDNNinFLiQ6/Fl3ZMOQR+ByRdeVHFToMvOeqMzFC4BC+
JnNkBx3mBSqkZn4mcEIJzAV0OnyyhyUkPE7gzOS/ymbV6dBVMk6sik/gwlDn
uqxddDgoj638Jwlc5TT2zlqTDuWnHepVpwncZBTI+babDkuPejJ6Zwj8P9Y/
XNs=
          "]]},
        Annotation[#, "Charting`Private`Tag$32073#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1A1Qk3UcB/CHjdFg6sGYOl73IB5iZG8jPU7ieY7S07K7LCZS2C0Oli9X
6ImVWReF2OJEMncBkrbktIaeCEcnh6QzM7IgiBvRQdhDhNCAtcEYMNnW8/uu
3e12n/v+fy/P4L+kguIXiiQMwxSKb/oUX/rWxNucwWDYvGd99w3Rwlc/9HNa
rbZeefYPuH1E4E7X1jbxvw+TrQMVo+QDqtBRmL1iJ0eF9d/Deeaui/zYRZMd
Pl83A+9fPUnWx/zlIZ/0NjuQd9R4ua7Ozh/fNjmR73jPD7Mvu9DffjBANvZ+
DAuX3gnhRcu3l0/j/K58KTm1umEGrtkmQ37wQzeZ6ZsPI49bPp8l80fK5GRj
cqGHbN7zSjjqo4ZhPVOsgLNOzWFe8Z+w3HkTLpWcXobck72A/VqXRpK/3noV
5nX74dTDUi/qVx+LIm8ZPQLr/U8pYXYSZtpio9FfZb+PvHMI3r2xYhF5+yYV
8ulJ2Fry4nL4/G4f+v+zfAXmj9yArQ3dcKqa9yPvObcSz2tZF0D/kSI1ct0g
zNf1qXnx759jYRkr5WuEGLIt/jVYmP4ilpw+VgvzLcY4nF86BZtLU+LJ7pot
IWT2xDewacwIMzkjCeiX9TdszahPJJfkRUtQv02nIatmc2Hh+DicrvwSZpxv
sqiXumGroQ829Wuk2IfXJiEf1wVdWQ3nXGuB9Q3MKvSvfCIU+ZICuGXvHVif
fR22fb9OhrxRlYz+aWUw0zbwHf3/LVaV2zh6vp0ZNnLm9aN3ycztqiG6Pyd6
jcPwrtfH4OfOjHLB+2MnXy7tuYd6FeeEdVvHyVZ/s5v8S9XgBNn8Ufk82aHq
mIK9+QvkNzZoHajfPuCj+5nbfc1JLn2kk+FFvyX514V8fWYIecNDa6exT/EH
Ulhtn0G/+JdkOO9odMN6Wxj8/sOzZD7vmJx8VZrp4XBfC8LJ/RvrYT56OIJc
rc6bQ32+fwnywgDMKE3LyLln+ubxfAMRkej/eMMC9g0th+d8a73IG8ui0M/X
BrPcZiX6/eSBBUERjTxs032cz56C5zRrFrHfrVMqzMsI96E+RbwfNK/9DmwO
RK5AvVXjh129QX9SGHTz8ZU4v6MXFi6L94O+r2d6ApjX5FDz4u9V3QOPMjzt
f2AwhpxWWQHrW8/Gkn++cgvmL1TEkfd1JYSQzTpNPGzeF7Q8LoH8rPVbmK/d
C6edFIJ+0JJInnClS9DfYNDAJYdgc1cEi3nvNsNs0WH4YodCivrE32DFp1mw
eUi8HzTfcggWnq6BJ57vghmlO+n/fUMx77NXV2Gf7Kag2ZuwQpsiw/kn45KR
/3pUxv8HSYNgmQ==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzXk81AkfB3DNTAyJHMk5DPMbueJxFvL97qoWDVpnHmfOespu5VntPirt
xtoKj6bsRGKzRZRiOh6PI5FrmNyGYjKklXHM45gianeePz6vz+vzz/tDj/7W
L44kJyeXKMv/m9ZYdXK3bbZbtWrNUmDMTris/dGD/PAoiPhmeW2hpWBllzrZ
yk2BicHK9qi0SlCsQHX51jTIOW292u78CFKefcG9w70EonOnLTXD/gMfjtDL
bvtehp5+erQWrQYql+ir71uugssFvdp/FNSBsYJJXh73OqSJs2qlac9gJMdk
Wry9CP794OyZvPRG8NrM1i/0vQm6dVrsv3/fBBQO+5ik5RaIHfxL37k0Q3L5
FWU29y48XMoWC8LbwE9y5VFNYgWYQ9TANq12sLa/GvZm+wOI3pBOo/DaYTnC
Kyjftwp6N43cv2zUAfffeZXMtDwCwm1AnlvEB6P1/fuyubUw/Gqdk5rRA9k0
Vr5xTh3wl77Wc+L1wDqy5p8k1oMjterVomIvvExn/Tq2vQGeB4UmF//SC7wM
ZtI130Zo1jfdKk7pg5/UTJ9PtzRDlMjBNh8HQMrYHpPJ7YShhXJHnbghYOkT
u+6Y88FzV4xpG2cIbmkYqzYX80FXuClHqWMI/Ej6tWvsF+DctIcZZjUMlWOq
GkeTumHmZHJkomQYHF+kjDPye6GFM/2VTswrWMiIuUwOHYS2q63OIxpCKCBH
n1bjDIKUZ98gcBWCR2pUgmH/IHT5Vfrmxwnht+Tw3S77BXB/8F9WZ54IwScu
ePqkyxDMmGnW8wJfw70v938xofcSaLoHhi0ujcHhT7YLz0ZHYY3R0tItFkFF
YKrKgKYQ8m1LXAPWRLBY0WkxxZL93NVk8jaNQ0pEbPzmeiHEHrtITrcch+yG
3JGQG69BXiIt8kwch1e4Hr26QwR2XjeKzWbHQY4c6c2WjEMwp1Npt2gCWBkM
4+bjb0GeTDgISidhLeHE1LLvLDzxFicKWqfgYOA+R6OJBRhzh+nwVjF8+azK
IC9MCoKVvpIPB+ZgRxglroi+CjamW96UjEqAOenkrDy4Dllv5iaZOgswlM/Q
jWfIYdHx8IKnRougP2rUlkkm4dPBb3IXbJbAjJQpL2wiY6VVQdk+xjK4Fk5l
Rv2wEV+zOq1tlaTQ0+f43DxQARtm1eP91qRgObt8iaamiO1nJbWpg+9BsbCE
ErKohJo+iW7naz/AbItHc2uHMk6G9D7O4awApy9EK+K8Cuo4dp12j1qFCRdr
5UKbLdjqW3cs1+EjjModEdxUVUNj7fadaqsfQYtdsOKxQR2nSY+LEnhr4B/h
8fTCvDoG3XvCHWavg7TAwnusUwPFx/uTg1mfYLiUaj9cq4mxdE8XQuMz0AiD
ybfXt6KlwSPz8Y7PkCAsc8o6pYXVxI8ZZ8/8CQuHbN4MxW3DiYnIwBmaHIoO
zgc77dFG+ZJ7pQbfy6GKfgnD2UEH238WvjgwLIegK7gqoOuiyphUlOC4AQcv
7u7K+KyLqYE1idKsDXivrTBydE4Pt4lJE52zG/CPZKeavS/0sZO5eC5gLwlN
DnlUe9wxwOyd7l67Ckh4c5u/iiSXhhzBj2X1H0l4HnOtypMMsfJTYwn4k7E/
/7AfxdYI6462cu8+JOOvPsWLu4uN8Fx2xs69KhR8ZXgtds8WOjaqNP5cl0BB
GLr4U0EGHcsDbZdu8igo+Epn45/v6UgLcjw1T2zErMJbdg+/Ncb2v5mOG17a
iC3qs3b2f8j2lF1Xv2QjWmP3tYYAE6Qd+GXR2Fcea/wflBXwTfDEfPhTs2p5
PGVkYZjmykBJxe+Na3oK+FgpJn5nOQPLEvnHK1MVUHOEE+JGJ9Di7od883kF
vB17uMonh8DQfSG3S4OpOJCTdsONTWCuQ8TXaSFUpNT/dmHHVQLrPCttDoVS
MXbry0Mq1whU1867oBdJRUarp3pXEYFZasql7Hgq3jK1SPJ+QKBGk+rti9/J
tnjOntVFoL53SkDxFZmvpUR37SFQ0ql2LT1X5rszN1v2EfiOtaR2hCPzr0e8
3SQgcGVq9Y7NdZnP6s7tFBJouMKLbyqWeRWV773mCCzb4eb0vyqZ95I/4Swh
8KCv2YzgocyTn+4yXyAwZWReUP9Y5kXQS5WkBDrc/CYo878yT5Ud3LFO4HiY
4opFIxUDXO6713wm8AIpJ1HzORXTEjqsy+WY+ESnXu9TMxUnG0jUixQm2qee
MO5up6LmLG35B3kmngmzTKnuoOIebRfRESoTfXjLysV8Kv5zTzA/RImJS+WT
Q5e6qPj78aRqT2UmPl7cOvpdDxX/AhGjIu4=
          "]]},
        Annotation[#, "Charting`Private`Tag$32221#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzHk81PkDx3HGYEjkSM5hmO/IFT93xOezSy0atM78nDnrV7Or/Fa7P5V2
Y63zp4kdJJYtohQjfn6OPl9yDXIbwuRIK+OYn2OKqN35/fF+vB+vf56UiG+9
owliYmIM0f7/5LbaK44W2U6NCk1bfpF26LbaR1eJuotgrt+woDuoAplaJi12
sRPBwnhNT3hyDZKphkpSXckg55rZbo/9M5SIf8F+yM4AczevmagE/wd9uECp
fOB1GwyNUiJUyU2oZouy+74zFzikaTb/o6gF6UnrFxSw74JkflazMBlH0zn6
y/yjJeDfT29cL0hpQ+4HmVrFXqVAo0WV+ffv2xGRxbwk6LwP+NY+Fe8cOlBC
1R05JvsRqNvK5nNDupG34M6zJkY1MALhY0dUe5CZVW7wm6NPQYR4CpnI6UHb
oe7+hV61YPjA9JPbur3oyTv38pXOZwBzGpNil/Qj3f3Tp7LZzWByap+VlDqE
ssn0Qr2cFtC/9bWmLWcI7UP6egOjFdiQaqc2ZYbRqxT6r7NHEXjhH5RQ9ssw
4qTS4vO92kCHlsFhfuII+knR4MVyZwcIn7O2KIRjSEg9GpnJ7gMTG1U26tET
iK6FHX9o1A/cjkcadLMm0H1lPYWOsn6gwTuQI9s7gbwJWs17zJfAvt2FFmw6
iWpmFZQvxg+ClSsJYQzBJLJ5mThPLRwGnazlr9Qjp9BGauRtiaBx0J3bZT+t
zENFEhHXFFnjQMixQtwTPOSaFB6rMzoOBrxrvAqjeei3hBBHh9Nc8GT8X6bX
G3jIMzpg+YrDBFgxVGnl+L1Gj788/cWC5itA1jgzaZwxi85/stjAZ2bAHrWz
c5A/h6r9kuTHVHig0KL8hO/eHNqs7jNeovOA6yMVGufAPEoMjYo52MoDUZfS
JVJM5lE2ypsOvPcaSAmEJW6MeTQF9yN2j80BS/d7ZYar80hMIsyDKZgHAaw+
Wce5BURPpep1xL0FUhKYNbdiEe3FXl7a9loFDR58BrdrCZ31O2Wju7ABZp3B
ckgXH32J12oXBAsBd2ek/MOZNXQsmBhdQtkF5gaH3pTPCBBt0dZebnwfZL1Z
W6Spb6CJQqpGDFUMlsSFFD3X3URaM7rdmRIE+Hz8m7wN8y1kSMiU4rVLwBrT
ospT1G10ongpM/wHSfia3mdmIStEQyM2L4z8pCFaVYrx3hMik9XtDLKiDOy5
IWhOGn+PZIrLiYGbslDFk+F0q/kDWu107ejqlYOLgcP1OawdxBoJVA29JQ/V
bQauOYfvogUHM7li80Owy6vlUp71RzQjdoFbqqAI9dR67BR3PyJVZtGOq7gS
XCbUl8Ry9pBPqOvztHUl6P+4gT3J3EfCImOP2T5lyI8bTQigf0KTFSSryWYV
GEVxc8CUPyMypr349u5haKL9zGi+9zOK5VXaZl1VhY3Yj6k3rv+JNs6Zv5mI
PgIXFsL8Vshi+NzZ9QBbFzUoVf64Qvt7MVxeq5xqb60Oe37mvTwzKYYDDW4u
l6IB5WeFc7E24vh4uuNA6mcNmOTXxBBmieOPu4vDZtY04RE+YaFvVRz/I8G2
6eRLLdhH27zpe5KA659zbXR9qA2z7ZzdjxcR8NIjPvKCPDJkcX+sbP1IwG/B
PNOqeB1Y86mtHPhI4KOF572JFrqw5WIX+1GdBP6rZ9mmY5kuvJmdandSnohP
6eRHuRyiwDb5tp9bYok4mEj/qSiVAqv8LLZKOUSc+5W65J/vKZDsb3N1HZPE
s4rvW9Z9qwd7/mYwr5MhiXcqrVpa/SHqJcuBUYEkbgYH85GvPiSf+WVTz0sK
b/J5WlnUrw8vr4c8N2yUwq/qGuskn6BCQfXvbXua0ni9bGSMXRUVVjL642qS
pHGVaVagEwWDxo8+FBqtS+MPos7XeuZgMOhU4IOKABI+lpN8z4mJwTzr0K+T
A0k4sfW3tGO5GGxxqzE/F0TCow6/Oiefj0EltYI0zTASTu1yUxoowWCWolwF
M4aE3zcwjvd4ikHldoUH6d+Jmr9mRR/AoJZHom/ZHZGvKks5MYRBQZ9ifkqe
yHemHTQZweA7+pbiBZbIvxv69gAXgztLuw/N74p8+mBeHw+DOjucmPYykVdd
8959DYOVx5xs/1cr8l71L9gLMHjWy3CFWyfypJYHjDYwmDi9zm2tF3mhlApZ
IQatS7/xz/yvyFNgBvTuY3A+WGbHuI2E+zo8cW76jME0Qg5D5QUJT47tNasS
o8EG9VbNTx0kfBERSOlEGrRKuqw32EPCVVbJ2z9I0eD1YJPExl4S7qLmMHeB
RIOenG25sn4S/k+XgP5AWRrcqlqcyBgg4b/HxTe6ydFg/ebhme+GSPhfQutZ
bg==
          "]]},
        Annotation[#, "Charting`Private`Tag$32221#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0w9MlHUYB/CX87g/HAzuOA/wIO5vagXGRMhc3lvkyGwFSBic1Jt5pI7I
+aexYXmpp7GBiUx0no1zlFFtOGo7axDc9Noq0JLawdLsLGoIwQ7uD3cccN3z
fbvt3e2z7/M8v+d3t1e76+0Ki4BhmN3xh77jH05X/71ptGv/d6Z6z2DcDk/h
HdO/5V9X9I95ya7e/HGyoqD+L7L1XMkU+cD5kb+R5zfMks9uKHhAZv2n5+Av
5JNk5sLvIfLItfRp+NL6CPKkz2fIXF3dsim0ZufWwXWz8OWqBDZu6cHmOcwr
OyIg7/UV+8leryyR3LymM4DzD7WLyFtXVwTJmpJLEtTPd4Rw3rbqJNS/aZmH
b2Ulk9f+w4Xh2mn4gfYq70ZZKvKh6xHcV92ahn73yAL2+00tx/yB8ij2admj
gB8+tIh6mSEd+5ychB1OnRL3+fTiEvZ7YvVKOPfKMnxdpIIjFTG4ZlzFNil7
xo9kMi7q5yozyCcChbx/ejkT+XOnYHaHOYssbBckuHD+7lVkd8ZR2HtuDv7Y
2cdbIM1G/cyzArKmaBF2iztg1hjMQX3xbdg7+vRDsCQAu/xP5aKfqV5BZsR/
8P75I9ha065BffZ6oQv/p0oL3zwOa051wCcs92GvdAI2hNWJ8KMWHeqTOmHN
kA9239sowv2b0/ToP/w8rJlu5Z3SDbvSxAbMeyEGc/2VvN8oFWO/dclG/H7R
YxLM01fzVoZgb54PdpsjUtyvt2zIpOwpfbdR5TVR/ZMJt8m17NX7ZNfw8Dj5
rR9vTcJNc5PkvBpmhsz90j8NG9xw/P3ym5JGu6qMN3zI26aD5CJ71yzZquxZ
IHc0cH6yxja1TPbcOBMgsxvuMSzlocog8vdaBGRPnT6E+dYrQvI7m/LmYe1p
Edm5+ROYee2ChKw6aAzDH26Xkqv2fgtbBzplyKVjEdznwEQKcnNsAfkeeSrO
U7BR7O+zpWGfpa9g70utcjiwdhH9mscV5NDOPtjrK0xH/8ngEvLkAiW56FVJ
DPNqs1fivO7jMDPcADs9x2DHrEKF+YcHYddgfQZrmyqPnhcyLO2X93om2bzR
DLOcJQvuvst7i3gV6h/JTyA7HitRk+3yYZhpW4bvfBDh8y2hbLLaphBg/vZA
zv/9sKsy/n5Q/SubYa7XlIs89Qys+TJHg/5rYTh+H7ip3bQC81JSteS+Z36F
OV0LrE4RC5F/I9Nh/zI97Li5D7bHimHm4gQc/WEfnzt36VGf/BnMvtgG28Nj
vPfnGzB/YEci6s/WwE1TjTB3V2QkbyrNEmF/7VHYbnufd/kCrP4zJmL/A2U3
RCw=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVz3k41IsaB/BhfmFEllBZmuGnIooSV8j7ltaTzkWkFIdRJ4mDjk7Kyb60
WLIm3JS9xpZ9meJIbqQsM6GJhG62msuMK7vj/vE+3z8+z/N9vq8608vmgiiF
QvFcvf9n0K/ZYflyd803uXZ5aMfsgQWpZ1OPuW6Q5N3evqYkC0qpzu8uc/3g
9TWliJoeFvg2CK0tMkJAB3cUj0g9g3WBVWwr7i3IKjyXeLCkDJ7s89/mRIsF
RXplnzW1EjQC6C2GGfHQRhWj2apVA9ts2MCCmwIHdBsSinvrgKZ6aKyFnwY/
JabnHr/9HE4t5D60omWAscLNuECNepg9V0HoZWSCfN25iPfSf0GCynUvM24+
HFi6al/z7CWYrN3eGujyFCgGHwOIE03weZ6n+ZLPgkMThb6dw02wk2fGO0Yr
Bp9LTKtf1jTDecugTJ2MUhh6OmIuyXgNy5IHpfdyq+Fax96cob430BWSXstL
rQHrlZV7+cfbIGd++uKfLrUQm+wv11zdBpbjOY31/DoA/YQlq5i38KBF3O8w
rR4sj876umq1g3LThSntjEYYdOSfrJLrhPIQ7XP/4L4G1+QbhrVVHDC+5tY2
BC3gFLXdyHuIA3WX88xiWC3QXung3ibFhUbbLWr/CWkF1pyndpAzFzq2qn+K
39UGjxo9rkoT7+F760Znfkw7NDP3eBzZ1w0JNKK0S5MDNpY/j1YF9wI3lHTP
d+CAfc+M3f7sXlBaPqARcI8DFqJFKWnNvZAqCI7XXuTAuMRPOa8kP0Dmx5Ur
QRwu/EtwdYEa9wFKChcMdoZ0Az+3dqkuiQdt1sKK2wMfwJJavJ4f2gcO4ZHk
OzkeNAvWhDVl9MFotUqc/EEemLTtrguq6wMq46BHWj4PqtaVs1iCPjDhJ2oU
+nwE/ifjW5xf+iHvjlFsB7UfZF2nHucafoK/Bs3K1yp8hvaziW8XOwYgXTko
2sZ4GCT2Zukz3QYhPEgz3sZlDHwSW/6Io30BMeP5Dcvik9D0Q2i27d5XuN20
w9x8qxAstikaapWPwkfFH/onI2fgu9L1LUu943DEpd3yce8cLL9TvmHS8Q18
9gvreZOLUKnLiJOO4oPR792B01so+N7Ov4DUmQR52TPHpypFsDN7yGDsxyQs
aLuyJJGK/9WkODrUTIHl1mqfmHECa1IWbHXDBLD4rXQ40k8MTZ/G7ck2FYJC
8mzdxDYJnHAMHhZZEoIx+5WWRzsNffRCUycrpoFdYLyf6bAWZ37fLx/t9D/I
C5ypbxSTxvcnFTPL5GZAoOownpK8Drnhdoz2ihk4+XPY82+kLN73UDTJPP8D
yizpVmmzsqgzWvnyvvQsWOhHVxP1clgzL6Wq/GQWxMMZtmSyPBaE8YOL/jkH
8y8iXi06rcdJJ1/zqLE58K3SD/5CKqDR0y5nycB5UFeneAfPKWDci7yJCfoC
LHtl7vnQoIj7uD6fxSsWQEbfXfdrihLa3sndV2u3CLlFV38T8dyAsDnP4pVg
ETzlbSN6dm9EodT6U/8OWwK3EftOJm0TplPW2LdqLEP8452C/M5NGLJ1945t
lctgoXzMcSlJGcf9F0uzDq+AFnF7QeyyCvodct/zaHgFzDhpXm92qaJe14CE
iSkFw9ZzlQ7R1FCLb9qw6S4FF40HEq53qWFQ0c28td0UnFfdeZZ9fzMa0FLl
BHQR1L2SaVfuSUcTyY/8Qm8RPNw9HV+mzMAj9reYT9kiKKvLShyJYGDJLoZr
p4woqrmE1mlMMZD+PMzyAlMUGyUOnTC1VUdqyxltZokoilx64FdUr44FJrYZ
dDEq9pr2rFshNVD34a8dbvZUFHw3aj0VoYF0dnPq+Xwq5p7WptOmNPDFxsAL
n0QIFBiuGUixJbHU6M52SXsCr8jwf7M7ReJa6XD3O6dXfbR7We40ict/WL+T
dCBwKi1/892zJPrceCgi5UjgpIil000miRXc5o2yrgR+fxvf7+JNYl+YzQa6
F4GjFxh926NIHIuqbj4dSaAb0DxGoklssVV91H9r1TcKFrJiSZSsOZPBvEPg
yJuXKmoJJJ5QypbxjCbw666LZ2VSSdw1eLwmNIHAL0uFPGEeiR1W2VCdQeD5
nmT3kiere9JCAuDxqpcEznuwSORkHf3SnEngsKu18tciEpMud2h25xA41DJ9
preCRL3uYv8ZFoHMrP6xxCoSffsKhAGFBA7+2Xzdumb1HzuVBPFiAj/rpTxo
Za/2E/FHN5US6EwL1o58QWLJEtsps2zVhy7VWDSQeGPqYbpOxaqzbY5RGkkc
P3lMtKKSwIEk0w/slyRefPQ21ryawL8BNpcwjw==
          "]]},
        Annotation[#, "Charting`Private`Tag$32369#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVz3k41PseB/BhfpaxZAlZG/wUopDlCvl+S1pOOtcyUorDyEnioKOTcrIv
JUvWhNtkl7FlX6a+v4PcSNkmu4RutprLcGV33D8+z/uP1/O8n/dHhe5j685L
IpG8d+//GfJrXkSRxCNzObdeL814A7Qh8nIxm+0BUn27uvgqclEl2eXDTXYA
eHtHJqphgIn8iSUbC0YY0IKHy6dFXqI9wXUsa/YDkFt6NeVURRV6cTxQ3ZmS
AKSptaM25FqkGkRtN2QkgU4yP4WmVI9YZlP6Fux0cFKbSC4fbEIURcvZdk4m
+Cklq+D8w1fo4kbBM2sKAxhL3U8MVkVo9WoNpsPIAZJNV6M+iv6FkhXu+pix
i8DJrdsODS9bkInwoY5g12JA0h8Jwi60os/rw2otHCawnC/175lqRUeGzYbP
UcqB3w269S98beiaVUiOFqMSTBZPmwspv0XbQqdEj7HrwZ3uY/mTo+9Qb1hW
43BGA7DZ2XlcdL4T5a8vX//TtREkpAVKtNV3Iqu5/GbEaQJAN3nLOv49etou
EHCagoDV2VV/N40uJN/qvqjJaAYTThy7OokeVB2mefUf7LfALe2eYWNdHzK+
49E5CdqBc+whI9/JPtR0s9AsntkOumodPTtF2KiZdkDpP2EdgLnmrRniwkbd
B1U+Jel1gufNXrdFsY/oe4esCye+C7TRDbzOHO9HyRSssletD9ha/TxTFzqI
2OG4Z5FjH3AYWLE/kTeIZLZPqgY97gMWvGXpmW2DKIMbmqS52QfmBH/KfyM0
hHJGdm6F9LHBv7i3N8iJQ6iidEP/SFg/4BQ0bjWlDqNOm6Wah+NDwIpcvpcT
PoocI6PxDxLDoI3LF9HKGEUz9QqJkqeGgUnn0aaQplFEVj7llVk0DOr2VDOZ
3FFkwklRLfUbAZxPxg/6fhlDhTFGCd3kMSDutphdYPgJ/TVhVi0s9Rl0XUl5
v9k9jrLkQ+JsjaeA4LFcXbrHBIoMUUuydZ0FfintfyRSviB+4/V92wILoPXH
kpn646/oYethc/ODS8BCXdpQo3oGjUj/0LWLXgHfZe4e2BqcQ2dcu6yyB9fA
9gf5eybd35DfiSU0vLAJarWVE0VjOcjo9/7g5QMk+NE+sATXWkCS4pfPL9by
wJ68Sf3ZHwtoQ9ONKQTJ8L9qJCfHhkVkdbDeL34Ogw3pGzTtCC7a/FY5FR3A
D02LEw3yTJeQVNpq07y6IJx3Cp3i2VpCxqw3Gl5dFOinE56xULOMWCXGJ+iO
wnDl9xOScc7/Q4XBK6iZXxR+tJPOqZJYQVxFx7n0tD2QHWmv3FWzgux+jnj1
DReHT7ykTXKu/UBVVlTrzFVxqDVT2/JEdBVZ6MbVY0gCNqyLKMq/WEUCkco0
PE0SlkRwQsv+uYbWX0e92XTeCxec/c1jZ9eQf51u6BdcChoV97oIBa8jFRWS
b+iaFEx8XTg/T91A2z45BkOENDzO9vssULOBxHQ9tb+my0BaTMHxRvtNVFB2
+zce730Q7C+0eMPdRN6StKiBo7JwSWTvxX9HbCGPaYceOkUOZpH4HDpUt1FS
9hFuUY8cDDt49LB67TaykD/ntJUqD+cCNytzT+8gDezhBv9NBRhg6WnwfGoH
mfVl+rzTU4Q6veOCJqYkImIvW8aSogQ1OKaE3CMSsWk8nny3VwmGlN0vFO4n
EeuKR66wnuyH+pQMCS6Vh9C+lWNf7U2FJkIjnFJfHuJ0/3JSlbwyPOPwgF7M
4iHEtZkp01HKsEJP2a1HjJdQcg1vUl1UhtRXEVbudF6iWdDygilNBZLbL2vS
K3gJnhtPA8qQCiwxoTGo/GRi0HRgzw6uCrWf/drt4UAmuN+NOi5GqUIqqy3j
WhGZKLikSaUsqsLXssHun3gwgmvIN55Ow2GlUcwhIQeMuCXG+c3+Ig6FRSM9
Yy7t+kz/tsQlHG7/YfNByBEjFjOL9j+6gkO/e894RJwwYoHHyvk+HYc17DZZ
cTeM+P4+aczVF4ejEbb7qD4YMeOuPHooFoezsfVtl6IxwgNQvKbjcNhOU3w+
9mDXZbkbuQk4FGq4zKDHYMT0uxYFpWQcXpDJE/OOw4iveteviGXgUG/ifEN4
MkZ82SodXirEYbd1HqhnYMS1gTTPihe7ezLDgkD2rlcEr3sxcdiXe/ZLWw5G
TLnZyH8tw2HqzW61/nyMmGxfvjxYg0Od/vLAFSZG0HPHZlPqcOg/WrIUVIoR
E3+23bVp2P3HXiFZoBwjPuukP+1g7fZjSWflKjHChRKqGf0ahxVbLOecql2f
vNFgQeDw3uKzLK2aXWfZniM143DO7hxvTS1GjKeaDrFacHj9+fsE83qM+Btn
32cP
          "]]},
        Annotation[#, "Charting`Private`Tag$32369#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0wtQ0wUcB/D/XiQIiAy2OSYMuNRLehw9Ubj//+IgygemSUDr+ptknqGz
66wTSefxLDiXyXGngE4gL4l0CJcsyQbozrILSQ6bZAxPcDVxIG6yOUb7fRd3
O+6z7+/1326J72s3fiBkGKYo8KL/gT9u9+9X2H7Xitq54Ss/0xvVD2+wYyUx
EwtqRsnmAtcY+3FGmPTUpnHkPRI7+ZN9q+1kw9erJskz8r//IXOCddPwhmQH
/NnTD1Gv/fYe6lMyPXDRjJOse+k7L9sdX7E3t2SKbCs77ieb1jdOwztWCjjK
D/IPUP/lISGcZ4UNXS+LyUf3vz0DqwolZOuaIzDz480Q8hLtLZgbzgolm0aV
LuSvDoSR0wzjQd//KBx21rlRP3EmAl4rfASnvLUI/T9chHXbD0eRPcXnZtHf
EbUY9z3xlAf37L8Apz2vh/mV7mjUt+d58fmGd0hx78EB2HZeG4P+y4WP0W/P
icW+BrUP/b122HryZNChJhnmRa+fw7zKD+X/3wdz5esUyBML/LjPPwSbeCNs
lkQrkdeWz2PfZI+S0+j7fCMSxkzPt7A1jpzuzoK5hs0q2LkN5jvYpeTGqs5g
/kUvnJ7ugNXzW+LJqpHlAtiYmkDuaS2FmeoX1GTNCStsuFAPl3YqhNh/pBv2
rU2F1fkFidgnq4JtLUb4r7g22DzIJGH+51eD/TtKYZVRLcK9nw7A6as42KCJ
T0a/zQTr2D1w4+nnxNi3R9jHJlQ4PNWDN1na1+69xur7XCk+3kY2KMS3yY3y
XXfIXNZrdnL4V/ZxMr/cMEm+96fsLvI69xS5+I1UO5nJftJFru064CCrRzyz
yGWJ9zF/9KKX3N4md6J+fMs8mzNWkne5eQp5lUTABbzs0uZpsi73uJBceXrZ
A+TSDWJy9q/DQQt6JOSQiPIZ2HI1hHzK4oT5otWhyEslLrL5rCgM8xq2w7aM
vQuRr0hyI18yGIF+lT/oXvki8oSj6BGep68yCvvT8mfhMm4x7h0I8wRthiuN
FTDfxkdjvizSi3mRGin6Uz0w854iBvv21T9G/c6sWLjmgA/zXrkLW951wnzn
vzL0c+fnkFsPyVEfHuvH82euUZC3aetg3S9DQb85CTN6qRL3Ka/PY971wO+j
dXfG1t+eZTj6PK41x5E7I3fBuhsbVeSWF0/AhsTIpajPnoDNTWfh/sPPCOCd
XfGotx+DOYsmgVy2yQIHvl818vrbsHqoEBblCoTYt/WnYC5Kgw1HA78Pyr/R
B/M75+CWmu9h81hoEjmz6Q9YXZwPl51ZIIJvXYJFOc0wH6VIRv07IjH8ehPc
f6xbzP0HqWBdkQ==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVyXk81AkfwPHhh8nSxCQ3jfrlybHG6qmU+H47Vq0O10aIHFtLUeLJESHy
ENnYch85WmsIs41cbVhHrrGuGOdIuS2bW4Rnnz8+r/cfHxXHW2ZXBSkUits/
/V/HZB/6WNojg+yLR2dpb3Sgdc34tMjx67AQ7VH4ZD4D+F0hoi14FxRUDQ5w
HVigziv0jmSHQMuOt7stpAvhak3qdTZGgO7UksTQ/G/QxqsruO4cDWICiU22
kkUw23Js/z32EyB5pvsG11+BWrm6QiYmgQgxMjvkWAaG7IynReGpYB/P/eXc
TDnomIuHOTmng90B9wQnx9/B5LsQihc7C8Z6+6yuyVZC5MHbC0mYC4UVRxr8
Fv+AJLam9vORPDC3U/9BOrgacjQmXPPD86GSeFmZIFYDH6OZC1ec2WB+I7Al
c2ctCIRlu3qwORCaUKs/sFkHxzyfXonHcpiafKoa8mMj1GrPbyTTXwMhWPUq
ktsIZ2eNU9JHXsMNy9sxktpNYO0i1ssKfwOmjI73vPkm+J15XM3OuQqyWAau
I85c6N1XmunOroFOXmvBKqMVpOjZsbHYBCU6inGK6+0w754i7fayCYrlJM9L
7+mA1taf40+RzeBUetCg4kwHREQFJi5QuTBss1rLiO0AiqhVqmlrC/whsdTl
pN4Jy1uhHSKFbeBXbnT19Jl3MLys21et/w4UgwNSNay7wUS1KKnA6x0EWAmZ
Fvl2Q8VFpk1S4Ttw+/KVLD2xG1KK9g3cVumCC5NFWca8brDwoPMZwt0Q26yz
bdSUB9yZ6eEALg9Khip/3IQeKB1Jmzxq0w/OFK68C9EHFrwxIYfofrC1dMzj
KfbBYqMWI6yuHyrt1Jy0DvWBdmGFRSdzAFr8lW1infsgx5dfc0NoEGxepOea
cPsgkaaclpLPB2b9w7mXj/tBP+WC2tbWe9AvYdlmUQdB+W3LoL3ZCMQ38zSy
6obgsp3Qo/quKWAKz9vzjD6Agr9VHi58Ar+Uul+OJY/Axrq//klYBGN1DrkQ
Mwb5/gO2f7evgEaRvLFMxAQk7+5hzJivQ4XGXD5hNQWBS8+ioxM34a/6YlH+
3DTIjpnWz9IF0F6XLvwsYQb+mipTnCgXxPub3ZO0nX/DEMX9ZIS1EJr69AY/
PvYJjsic+ua+kggG7Q85EL/6CbafDlgyqqai3rT02HrmHJzx7g5yiRBFWS/j
0xMW85BZ6j+obSSG4rrfaV0kFsB750OJ5mlxZJ2bMhxIXwDOTc5X5WwaMr2f
D8SfWYRXcxkzbzQksLEm9kHch0U4pel7pFFCEk3ihcKoYUvgeGtlJmdOEm/J
OORdVl0G/cqc7R41dBznaz93KluG8zsmo0ezd6JpSGqzseUKyLteDjzhJ4U5
hzuTEidXwKvdq9vz7C6M0uGn7/VZBeHDjBjjr6VRMzSunKB/BjPWl2Ipigzy
CSlPuYzP0KHgjA9GZDCDrtLfrbcGw3F3dRpqZfE/iyFmGZ1rUKhc9XgpVg5X
WRpHjBzWgZ391KTFRx7zgnTHD66vw029FP+fzilgi3ZCm23kF3jdYyRJKipi
lk9SrrHcBuh7hYv+sKGIfM7nRSjaAH/GZ9eoViVMffa14dC3mzDbtHrAgaOM
ydIibSqjm6AUrHFNOXw3lrBYTCe/LZhND6Zc0mSgnnCBL3MbBccpJVt3UhlY
nVnfQbOmIIw/KNpGVUHqYDam/EpB9nn5ZHdfFXQPlQuibVDQRZcorp5UwaA4
0QeRZgJ4nxX634dme/CSdYXBSJYAcpJaw/fV7sHxPOEnYpsCeJLOwUNae3Hb
ncvt8L0gKtCmNL+J24sVUt72w7mCuD1iwkiASmLRBW+LYDECbR8FKRu6k1il
HLPbzZlAw2kXdUUPEjfcaAH06wRqGZkfmvck8Sz1pkzpDQI3qaoX0rxJbDx1
fJ24RWB6SPO95QAS5zUPR6TdIXDkrvRgdhSJT3LCB/nBBLq6vEim5pHYcnRG
KSqVwO8bYn8dfEGi5/502tFnBOr/K5DDKSBx6GOZ/ng6gbRR0+YrL0lcUouz
PPGcQLb9ylpJ2T9fnLy3nkvgouUJa+cGEouVL7F8SwkcKNa4ZtBEopOr3k/q
5QTW7drlIcUl8cQOO07/awLjOscfVrWSqBPXW2FQSaCucVSZLI/EtanlQepb
AhkFXnWzPSTaFKs0lNcTKLrdvr22j8R/r9xbcGsksK9JZ9KdT6KX3Le0Li6B
1WqKS4bvSbx2cmYj/E8Cc8OFBZQ+kDjjeZyp30bgz+Oz4gsfSZz0ts+cayfQ
z7BHtnGUxBhNF8vsTgL/B7eHM3c=
          "]]},
        Annotation[#, "Charting`Private`Tag$32517#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVyXk81PkfwPHRlyZLUyY5MmnUN78ca6x+ldL4fDpWrQ7RRojE1o6ixC8S
IfIjZWPLfeRorSHMNpOrzfu7joSxrjK5Roe7ZWNcNeG3vz9ej+cfLz33S3Zn
l9FoNO9/+r/uaVeZQ5l3LPNO7JpgPDODls82B5bvOY9kcb4l96ayQfoqQrkZ
X0M6+pZbxWf4YCgpCbgtiEDNq55vsNcogbM1GecFOAaZj82s7p/6DVoldcXn
eXFIRSGl0UVNBBPNu7dcF9xDpMR2c5/8CRhUGurk4FS0nBiY6HevACtB9n1R
dAZySxL/cni8EsyOq0Z58LKQ61afZA/33+HYdxE0f0EuGurqdjynBXB722VZ
Ki5AJVU7XwRN/wGpAmPThwOF6Lir4Q8a4dWQbzTiVRRdhIB4DMkqNfA+jiM7
zROg4xdCm3PW1IJCVJ6Xr0CIIpNrub2LdbDb7/7pJFyJxkbv60f82AC1plML
acyniFhGPbktboBDEzbpWQNP0QWHy/Fqpo3g5KnSxY9+hmzZ7W8kU43wO2eP
gSuPQrl8S68Bnhi6Npfn+AhqUIekpXie3QLqzLyEBNyIysxYiSx5G0z5pGt4
P25EpdpqRzQ2tkNLy89J+8km5FG+zbLqYDvExIamyOhi9NZ5vpad0A40ZccM
25Zm9MfqmVcehh0wuxTZvrykFQVVWp89cPAlvJ01767mvkSs8JAMI6dOOKYv
Si32f4lCHBVtRYGdUHWC45xa8hJ5f/lKi5nSCemizb2X9V6ho6OiXBtJJ9j7
MqVspU6U0GS2YtBWAuLxD29DxBJU1g8/LqLXUD6QObrLuQfxaOJ1nkQ32EuG
FM/E9SAXB/dCCasbphtM2FF1PQhcDTxMtneDaUmVfQenFzUH6zon8LohP1Ba
c0GxDzk/yio4Ju6GFIZuZnqRFHHqb00+vtsD3PSjBktLbxC3jO+SS+8D3efN
fW52AyipSWKUW9cPp1wV79S/GkMcpSk3ifU70Al2LMSyjygove6X3WkDsCAP
5u5D08jGUEjK4oegKLjX5e+2OWQkWmejGTMCaRtes8ePy1GV0WQR4TgGoTMP
4uJSFtFf9aXK0skPoDVkWz/BVMBu5kylB8nj8NdYBWukchm+sdg5yljzN/TT
fPbFOCli26td4Xd3f4Sdmvu/ubF+OQ7bErE1af4jrDwQMmNdTccWHzSG5DmT
cDCgM8wzRhlr+dscGLGfgpzy4D5TaxWsav6dyQlCBgFrbq1u+qCK+YfHrHqz
ZCC8KPyqUsDAnICHvUkHp+HJZPb4M6PVuKEm4Wbiu2nYbxy4s2G1Gj6WpBhF
j5oB90tz4/mTaviS5pnCU/qzwIX8lb41TDwsNX3oUTELR1aNxg3mrcG2ERlN
Ng5zsM7rVOjeIHWcv6MjNWV0Dvzb/Dv9Dq3FsWbSrE1X50FpBzve5msNbByZ
WEkwP4Ed/0upOk0TSwl1P+3sT9Cuw8M3BzRxNlOvp9PiM7xNvGb2olYL/2c6
wi674zOU6FJ3ZxK08TzfaKf1GTkI8u4fa766DheGmQ9vk8vhokV68E+HdXCz
aXKry+0v8PS1tRrJYuHcq6kFNtoLwPWPVv5hgYWlwk/TSLQAwexPXrEt63HG
g6+t+r9dhInG+a1nhLo4TWN5q97gIqwPNzqnG70Bl/H5HI+gJZjICqedNGZj
C6XiQM4KGjVMK1u6ksHG1Tn17QwnGoWGb4pW0PUwvS8Pp/9KowRH1qX5BOph
n0jtMMYCjfI0J0qrR/VwWKLyzdt2CtQNfuR/b9ltxCedqiwHchUoYWpL9Oba
jXi4UOmeyqICtY8pxNtNNuEVV061oe+XUTqMMeNvEjfhKvUAt7cFy6iVMSPW
CnQSi44G2IerEJTLnTBdKx8SU7rxG7x5BGX1wdOQ5UviBW9GCPM8QZlYH98+
5UfiQ/SLmuUXCGqRrn80M4DEDfv3yIlLBJUV0XR9NoTEU8Y7YjKvENTANY2+
vFgS38uP7pOGE5SX56M0eiGJm3eNr4/NIKjvXyT82veIxH5bshi7HhAU91+h
QmExifvfV3CHswiKMWjbdPoxiWcMEh32PiQogdvc57KKf74qeV1eQFDTDnud
eC9IXKp7kh9YTlC9pUbnLBtJ7OFl8ZNhJUHVrV3rqy4m8d5VrsKepwSV2DF8
i2ohsVliV5UlEJS5TWyFloTEn8dm++jPCYpd7F838ZrEzqV6LyrrCUp5pVtb
bTeJ/z13XebdQFDdjWajPlIS+2t/y3glJqhqA9aM1RsSn9s3vhD9J0EVRCsp
rH9H4nG/PRxuK0H9PDyhKntP4tEAt5zJNoIKsnqt1TBI4nhjT4e8DoL6H+jP
afc=
          "]]},
        Annotation[#, "Charting`Private`Tag$32517#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0w9QUwUcB/C3EamjARvM+DPhTZHMzrx2WWDUXgHnblAJ4g6V4UCxE11m
msXB4Y6O8tCLkusulx0rT+w6byWkIfLnFbe4w8RjRQRljfijDZUBbrIxtvh9
H7vb7T73+//eTVV6KL9MzDDM3sUv/S5+uM+3d2lsW0bKz++70UV+rb9fM3ju
LcW99b+S+aaKf8iesthhsrFX7dLczWvtfbPQCR+wuMnr23NGyc7UZ2ZhQ8sY
+u34wEuus3TcJrMfW31k3ULGf2Qmyx8gu5KuuzDvi6kQuXzHL5PI53eJOZp3
a+gu+s1GPgJP7LmP+vgj4eTyEX4K9ZUzj3LedUUK/SU34mdblpOzZUPTZHOJ
WkIuG9XOoH9PWwTZ/mMbzBtypMgvNswirt0aSR7vHhe8xxaN+FiqB/soD8jI
4ZElsLlztxw+LvWSrebUGNRf6of5Rgu81q5+iHy+Lhb5OQGYeS9HAR8tnMPz
DcSthJ/vgBm3/nHs7ynyIT6cGEeubbgmWD0A2/0h2Nx3Ih71ew/5Ye3xBMwv
2TeP95WWnYh6PRvAfackSjiiB+ZLNavQ72T1Avp7fPD45SeC8LGbSeh3sUvw
iqvJS/NCsP0lFvsGJ2BnVSPLVcbaTgdUDE/3vPgnLL72MszJ9CqyQ2aDjd0t
8OnoEZjfZVwNRz4nIrPrOmF1wUHY/CBxDbn59Quw1XgUzk9zw8YvvbA8plIM
pxekIF7lgvn6T2B1a1oY9vNZezT5rUkKxWifhvZrkjg0TxbV697+y0E2mux/
w5mhIcQ3Fbs0sbYt70gYJ5nNbXKTP02/9S+ZWbZ7ljzwoW0Mvqj0krdfXTtB
tp4540P99Kk7sKg9QL58O8UFJ2wMkRV3GiYx7/dsEbfoTQWP3Ue8ej6M7GnM
nMJ+8vfDOcnguZ2F4e6l/ZeR2xrGBFcULif7p45Mk83zmyWIP5s7Q3Ze+DkC
tvfCxs9ypei3oXoW+Wn6KPJmpfYB+smuRJOHkzd6cJ/BJEN9/Ucw22yQkxNq
NF7U/+SBLU9fhznj+Rj0N6Q/xLzubbFwST3MrNApsG9pzhzqE6UrUf9HO2ws
cMDDqp0+zPtBFof6p7b5cY80CFsqUubhuo549BOdmBeeZ20CnDEHW+OyEpGf
bg4g/7BOCd9UL2C+dvH/Qfk1q4LY75WoJNz3bh3s7OwTPDIYXHqfyahv3h/C
froXWMQPDsDWKzUsVzuZt+GwnOGov3gYvrE/C7bO5alg0Vcwb/oeftUxALOZ
RasRL44SkRnTMcEZcpj79jfBCQrBW6vWkKWjZ2H2Owd872uJGPOy9Slk0xvf
iIV4s+DRiDDuf09zXSE=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk4lYkegM/nnI7JiezbwTehhKwh6/x+ozHVTAvGViJXKRo0IaUiicbO
LTdjKxVKTbasMZYbZ8h6LAcNwqGsWY49y+3+8T7vX+/zvLtcL1m78VEoFK+v
/N/RTN3YfR1h34nLUNh0J23wC7dXUd12DiIcdkUHOTwCYc/N4A2aH9xauyR4
TC0LPopZeZ/nD4LQJMunzbtfwkA/+9UnWiiYJT++aHIyFxp0bijL0SMgLMgk
0f1uPhSGKadY8scCN5U306T7GuoemNT20RJgIcKpIVa9GN5g/JZ/2ANY3R67
JhJaAnkTI8Yi9CQ4Uv5oeKGhFJK/i8234H8Ia1bJeVp7y8HQ97cT3bQMYAno
/2vudBXsr5f1UrbIhAHXKEEttWrQlK+LvByWBUl+DVetn1SD0t8yLAY9G7wK
DVVoETUgxHxrivw5MLwoHWBm8BZ8hgT+00krhITaNeVBbRbMMgaVvmQUwsm9
BmzNCBZ4GRQV7LIogvdjtxT2DbLAPepMm3dYMUS793V5Rv4NTvqFjO30Msgy
D6hyZ9fD4QinEDP+SkiusDcndBshTrrnQAetFoaC42QVPFvB8Baz4YljLQhN
qyecyGuFwVHnUz4FtVAt4X57ntcKuq9Hb4q41EEqdepYs2kbdB7j1ZwoZ8H+
xKjm81VtIHtH6GjT5Qa4HCn3fWIZG7Kmf3CpG2gB7yJ3zRsRHXDcJnwuQb8V
7qxpm0hndsDym8aQc9GtQOHajMVVd4DyD9nthHwbwGZKtMhyB/iLaC+mv2sD
xc6dG16unSDzp5nxh93tsE9h3z9bul1wZsih1rGvExZbyqTuV3IgJ0tQh0vr
Atcqxdr+Tg5s/vrftIsaXaBuOFogNsmB1CX1qwFBXTBD0zhkLtUN7xlbqonf
ciA0sD0lz7sb7Awy49rPdcMQJ16XkO2Bo1Fzp45M94JvSfz9yrO9YKQfOWew
OQAHdwkGjjT+A7ZL1yz+8B+B+embIo7UQcgZK8vt7R2HBnO1g6s7hsFD1il1
59BnkFZV9bpSzwXX/B/FtqnNg8THHG/G3VHw9/bkNXAW4Pe5x9Jb5Ccw/vmt
eITtMvSkCjdXRI7BideDoWoCa0D1H+Ld5psAcRMtA1b8OggKTGeF/DIJVY5R
IdkCW+DvCWKf701BP7U79kA/BbnfM4MI7jS8HqcESinwoVX9+S4Z8RnQkYi9
NxZARdNxZruH+iwoCj654tRKQ9vC8pe/sGZhKuF4QKsgHbfZe1lJ2cyBs6tz
hu4FfpTPDx4+PDkHz6vos/eyv8FYrYpMS/95SHYVPTtCF8CYUzqaBIMHW+yM
p71ODNxhe7b/pxQemLJbaU1pO5DXIJX88NsFUJR0jsldEUSmqKUiNW8BBidC
DeJNd6JXSEwURX8RvvkxyU7ATBivZ7ellRYvgl/Z490W48KYLvGJPmq+BE1+
S6GbESK4yp1cO1m3BCvt61e1DUXRU6OlKsJ6GZwTWVZ6XFF0O63yXr5/GfKe
9pUXh4hhlcaDmFvOK8CxzijL1xJHxoWDInKTKzB2pPSQOlsc9y/cmWr2XgW9
Z3EV/pcksKnau8JvdhVsnknXGTMlkVVeMjARuAYuM9NOgeWSuEKO5tfzfQF8
7xdp6CGFRqc9ceH+F9ghePiQD0MaKwOt+Crl1kE062v2Qhqv9xaLqWWsw9TQ
HkU+exlk9z1WKzHcgAK38nHaigyuRQuclqnbgKPRhEVwlizebplesjuzCaQM
4/dmKyY6OPv1Kq5uwodpl5NJc0yU/yKhPRO5Bb5u7lX9D+Xw5nGPnjEJCvKU
K4rSUR7jlfLCfVwp+OdPHff0P8ij7/7sPl4OBY3EUqkHoxTQlSntVkMlsEAp
n9aqTmIG9YXbGxsC35X6jKRokjiscsR0rx2Bw8f0at11SHRV+7fRA3sCRa+V
3OE7QKIe1e65zykCfZv+4jMwJ1GM9bODhguBelfeUdIcSEwvrBJ68SuBxSzu
+sUwErOScs1qQghscczsOxBOYjsfP10vlMCPs+craFEkPivhLmWFESjJnLjx
MJ5EqshF65hwAq9eml1jp5A4p2Q/7xhLoKH0xophAYkxZupcSjKBlq8qe7YV
kagryTDxTyHQ3Ty4tL2ExJ1yFyomUwn8w5N6zfMvEmON2k26HxG4Ur19+VE9
iVMcda28TAKF7Ro5no0kOgpkdO55RuDeyehioxYS38pLZqQ9J9BBQti/o4NE
X12VmqiXBP72gm2bziFxz8SoEPUVgeFwX9+rl8T8z/13r+cQmN5pI2HcR2KP
Gqk6n0tgmYfkIv3D19+4skWPfAL/BwyuI/o=
          "]]},
        Annotation[#, "Charting`Private`Tag$32665#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk8lfkegM/rnI7JiezbwTuhhKwh6/x+ozHVTAvGViJXKRo0IaUiicbO
LTdjKxVKTbasMb6vG2fIeuwahENZs69ZbveP5/P89Xw+zy7XS9ZufDQazesr
/3c0Wzd2X1vYd+IyNC7TSRv8wu1VVLedQxEOu6KDHB6BsOdm8AbDD91auyR4
TC0LPopZeZ/nD0KhSZZPG3e/hP4+7qtPjFBklvz4osnJXKjTuaEsx4xAYUEm
ie5386EwTDnFkj8W8VLnpxt0X0PNA5PqXkYCWohwqotVL4Y3OH7LP+wBWt0e
uyYSWgJ548PGIswkdKT80dBCXSkkfxebb8H/EK1ZJedp7S0HQ9/fTnQxMhBH
QP9fs6cB9tfKeilbZKJ+1yhBLTUKNOVrIi+HZaEkv7qr1k8oUPpbhsNiZiOv
QkMVRkQVCLHfmmL+HDS0KB1gZvAWfAYF/tPOKEQJ1WvKA9ocmGENKH3JKEQn
9xpwNSM44GVQVLDLogi9H72lsG+AA+5RZ1q8w4pRtHtvh2fk3+CkX8jazixD
WeYB4M6thcMRTiFm/JUoucLenNCthzjp7gNtjGo0GBwnq+DZDIa32HVPHKuR
0JR6wom8ZhgYcT7lU1CNKAn323PzzaD7euSmiEsNSqVPHms0bYH2Y/NVJ8o5
aH9iVON5aAHZO0JHGy7XocuRct8nlnEha+oHl5r+JuRd5K55I6INjtuEzybo
N6M7a9om0pltsPymPuRcdDOi8WxG46g2UP4hu5WQb0FoMyVaZLkN/EW0F9Pf
tSDF9p0bXq7tIPOnmfGH3a1on8K+f7Z0O+DMoEO1Y287Wmwqk7pf2Qk5WYI6
PEYHcgXF6r72Ttj89b9pFzU6kLrhSIHYRCekLqlfDQjqQNMMjUPmUl3wnrWl
mvhtJwoNbE3J8+4CO4PMuNZzXWiwM16XkO2Go1Gzp45M9SDfkvj7lWd7wEg/
ctZgsx8d3CUYOFz/D9guXbP4w38YzU3dFHGkD0DOaFluT88YqjNXO7i6Ywg8
ZJ1Sdw5+RtKqql5Xanngmv+j2Da1OSTxMcebdXcE/L095+s6F9Dvs4+lt8hP
YPzzW/EI22XUnSrcWBE5CideD4SqCawhuv/g/G2+cRA30TLgxK8jQYGprJBf
JgAco0KyBbaQvycS+3xvEvroXbEH+miY9z07iOBNwesxWqCUAh+2qj3fISM+
DToSsfdGA+jYdIzd6qE+A4qCT644NTOwbWH5y184MzCZcDygWZCJt9l7WUnZ
zIKzq3OG7gV+LJ8fPHR4YhaeA3PmXvY3OFarItPSfw6SXUXPDjMFcMwpHU2C
NQ9b3IynPU4svMP2bN9PKfNgym1mNKTtwPN1UskPv10ARUnnmNwVQcwWtVSk
5y3AwHioQbzpTuwVEhNF01+Eb35MshMwE8bXs1vSSosXwa/s8W6LMWGcLvGJ
OWK+BA1+S6GbESJ4lTexdrJmCVZa169qG4piT40miLBeBudEjpUeTxS7nVZ5
L9+3DHlPe8uLQ8QwaDyIueW8Ap3WGWX5WuKYdeGgiNzECoweKT2kzhXH+xfu
TDZ6r4Les7gK/0sSuIHyrvCbWQWbZ9I1xmxJzCkv6R8PXAOX6SmnwHJJvEKO
5NfyfQH83i/S0EMKG532xAv3v8AOwcOHfFjSuDLQiq9Sbh1Es75mL6Tx9Z5i
MbWMdZgc3KPIZy+Dub2P1UoMN6DArXyMsSKD16IFTsvUbMDRaMIiOEsW326a
WrI7swmkDOv3Ris2dnD261Fc3YQPUy4nk2bZWP6LhPZ05Bb4urlD30M5fPO4
R/eoBI2aV64oSsfyOF4pL9zHlUb9+VPbPf0P8th3f3bvfA6NMhJLpR+MUsCu
bGm3KjpBFSjlM5rVSZxBf+H2xoag3pX6DKdoknhI5YjpXjuCGjqmV+2uQ2JX
tX8bPbAnKNFrJXf4DpBYj2733OcUQfk2/MVnYE5iMc7PDhouBKV35R0tzYHE
6YUg9OJXgirm8NYvhpE4KynXrCqEoJocM3sPhJO4lY+fqRdKUB9nzlcwokj8
rIS3lBVGUJLs8RsP40lMF7loHRNOUFcvzaxxU0g8q2Q/5xhLUIbSGyuGBSSO
MVPn0ZIJyvJVZfe2IhLrSrJM/FMIyt08uLS1hMQ75S5UTKQS1B+e9Guef5E4
1qjVpOsRQa1Q25cf1ZJ4slNdKy+ToITt6js960nsKJDRvucZQe2diC42aiLx
W3nJjLTnBOUgIezf1kZiX12VqqiXBPXbC65teieJ94yPCNFfEVQ4uq/v1UPi
/M99d6/nEFR6u42EcS+Ju9VI1blcgirzkFxkfvj6G1e26JFPUP8DPfZaeg==

          "]]},
        Annotation[#, "Charting`Private`Tag$32665#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1A1MU1cYBuBbBEurlEKhQEF6B2aREdzmkMkG3LufbrKNTCHiXJ3WhS1h
E6HOOSIz6wymQ60wTRxGJh1zicpmHBECMdHOFAiBCTOmQ3CkSIr8WekPLaWI
83svJA15eM9573dOW577tLzwsxCGYUqevej3sx+d+HYHlyv9t6izq/0m/SFg
7ufUR6drFr/sJ/Pbtf9xtbfmSipnhsj2Efsoee2WfSNY31nr4DaPHjoVftdO
1skypsgbjpx7gFxy7DF5f+vtMewfSPGS3Wf/cqBf5/CR74h9D8kWBxfAeknL
JPrSfUFyC1s6Df8qWsLzNOUzZMPvxxme8jy5U+hvEpELnYrHwnyRK/gLFbmX
unNn0f+LJpRcY2qGzd80hCHXv+hCvmV6Jbmnxgqz346K4bpUN/rKiiVYbxmB
zVazFPkbBzyY52X/KvKkNtOLvpszq8mS/edhg1crI+d/VDCHvoyWSPS5rTB7
8ms59s/l+HDeT5KikD9vg5n7P8H572T7cd6GrdHo18zABotUAXd9P798H3B+
hzwAl6tj0Ff8I8wabXB+TNEC5mUrYsmldddgplimJKdtWIB12j/hybjXgjj/
ws449B1rgtlND2GJK3wR+fjP8XDUMMz8kJkAjxc9wfMKbYKrW2DdbqMKfa1p
S3BjeiLm23sCtlzuF8wNwcxlfdLy+qdYn/AArunTC/ZfWMMXtp+vDlnLWOh+
uI3JZOsKPcyae+C3jWbBxjNqcmibTEQ2b2u8zulzpeeMin844fM3QNY2Zg+S
LVXuQXi96T4nfJ/GuPbko3+kMnb4zbwJcsGOv0fJ5l1pj8gZUYfHyExJnwtW
iR3om/rKg/WDr46TDVdHfeSy3K0TyFfrA2TT1XWTZLbHEcR+8wCsu7hxCc9f
3zqF/L0qhqf9nZoZ7Jd3i8imt+48Qq72hpAj9B4n9js/DuV31t4q7tg+S+b5
02HkMyndMGsZXkk+OJHpwvrZsHCyMu8ubK8slZBtvUNu+MRFKdl3uNKD83iH
V8H1Si/OL5FGkNvu1cP8C2kyctZuD2zIao5EX0X9HHKVQY48I8KH++yPjcJ8
B74TvOsSnKUX++HU7Gjst1b5hfsIwr7PX5pHX8VJBc6jaYLZvZtiMM9mVQDz
VfbCB5vPwrohbSz6msMXcJ9aVoncdQPmd3TBSkVBEH3x2+KWc5h/xQPbFOmL
yHvr4jFvdDls/yI9Aefpa4ct9ddhpSzhCeY51KbC/CVhS8gbVYl4v9QfLgnv
5zXB6+7BujJNEtab9jxFfkW8hr/y7p7jOSkMj/+/v8FV5n2wpTonmfz6+zdg
ps8JD3t5EdbPH1GTEz9oEPH/A6K7as4=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVkmdYk4caQEM+VmXFQEjgCyIoiBUiFaw+rvd1cFnVIl6G9VGGpKwSBRWt
inGhIhsH4ggiCBLkMquCGIbREgiiISIgUAEHMzJkr2t/nOf8PT+Oie8BVy6V
QqGEfOdfrxi4T0vyPLdpVFyb+b9ztpBiFZWhXu4DDqprVL/eT4ftmtyRDlEo
BN61ZftKcuDVmcirIDgO8kv57brKBZA1Lbv5SnQGFlVWyFUyiyDg5/3BEZwL
wIzVELwa/wssQkfWWwoug4M43TSL9gT+OxKlEIsSIXAV69NnyVMopsncb49d
gRWNHm5Rfz4DPY5h+SHOdRCqG32oW1gObwOE8aaCm1Dn8zI6RbkSVhzgsipE
afDVWVunJfM5tEZESXNa7kHEgrTSys1iiInJPZ08lg5zhF6nZZMY+rNHu3mc
TGhl7eBPT7yAhx8jS4wEQlD9nfZ+Nb0a9K125T4TFYCn6ovlrtJa4NlyLxb9
Ugimp+JGq9ZJ4eX6oz7ZLYVgcpYsi86SQrjTLca1sSIIZZ2w552sg0b/rog/
OI/A7sWZeBtGPSTfO7SDFJQCz91e/53qG9DUrDlaJqoEvpMgdKewAbx6w9/m
aVSBJ/1Awnt5AxRWL7FJ96yCpSc2/aMx3wCekRGKqOEqKHup9NLfVQ4Zc9Zc
D3MxaIXVMO1G5bBhKNl1OPYlnCssPWhk1QghjVwri7218LnZU62S1wQVxfRo
UlgLonXupkaJTaB3pbxbe7wWHHJ2KjkVNUHprwYZowlSYNYdpBuMN4GqRGr4
XFwH9GKz23dPNkN9m4HySv3XkLDfN+oLvwX8X58ekkTIgLrW4qpFcCvEaMV/
eZQmg/gpH57sQivkO91pS38hA39x34zPvVaYEJdIIrQawL7X3c+muRUulQyn
/XSnAX51km3PsmsD4T0/15QyOfC9dw1rG7bDwGGHooDpRig5+TGbX/gPHDKg
HVH78z2sN/HZvNi9A0ZECw5cW9IJjQ92zX4d7II7ZK0Vp/cz7P7i+vzzgc9w
Z01kw0qvPkj33pZjHNMNanzR5laDQagralOryeoFVg9Tt+XYMFyiL13gcK0f
5KsUHpp53+DHIxH+7vYKqN7ZZUJljAPXv38PmxgEfxc3L0vXSSjl3epYVzMI
H94u1aedn4b2+bH7ksghSLTWdX38aRZuiue85Y7DcHR1+WlHHQpaM1Ink6eG
YfNGZTJlqxLG7Asw21Y8AsfUJ0Ltwqh4/sTIHhvuNzi/VUiNiSFw7KxCdUhl
FCx7+tyKRcr4sD53OzN/FIRzfZ3hrSqYY0M19nQeA/GpE6tIuhrOTOoW6wyO
gXNVySb2FnUU+D5ziYsbh6wjj84/3vsDyk589ZMaT0DqlS2xtokLcNz6k8nD
0gkIMYmtd87XwFA5V6DhOAkPwi68Kpdo4o/NWzMeyyaBz9FJYExrYfff3MWL
f5+CFb+5R6uwdND+yReJimIK1h27nhFsTsN9N7seCvnTwDBr7qCKaLh8VnbK
XGsGWn6YXu/vvBArZTXd3fEzMJDud7Ts40LsyLc+E8Wehb4jufXth+hoExR4
Ty6YhdTs7RdWUnSx2ncts8JoDtKSVi8KvaGLBfc3PsnLnIO4ohkZ31wPC86F
5crM5kESpRHIr9DDDOnQbkbePHxNniR/cWHgOR2b5iAmBWvVwMq+jYEuDZ52
n9woOGopNbYJ18ewog+74lMouODy2pX9ykzU2/omSNhEwZDb/cbXU5mY58Ie
0TFSwou0CR5vDQup5VfXOXorYXRZZ4vuCxbO+7UzF6UqYZsRw0K4zwDJZaKb
oV1KaPjYPElLYYCBV/2lx5dQUbsw/rfU44b4bI7GjvGloosvKpvqkvi0ZMvA
3iwqnnR6XROaRmJ80I03Kt1U5HjObRxIJ/GUitv1ZT1U/MC1LAjIJNFQt8fP
sZeK285cSvbKIVE9JN84tp+Kmk/Qb/tfJB5/HqTJGKLiLbOCWQsJiclH1avN
p6hYSkmy/jBI4gP1hd92ahL4h3ZF+p4REh3MeucPaxG4iK3QfzdKoq0SV/+G
NoFn1zjN1k2RWJ+3e387jUAnHrXmqTIbJW4jEcEMApvfh+1PZrFR/C7h6cVF
BF7uudtIJ9n4/aPDOcYEbhh/5RhnxMbit0lr6xcTeJe+wjrSlI3j9+Ud+ksI
DHDsmgmzZGO4V09J5jICDT0WHlRw2PgluLu2xoJAqR90Bf7ERrm3WY9iOYHW
p29JvH9moyr3kN0aSwI7YyUbWteycUN24vk9VgRevTWe57GejW9AvZ7PIfA/
2WZLGjZ+7/u7bWnGSgInHu26vgPZ2NnBulBtTeD/AQQLJw8=
          "]]},
        Annotation[#, "Charting`Private`Tag$32813#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVknk81HkfwJlxba4JwzAjUaTNtanlRfX9dnhcqxUPaXtVyKxrIxRt0iSp
5OwUauTOqMe5FWk+PzWsYVBjEsI6yn3LfT3tH+/X+9/3H29tz0AnJklMTOzM
d/71jrEcyh23qH2zvPrc/0XtghTDmGwZ8EA2UmZSEzlZ4CDHnOnhBiHfJ7sY
nvwCaIyMvofYF5HoZlGXskQx5C0LUxu5kWhTFSGSzC0Fn59P+0cYXUdq8bLs
xvm/QD9oxtKAfQvZ8LJ08iiv4L8zMeM87m3ku5P2tZ//GsooQtdHc3fRjpaj
LjF/vgEVIw0IMXqAODKa3Q0bAT76cBJ12KmowaMmNkWiCnYEMmkENwNN2Cso
tue+g46IGEFBeyaK2JBRUbWfB3Fxz68kz2WhNbJKr0ErD0bzZwcDjHJRB+0w
a3mhGp59iS7XZHOQ1O+Uz7uVakHV0Pn5G24xcpOq3u4kqIeAXcwbpb+UIJ3L
CbNvLQRQYxnmkd9egrSv0itj8wQQapdGvT9XioJo4dYBlxqgxbsv4g+jF8iq
OjLRlNoEyZkhh+nsChTgaq36SeoDyMnVhVVyqxDLjh10hNMMp4ZDPxbKvkVu
SoFJn0XNUFK7xTTL7S3aGr7vH9n1ZnCLjhiPmX6LKmvEa7ydRJC9ZsI8qsdD
8sF1alazItgzlew0HV+DokoqzmoatsCZFqah/ol61N/mJl0V0ApEmVIsnVOP
uBauOpq3W0HlLgwqzNcjm4Ij4nalrVDxq3r2bJIAqTWcVVKfbwUpvkDjHa8B
KZXpPnpyqQ2aOtUljFXfo6TTnjEDrHbwfn9lih8hRCRz/Xv6/h0QJ5848CJD
iBKXPAKE1zugyO5xZ1a1EHnzRlY8MjtggVfOj5BvRtbDrl6mbR1ws3w646fH
zehXO6FDnlUncDK9nFIqRYjl7jytoNEFY+dsSn2WW1D5pS/5rJJ/IESdcl76
z8/IUttj/2bXHpjhbgi8v6UXtTx1Xp2Y7IPH9HpDo+F+dGzA6V1/YD88Notu
Nj41grLcDxVoxQ2CNIu7v0N9EjWUdkrX5Q0DbUhNuf3CNLqptHWDzf1REO0c
PypX+A39eD7C29V6HGqP9GmTqPOI6T16nEGeBG9Hl1MGTouoIiCtx6JuEro/
blWlXFtGXetzOfzoKbhtouz08usqSuWtuYtspyFsN1yxVRTDJtT0xeSladi/
V4KeclAcx5300T1UNgMXZBaCrIJJ+Fr4zHFT5je4dpBDiosj47mr41JTkrNg
MDTiUsaVwM+anjuoFc0CZ22kN7RDEheYkrTc7OeAdzl8J11JGq8sKpcpTs6B
/dvyfYwDMpjt+cYxIWEe8s6/uPbyxA9YGD7hJdBagPS7B+J33d6A502+aj+r
WIAz2vFN9kWyOEjEZMvaLsLT4OuNwJfDP7YdzH4pXASWkWISdVkeD/7N3Lz5
9yXY8ZtrrCRNEVu/GuBLji+BxYUH2f56FHwyte8Zh7UMVN22HhKXgrevCi/r
ya9A+w/Llt72G3GVsG5wMHEFxrK8wiq/bMQ9RSaRMYxVGDn/vKkrRAmb+vlm
itirkJ7vcN1YTBnXepqrEZprkHFn96agh8q4OGfvq8LcNUgoXRGy9FRwcVTw
c6HuOvBjZH1ZhArOFkwdoxauw0TyIv0XRyqOUjRt81MTI+qlkaF1JxU7NrtZ
fXURI2YNBFqmoao4uLTbOTFFjNhwy9x4VEINqxz84MdpFSPOPBrVepCuhgsd
GTOKmuLEDcpCQIAZDZPgnoWtuzgRW9nbrlxNw+teXWqb0sWJTk2qPuekOqZv
46YG9YkTGi/17siPq2Pfe96Ci1tIhEJJ4m/pFzXwmzUKI86TRDh6YgkdZTp+
XX5g7EQeibhk974uKIOOE/0efpAcJBFGbmt7x7Lo+LKky4NtQySim2lQ7JNL
xxrKQ162wyTiUOTN5FMFdCxzpkgrfpREyL3CXg5/0fHFd35y1CkSkaZbvKrP
p+PkMJlavSUSUSF2x6R7ko6fymz8dkSOTPyhQGQdn6FjG93h9XPyZGITY1z1
0ywd7xJnqj5UIBNXzexWG5bouKnw2OkuCpmwCyDVvZZgYL7LTIQ/lUy0fQ4+
nUxjYN6npNc3NpGJW0NPWpToDPz9o3MFWmRiz3yjbYImA5d9vGPetJlMPFHa
YRKtw8DzOaIe1S1kwse2byXYgIFDTw2V524jExpHN54dN2LgAf/B+jp9MiHw
Qn2+PzGwyF13aHw7mTC5ksZ3/5mBpZghVmYGZKI3nr+nw5yB9+TfvnbckEzc
S5svPGrJwB+QTBPLiEz8J193S/Pe731/d27NNiYTCy+cHxzGDNzbQ7tea0Im
/g81U12P
          "]]},
        Annotation[#, "Charting`Private`Tag$32813#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0glMUwcYB/DXIlAK1RYoUCRYwyZHnDu0hGWwvmzObhh1MjALsFiIZA4y
jmjddIN1hOBCVDxSskxxZWxxqRuKSzNwKk/IwFSysExGZQ5K6JAVXOlJgZaO
71+bNO0v3/3azeU1BRV8hmEOrb3pk17if39Wvjl1orB5eqhvjepO3ojy29q8
rAHHGFlvvzIOD38ySbZcGZxUFvSkar55aYosv9E+TR7NKZxG/a+rNrIx6qMZ
Mus6YycrXtszS9ZanQ6y7u4WG/L3uFxkz+zgHPolVHrR7+zpJ3BGg49c9PLA
f+hnXlhWZpa22vy7FrBfw4qfnHXJCctfFATJwrY6B5l5ZYFhyYNbnZiXrueR
DWc6Qx7+m09uqf/Qhfwv3GFk06sJbvTrjwiH0z52P70Pbrkp8CC/83wkOcvJ
eOHutwXI317mDfV/L4pc6R+Dufp2IeaX3l7EPep/olGfV+xDXH49hpw/1wFb
RHdEmPdl9BL22V+8Af36cpeRnxouJtuYdtiyww6bzKkriLONElilhy131sfC
FSo/5jeWw4aIa7BetTkO+3xeGED97xycfypqFfXvjsHC2UyYEw/Fo95SEsTv
m10lxX5XAzD3wkMpG9+lkt7PYTh6HsdaE+CL9bBlZ1Ii2cjvDtn5NSxVRPCQ
fyAvCfHdB0NeHYA1vRdgLn2fjFy06xbMHjfDij+ssD7teDLiX23io//DeVga
fAtWl9RtJOvMJ2GmW5yCfM4Ja3Wv/6Isbe33HNWMKOn5/7X0G1lzttGsDP3/
xsmj1e4JMivJfgT/eHOSzIXHzii7VFP5GTVWsrrjTxvZtrjzMXwwcp4s7AvC
2utTDnLLD5/Oof+zVhfip2VPEBft85IN1WF2eOQnn3Kss1ZRcHgB8339y+Tv
DGIHHFcWIHuqemHt4XNB5LeVOxG39zDsmotyEl1w7m0eebS6H7ZMWPiID1W6
sU/Y4zCyRjIDM5mP1sEP8j2411UfQZZuY72oP6KIJOtSLsL6vayAbBwWLWIf
zhRF9py3wZbLt4Tol/SGD/0HrNGw5obv6b0x2KcyAKvru0SIb21agtc/twFx
44Fl5G9KE8PPmGH1hAM2ZpesYN6cVoL4pWmYORQTi361DX7kt5XBxugHIafL
4xAXlAZwr+d72Fh3H5b35sbj/u1HVzH/+VOwbts1WP2ZTIp7720JYl4NL4Gs
MHTA7L2TCez8/p4Td9e+o39GIjl5ohhm+FfhrLomWPvOjiSy4chlWL+Xg01h
faH65vdliA/xeGR11ThsisuA9ZKKZPST7YY5VwAWNh2DmQsfbISbO0Jxf2QK
6nPX8dn/ASYWbnw=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVk3k81AkfgH8ZN0VF+L3JkavyohaRPr7freikIWdZ1zpWGOENlXJurqWJ
IlKDlfMjkrbUJoxjjBzjikZLh6sRct/e9o/n8/z3/PcoufpZuvMRBOH7g38t
fy2+Nsg00nhJveNuySYdKDwJ39KYznBfJndPUOFDuFNn4RzIvAROf9JZYY8f
gdUXCptUvQKH+LW2KicVgSgfV86FGQ6W3LURsaLH8HVrRavubDSoaklkBqg8
AbZSYpSwahzcJoUPXG4sh/osxrwtkw77Wm8txJY+gwoNcU4NNxnEGkLVQonn
kFsWUrxv9g487aef1ocXEF1t4byhkg5d3V3M/9BfgvLUJvdzzCzIsN02pFhS
BaSugWVsWzZYtQsm7WC8gW0hNHjNzYGoEzPvBE2qgY/gyqnP5oLG3WOJD9Rq
4JNEReuySiH8elw/0YJdCxyZn3ZaMMvAV/N079zTenhr2JrsffIJ9M55EqdF
G4B1wUvkZtsT+GBpNWPt1ADVDMb8S2452Jet6jQINEKZujhHZbYCDtSO+1w0
YQH94NDviyqV0OfpH3niHhsKipsXzjKrIeuckVpdZSuk+TSJbRKvAWs3ZqH7
aivc/G+jQrlVDbRM+CVfM24Dt9La41LDNXBlREBzW00bKDytTOsVZgLPY1FL
ybkdUl/mH3Qxr4fDjkCPteJAVFNUcEBfE2impEynyXVCQHxEwm5lNlApk5wk
3U5wPh3G6LrIhleMIUmXs51g3HK1UX+VDcOT/iIZ0Z2w3O4vs7LrLWiX/5Po
+60TLvU6PY9ya4VxQUqTeGUXlM48uMYO5kDsfNBmdaMeiC4V9H2ZzgG7q2Ia
o9QeOO/t51j0igONawG8Ox49wP8Zf47f4EBuoqtt+e0esO/4LHgqpgO+2lRM
8430AOXJnuSm1E7Y0uh7eU/SO7ClPStgPeuGOk3qXk5bL2yMvu1umOmDA5FF
N9I1uLCWoCZxR/kjGMrfN4s+PgCxOV7GkY+GgD1gs3aO8RFaVEbP/8Idg0SN
eh8788+gmOfFF+Q98aNnkj2w/gVUPsXRFQO/Q7GzDGn+xzBI54emrsbNQF/l
BDWONwKJvCmXhZY5oKdeaJ+wGYNPQ3y5v/EW4OdQPwNa5lfI0SpU+ml9CRRD
9xultPNgbL7dbafxKnj0LP7tKvUNNl9O3RVquw6+WmXhy4YT4FA5Yb5mTuBw
9s5M1UuT4OnkoDnmswkD46e16s5MgfOgrAk9mA/1bL/QirumQF4ptbrhHgWz
5Ac7aO7fgXXYNfhFHj8Kmx9Jdv36HQ7KTtINmwWwybR31D1kGrik6QnPr4LI
9BlyEuabAdoi7xB1Xgjf3Gs9LhExA3V3LeksWRE8l2hbGCUyC8JbhJVW1UUx
fFq7gBczC5ElMWf794thPhkwJkWZgzfirMHTluJ4aD/VQCB2DnimtiVBTpvR
N3mQc58yD+8xv18nagsGW0xKGcTNw4ZLTWFatgQyrPM/GIgvgIi2dJ+DjSQa
V/E8vW4uwJx4UZLeiCQK7YxUlRZbBDu74Y/etK0o0baXfShmEWyeC0UvTm/F
U+KSDuc3LYF+UNy7t5Hb0NrjekbYzSVIzClnrQtvR50j9F+CKcvQoHXYOyRj
O2a8dorgJSxDkIZv8VllKZR1l6b5iK9AtV7Uoev5UmilvNs6NWEFxnOWrk4f
lMZVjV+PC8mswq3rMvb1VdL4jn/0r7qMVZB6cXd0gLoD+a1aqq/vWwNdwaUG
6uAOdJxLDGh+tQbNNZSjCh4yGObkbJB5bB2OfaBd0luQQf9xvyoGdx10PSKM
Cm/I4h5/Sqej9wa84btiHUiRw7xUgdLdKxugudGu+HuKHCrIOJhRzQiU9GqP
m5UjUej9CZ3YdAJvZERzzuwk8dQ/9q8HMwgcbzaQe7SLxITa3EuGmQQ2aWUX
WO8m8Vma2ineQwIjZ/0b/9IkUbebzqbmEjgbtl3gCpDY0N+4ZXcpgb2pNuFr
biQq9JyXGqoj0JQlyrL2JNG51CnmSAOBFUtVEo+9SBSweKic1UjgbQd1hiON
RFqJaMcFNoGnlBdfvwkm8UyS747uNgL/LklfiYgnse/74NG29wTuHTA7+v4P
Ep8bmRzR7ifwniRfwoFbJF4O+eZ16wOBlwMvkp9TSPxyxkyPOkiglqGR4bEH
JKZHq1R1DhGYeXEyPJNBYoxNpLDeCIGimX+yZrNJjOQWh6aO/vhkXczuUR6J
mb/lfbLnEWilU81YKyBR5EV616txAmtd/jdiXUyi+skHU/ITBOqkaGg/LiFx
1aJWP3ySQEZdf5BgGYkzEmT+pykC/w8lnzcj
          "]]},
        Annotation[#, "Charting`Private`Tag$32961#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzHk81PkfwPFvM5Fjiorku5VIqKzUItLD57MV3RpydNgc61hhCr/oUDRs
yI4makRqsCJ5iKQttXl/GcYYhYlEo6XDkRFiXBn8dv94PZ7/vfR9Tjr70QiC
CPm3/1x5/kpVhAPbbsr49Y2ieeZQsAd9TRN4oVs6uesiCu7A9Wonr3DBKeT5
J1cU/eAuuHymi8m1Z9HW+WaLDZLvgxpNqustiEHO0ple9fsPoH9xWYOFPA6t
NdPIDDN8CGJ9TqzK2kR0jVTZfLq2FGqy+OPuAi7a0HB1IqH4MZSZMCSV0hSk
LowyiiKeQG7JmcIN8uvoUQd3nxV6CnGUk9ecYTpqedMi+IH7DAyG5/kdEmSh
DPcl3auLKoC0sHZOaMxGLk3Kycv4AEvOsNALaQ6K3T36VtmeAhoh1TWW5yKT
Gzs5t40q4aNGWcN3wwL06y4rjpO4CiQ6P61wEpSgENN9bWOPauClTUNK0J6H
qG0sgNinJgTRsUDVy40P0Xtnl1FXTyFQfP74M2kpOlKiMBcq1UKJMUNiKC9D
m6sGgk/Yi4C7pfv3ScNy1B4Qyt59Uwz3CusnDgoolHXI1qi6vAHSguvU5zEq
kauvoMBP0QCXf6zVK3WpRK8GT6act2sE3+KqXVo9lehsr5LpkspG0HtUntam
IkAy/0kzfa8m4D3L3+LtWIO2HUfcBBcJxNbFRoa11yHT1NSRNN1mCLtyKWmN
gRgx6UOSZItm8NoXzW85IUbP+d2a3gebwe7VuVorhRj1DIWqZsQ1w/emUJ3p
VS/RxtJ/OCFfm+FUm+eTWN8GNKBMr2OUt0Dx6O3z4kgJShiPWGhs2wpxxcoh
z9Il6PA5dZM+ZiscDTp5/P5zCaqdCZNd92+F+Z/wz1fmJCiX4+Neeq0Vjrz+
pLw3/jXqdysbofW2Av3hupQ6XjNaVBtyel3yW3BnPb4nevwGVZsy10sa22Cu
7+Ub4Wg72sy+fzHdRAozSUYa1w0+IJuVtw7E7eqEhJxAO/bdbiTudJs5xP8A
rwz7jv4i/YI4JjXBhx0/weq8QFpE0OC/P/vsztnPYPgxkbs6/Bsq9NIhHf/o
Ae38KJ4icRS1lw8yE2W9wJENe0+8GkNc3rGmQbcv8LGblvubbAL9HHXSmpXZ
DzlmBfo/zU6h1VGbbFObZPBlvMl3hZ0C+bdO/u2j9RUWnuatinKfRSFmJTHf
bQbBo3zQccaRwD3ZKzLXnhqCAE8P0y/B83D4lRGz6v3D4NW13J4bScOW7p9Z
hS3DsFKfRwlv0nHWyq7XLL9vINrmE/k0bz5Wcdye4tP/DbYsH+La1CvhOoe2
Pr8zIyAlHXYH9CtjQXC3pwptFFiTsq3M8QUYbjbs0rg0CtU3nLmi5ar4EMe9
IFZVDiqLVPQVxmo4ZmTjPVm8HNhF8Qc7NqnjfDLsixZ9DIAh6trnzMBbNzGt
lRLGQObgXhThuRCHpHRJbtHH4R3O7zCPXYQjnYa0rBPHYc67siAtWwPzXfPf
WzMmQHWjdruHmya2q5AFBF6egDHG/WTLXk28YAV7rbb6JBw+3PMhiLUYazSu
F2+NnwS3JwviJkcW470MTY+j86bAKiLx7Uv2EuzqfyEj+vIUcHJKRbMqS7H5
du4vkfTvIDTbFnQmYynOeOF5SZb0HSJMQgoPGmjh5X7arGDGNFCWsVsv5Gth
F4M1rrykaRjImTo3skUbK0x+3bVARwFXL+gcqanQxm/n9/1VnaEArac3+jqZ
y/B8l1fUhQ0zYKE8JWR2LcPHxzhh9c9noL6SvkPPXwdHe3pZZ+6chZ3vWacs
J3Rw6MDJCr50Fiz8L9kWXFyO14XSm48HzQHQzrqG03VxHk+peM30HJjONa3+
PVUX6+l4HGAeICjNwKZEuS6JF7zbbZ6QTlAXM+Ik+1eQeO8/R150ZRDUQL21
7t1VJE6qyj1lk0lQdWbZ91zXkPhxmtFe2R2CYstDa/8yJbHFG66YmUtQ8uil
SmcRiYUdtYvWFBNUG88tZsaXxHqtR7W6qwnKQaQmcg0gsVexZ/x2IUGVTVVo
PAgksZLTHYOsWoK65mHMP84iMatI7fUxMUHtNZh8AZEk3p8csuxNI0H9XZQ+
fekKidu/de1ofEdQ6zsP7Hj3B4mf2Npv39hBUDc1aUmbr5L49JmvgVffE9Tp
8BPkp1QSf95/wJLZRVBmNrY2O2+TOD3OsKK5m6AyTwzFZPJJHO/GVrHsJSi1
zD9F8mwSs6WFUbw+guqZVT98N4/Emb/lfTwiIygXc4o/c4/Eqk/TW54PEFSV
9/96XQtJbLzn9vDKQYIyTzXZ+KCIxAqnKquYIYLiV3dEKJeQeFSDzP84TFD/
B1bnbaM=
          "]]},
        Annotation[#, "Charting`Private`Tag$32961#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1AtMU2cUB/ALUsHKq7RQEEeuzCiRmE0j6B7l3mwSyHytjs0pbOlmMVKN
TtxgWSW7qMvUDAhzTvGBnWCYIytOncocrJlz4BYM0yxlY8sq5dHaUmpLW0uh
jPO/NGmaX/7nfOd8N20Xvbt3c2kkwzDamTd9zrw0I6F2TmEsUN9X3/9pxhZz
9e/k+vL+v8n806+YOam56etlRy3wOcFC7u5YaUW9LnuQfESlH5zNbcgfbhsi
C7ofnbB3zzDZ5J1yw23v21BfHvSQbae32JFHq3yY15j3iKw5tT5AjrG2OMjs
lXNB9OcvHUX/sksh9GvTXfDBgUlyVudXsGGiJIz6sk1jZKbCwvCfONTN4atu
nNf4dgTs9sGaDfsjyVFzDz5G3vXDHPLiDKUH+XOrJPAXAdGJffAvtUVe3LdW
G43c+ew49slIiSEPCl/Chucj5qF+Z4QPzy+7VIp51+7C7N3S+ajPUfnR/+qB
WNQvr4fZS8fjUO+wirntr3jkXQ0BWP4wgXx4OOMJ9ks6lIj84llYcMhk6J/O
DOK8z47JZu8r+spTSWRtqmQCz+ubFXCzRA5bnrklemQXzK4olOO+kmZY2L1U
gf1lySE4dxcclV8Ia+JH4bVDf8CGhoZknJfYPQlXLkxBfc+LU2J/K7w26bBo
Y64SrrsNs9uNytnnHcb3J/BaKu7PH5oW6/2p/G1f1oXlWxkT5esq08g/952E
BZN0ATmz6TfY8O9xeKDCD7OXy29yTvXNPb+W9XGUL9zWy/mzSgLC4gEyU33C
TK4cy7WSTcol/5HNLx8dhCs6rXB72RAn/p7sZOX6nBGyZUQ3Sl5dp7ah/qVv
3eQtxnw75sl7PTi/fUL06+fH0V+S4cD8HQEf+cZeF6ypMgawn/yekyx8dDGI
852do/BAVwj1mToXJ34/wnDT9Bjmp6kZXq8w9se+5551BFwjeYz5Be9EkosL
9sFMmncO8kflHjKr64ki39o9LLqwV0J+Yc0OL+5b/89c+MQDmG/NiyGHXN3j
yPfnzCOf4Vb5sN9bJVLU72uFDZqi+cjjNvoxf1NbLPy9IgCfvRoHn64QreyO
R7/9OsxudyVg/wTpE9zPW5VI1ntrYDZ3Eg65vTDzoEYGp+uD2PfCNTj9Ti1s
OcAlIf/QBgstZtHZ2glO/P+SY583W2BLZj9cfN0D83k7FajvXRRCP+eD9SwP
m4qqk7H/ks1i3hiXgufNV4sO1sHFfWMwe3mlEufd808i/+A7WB/dM4X80zdS
sU+2L4x97H/C/WzbNOZ9fCSNV0nNU1VFDA/HLCCrhk7BfMfncMexOwz/P++h
giE=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVkns81Pkax+dHkdC4zuhHe9y9dm1zOJVs5PlGNklpR+HguO52jM1GVsi1
okMRGVNEJVFuubRxQjLjEllijJ01B8eMkqEhk3Gdmjlz/vi8nn8+r9f7/bye
xyT0HPUnJQKBEKnI/2dp+zWxleNlp19k9C6Hb22AeLHwB7PWYBAVVwRh0nuw
ecuNJ2uJgp9npwt3CytAtNStJiIlwKE+cvrAaDWcqzC+K2pJg4OmG5q10joI
HwncFyZMh7/ntb0jUxshVF4yyCNlQb4VxerixlOortVIfduSB56e+PqpuSaw
7LL+/St2PlTFX9YYOvhveMhzJ/sJC8D/QJUGP/U5lKhk1Q+TikDE7xd+4bbC
kQalpf+2lMIeq/I1kvwlXHXQuZXU8wCmCva+LlrugO5XJo44uwyqXYbfZkQx
AU2izNPCcmi+QFlNOcWCA9tTjQdIVVATdf5hxedOID1NrpxoaQDX58wPDos9
0BSXkVgDjWD+18ybya6v4NTBnBMXexrBW3ujPrr4FeT3lUjI7KfAMDN7V+3S
C8SpNuQlfAZTuqp4x9U+2KaxOfaa1AL3bXReqvP74cvf2tLHW5gQrHtBrq85
BHzSjcIwJRb0CLaeiTk5BN2bwbUf3FlA+Sma60IfguxOlVHpOAtoH3L7KtSH
AadSzYxknWC+jVr4OHsY7KPnWAHOPXC/NXus9wobfq0nyyf7X0NTc6JYfJwD
vvR5nTO6/cATqDjsp3HAMa7dctG/HyLL2rJ90jmgDGEnZKJ+sM3/V7V1Kwfy
39Td/Yo4AEk0camt+Sg0LLg6Bnm9AS+LiStWn0ZhVb/VcSmSDR8rhjnt8VwI
TfxDbTCXDQsxUWbMG1x4w1/iVjWywYySuvCknAuPa6yiw1bYMGU/P+kxzAXf
Q4wKbtII3Ixr/+We5Z/QdjZqR/t1DjgESbd0DP0JaV2W/KyqP4A4UdDppM8D
tWj6FbMZHpxUztzrHzsOSs1+/DkDARyhJ8uqHkxBV/f4Q4+iGRjUjJzYwxHA
iHPxYO/AHMx2T1h5Zr4F8xH3kuN+i+A12c50hRlo8iUuu9HE0OfZ/GJx5D3I
Uw2OraUsQ4JerbN4vxDm64tWqlkrcMhIZlhSNQdJ5AOc+ck1iPSIeyCTzMO2
x2cXsz5uwKwSt3CVIgI7IAdQKJ+h47TGvm8TFkCdKPgc+L0MLjeXSDnli8CM
0Y7vdyWg8uELKfWCj7Aek6ilH4Yhp3cGK9OZS7BFK7bTIlIJuf/26p9SXTEE
N1TvaslRRiWPmn47WimGPNG5fJ3iLeiqW+dMqc0n0Nod3bD4cisaT3Hlh3d+
ghuXHCIvTqog4mjGUZ7nMkxFM1wGhKpoa3hN6tWRZbh0xrqrdLsaGhqwfqMZ
JIHV1ZMBDju3I02n9cQQgQTCi6Egw1QdaX+yzUkLXgHrwxGxVGcNNJ90ezd/
bgVYmeZRMyc0kY156J122ipUsnE9afQOxB9k/GwhWYVsyn+8mblENBQXSVNN
WoMyegHP4rgWGlU+vbS4uQaWOn4TtZNaiKxZYyhMX4eCwNkPt37URoSjRu62
KhtA2MfrHxNqI55LU9O1jA1gaNJk/vE6yK3uuSFDaxN0nzGdnGU66IUh2/t7
+ia0BjRzaLm6SN7RsW5rKgV3TkyshKSH2oKu9ckrpcDjMN5zi/WQJdXO+I7i
Lnnc07Wb1vqoydb6jg/rM9g+nky59FQfDVJo7/d5fIHNBOVHRw+TkHqoSpjq
zBfo5OaU0DgkJLkbaF+fLINfMf59kS8ZdaXYO9XtkMMJyvBawxwZmfjssVKp
l4PO15kBY1EGaMd3zxw3zAho9El5ns+KAeJMG0/djiKgjr1BOw0ydqJ4w0bP
rh4ComcJ6hzUcXRvg/rMm4who+tYeb4mjohe3IleAww9yjYpmiPi6IBHj+13
OIZac0Ou3NbDEcGWEmK0C0PTDIHP8i4c1W1YjL0zxZBNmYBQY4Mjw/JCuxQK
hgZbBVTcG0cFtDQ7jiuGvF9gbtG+OJqolBDdj2CI325ysM8PR57G5gYsNwxJ
mCFWF4JwdL6X0FR/TOHTK5Cyw3H0F7te09wfMBTBEZRnJeIoS817yvsfiv4o
doefjKMt4vgnw4EYSuGa5O5Pw5GP0fUa92AM3eSFJMyk46gt4vf9oPjz51OC
44du4Khdzs//hoYhZwHmUpiHI7O3ZdMVERgamDax/5iv2O+wONTkrMJvJsT0
7m0cpTIvrxicU/BnL5ElRTjypS+oMqIUfOEDjWMlONKh7j2mfV7Bn2dhZfdw
5L8Y0ZETgyFVkWB1vRRHHaEVP26PxdD/ABf1SVc=
          "]]},
        Annotation[#, "Charting`Private`Tag$33109#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVj3s41Pkex+dHkdC4zuhHe9w9u7Y5nEo28v1GNklpKRwc192OsdnICrlW
dCgilyIqiXLLpY0T0ufnFllijJ01B8eMkqEhcqfGcf54P+9/3s/zer11/M45
/SRFo9GCNvP/Lmi6NmdkednqF0lmq8W3JkC/mPODXoMPEucVexPr92Dtlh1f
Uh+Mfp4Yy9ktKgbxbJucmBGJDnUyE7oHyuBcsfZdcX08Oqi7qlixXgkB/V77
/EUJ6O/pje+YTjXgt5Hfw2ckowwjltHF1adQVqEQ97Y+HTk6kiunJmvBsNX4
9684Gag04rJC78F/w0O+PdNdlIU8DpQqCOKeQ75MclUfIxeJBV2iL7wGOFIt
Nfvf+gK0x6hombHxEq5aqNyKbn+ARrP2vs6dB2h7pWNJcgpRmU3f28RgCvAI
TjotKkJ1F1hLsaea4cD2OO1uRikqDz7/sPhzCzCexpQM11cj2+fUB4uZdqgN
T4wqRzVI/69JN2NsX8Gpg6knLrbXIBfl1aqQvFeQ0Zm/wOQ8Rdl6eu/KbDqA
PtqInUXP0KiqLAlXO2Gbwtrga0Y9um+i8lJe0AVf/taYMFRPIR/VCxvqir0g
YNzI8ZdqRu3CrWdCT/ZC25pPxQf7ZsT6KYRnk9kLKS0yA+tDzYj9Ia2zWL4P
SCcnPS1JC9Lf5pTzOKUPzEMmmz2t29H9hpTBjisc+LWKuTHS9RrV1kXNzR3n
glvmlMoZ1S7EF8pY7GdzwTK8yXDGowsFFTamuCZwQRr5n5CIu5Bpxr/KjBu4
kPGm8u5X9G4UzZ4rMNUfgOppW0tv5zfI2WD4itGnAVhSb7CcDeKgj8V93KYI
HvhF/SHXk8ZB06HBetQNHrwRzPJKazhIjxU3/aSIB4/LjUL8Fzlo1HxqxKGP
B26Hsot50f3oZnjTL/cM/4TGs8E7mq5zkYX3+hbo/RPiWw0FyaV/IPpwVouV
Oh/kQjKv6I3z0UnppL0eYUMgVecumNQQoiOZMZLSB6PQ2jb00CF3HPUoBg3v
4Qqh3zqvp6N7Ek20DRs5Jr0F/X77/OPuM8h5pImyReNQ60aft2PPoU7Huhcz
/e9hI07j2HLsPIpUq7Ce2y+CqarcxbLmRXRIS6KZXzoJ0cwD3KmRZRTkEP5A
sjAF2x6fnUn+uIompHg5SywxmCGmJ4v1GcFphX3fRk6DPF342et7Cbpcl7/O
LZoBKlQ5osuWhov6LsRWCT/CSmiUkro/ga3eaSyOJc3CFqWwFoMgKWz/26t/
rqvOgU912a76VGmc/6j2t6Mlc5AuPpehkrcFX7VrGS8w+QRKu0OqZ15uxUOx
toKAlk9w45JF0MURGUwfSDzKd5yH0ZBsm26RLN4aUB53tX8eLp0xbi3YLod7
u43fKHovwNLSSU+LnduxotVKlK9wAQLyUFairjxW/mSaGu+zCMaHA8OcrBXw
VPTt3YLJRWhO0g8eP6GITfT97jSxl6CEQ6qth+zAgp7snw0WliCF9R8XKo2O
e8OD2LLRy1CYmcU3OK6EB6RPz86sLYOhivtwxYgSZiqWa4oSViDLa+LDrR+V
Me2olr2pzCrQ9vG7BkXKmG9TW3stcRWyFdkSjwgVbFf5XDNbaQ1Un1FW1hIV
/EKT4/J95ho0eNZx2WmqeANgxVR3Hey5oWELDDXc6H2tc6NkHfjc7Pe8PDVs
6GSmfYf1GdJ5pyvWjNVxranxHdfmz2D6eCT20lN13MNiv9/n8AXWIqUfHT3M
wPJ+Mv6y41+ghZeaz+Yy8MJdL/OqGAn8Sgjui92YuDXW3KpyxwacYPUtV08y
sY7rHiOZqg1Q+TrJczBYA+/47pnlqh6NGnhSlO66qIG5Y9qjt4NpFOz13qmR
uBNHaNY4trbTqMxkYaWFPInvrTo9c2ESlNZ1oihDkcR0Z95whwZBPUrRyZ2k
k/iAQ7vpdyRBNaT5XrmtRmKaKctXaxdBjWULXed3kbhy1WDwnS5BmRQKaeUm
JNYsyjGLZRFUT4PQiXQhcRY73oxrS1AuLwi7EDcSD5cs0O2PEJSgSedgpzuJ
HbX1NZrtCGqB8jW64E3i8x202qpjmz4dwnVOAIn/Ytahm/YDQQVyhUXJUSRO
lnMZdfnH5n6AuCOIIfGWuYgnfV4EFcvTSdsfT2JXrevl9j4EdZPvGzmeQOLG
wN/3I3+Cej4qPH7oBombNgQZ37AJylpI2OSkk1jvbeFYcSBBdY/pmH/M2Px3
eM5P5+ym37iv7t3bJI6jLi9qnNvkT1xiLuSS2C1zWjY7eJMveqBwLJ/EKk57
jymf3+RPNROF90jsMRMIqaEEJSsWLq0UkBj8in/cHkZQ/wNJPX/X
          "]]},
        Annotation[#, "Charting`Private`Tag$33109#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0n1QkwUcB/BnMN4VGIwxluZGcUFXaC93kefcUyhZJyKegeflMTFOoFAp
OxbgtSgRzfC4IO0Oa0hnHMVUEjXDcwf+kZID9fQ5TPA5GUwGGwzYBtvY8vcd
u3tu97nf2/e5TVG4f1tREMMwHz976Js+Bae6VVzrAcfMOuP1Z+TLjxlVk7lX
ZLUnOLK8p5ZTOVM/OtSl4eHPOR7WDD1Bf1OnCU5LN5EZ28RTslJRM0pWhxmt
5MW8HDPm/Yop8rWtRli7+3U7+bQwdRzz97Jn4ZghmOe+dpBXGqst6NdfmicP
jVRMYn/sDjf69xiscPdBL/Ioy2zo39Hmw70Pg6bIuvUcw1aJ9ca1pdPII7EI
yLY1QXYy+7g/iKz/5pR9KZ+QvKW5eQb5claHYF6YPot8GRtDyfuOtsPqDSVh
S/vm0B9bEg6/pIH5Yi0c7WyA5X95I+COPQ70P+IicW+gA5abgpchT2W0E/mL
6pbj/hEbLL9ZFA3fOOpC/hWfxMCZc7BOuiEW+5qU87g/zAcsboPVEV+KcF+0
ZgHv+4EF1kd9D7OvNMYhf8c7buT7IS2eXP/dfVi+6iKs3/439hnO9cL7Vu3y
oO7MF5PTD7XBfN4kXJ8yDKsvfJWAflmaF3kbR2FbSBUsz2yWoJ+tXkQ+Li4R
+cflPuRJvgannxX64bwt0qXfC+bNFimrjMx/66GUMdA9284kcuLFjTCfFSwj
u86cgNkD9fDJvedh3YM3r6vE+ve+uG0aUNF9yaCRnMJmPySrNZWDqkiu9Yza
zpN1t9sfk9/9ZdMTVeD/MUoO6so0kdmKV8fJPYPvj5KZXWVWuCB+jCz/b2Ea
vrwZ1jZl2mFPFsz/vG4WbsoxY1+wxkmuGbs6jvofbhfyrHBZkGdzgpuc/IJ5
Ao4f8KK+fs5KNrT3+5C3sMOG+pHDDEv1R9um4LHTAvbwRG7L5axp5AsVBJNF
vaX2JQvhktAZeG1cCDm3em/AQy+Gki9UP4DZmkK4IXsB1snOhaHe45lF/eyx
cNSTP5vD++xuiYDT7sCGqxlRZPu/dx2YLwpfRn6tpcwJ/5S0HHXfFVi7MiMa
+8+bYTYyPwb5Kt5wYX9EcSy5vFAyj/5UKyz69ldY/fZBEe5HvbyA/X1+uHzk
d5jhWuOwX9HoxnxlSjzyDId7kNfXCdv/LIB1gm44d2cpzHfdEGPew3qxr/Ym
XN7/Kaw1dSaQ71wqXgz0CyXYd+s3mCn7MeARmQ/3bikScV/ZAsvvTsEN93r8
cN9WKdvraJMqn2dYsqcPrkveD/Orq5LIT+vuw4btAhn8nB9mzMfhf0YSBez/
XnJ9Gg==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjHs41IkexuenohHlFgaNGbajTZdhVSS+X45Ickvr0pzY2FYlyZ1ya7Yi
qZRYxWMzSqQtxCQi9zshM+N2kNhy3WHcr8f5433e5/M87+elu3qdPCdCIpE8
1/P/Ht7JPjXuE2n4yX8qY+6INsjvjG2JYp2DrMRlsfbAVGi7lj/ixPIHv+/j
USp5GRDj84Dzjh4B9xRV4sONXgNDozbQmHUTpprDBkcDc6C9e1W3aSAa3J0P
ibVHvoUjtUorWfRYuPDTLZ8d5/KhL8S25CArHh64Xi9OzisABn+MGqKdCDH7
R9XP6BQCSysqvGzgCTDBPcrhzyKQ9XWhpdOfgq8kRRhuXAIcjYQvDNZzOO/7
dJ4TVAZ97V8f2HWlQ+10iPMVkXLYzNIyDtDOgFJ3o5I9UeXg1NPILhp4CdTb
d18JoyogrJbQTqNnQ8f0M98nv1WBWqiucC8rH3pLGg3HOLXAsXOxgH0cCFq+
eodKqQOL3bfSbLo48MNM4TA/uA78+J/tfLULwIGp30Q7VA9VWl55BQOF4KJT
pJTAbgAdYVthKr0UlG3mf60xbYaOF+SQPawqePvfqSuiIa3Qc6Oi1LuvCr4l
Zet1pbZC/9nQTe+OVEPFPHWfc00rDCtP3jOaq4ZLv1oyw6TbYPF+R6r9pVoo
Pn590JbdBipBL2oi7BvAJHulO/XdZ2A8Y9++GN8C6NLTY/eeC7kP1zQlK1tA
zEEzYoDPBZ3r/2l+M9UCEoubfjSb5YKus7zsjHUrmKYGH4nX5oGRYnRyuHgb
2EOuuX0mD07GeL95FP4ZyKNhy+P3+eDrh9ySCzwIyez92GXSCfJrnjbH43kQ
qq/5xP9MJxTeTmrglvLAtqRYfsG/E0h/zpaNKfBhq3qaSFF6J8TUvXqtVM0H
+ONbnpZYFzyjUqIC1Doh+bGfrWplF7TXTh7e190NgixNNa/9PZB0z7bFKr0f
gpceRspxe0Ew0VN/fnkIUqTc+tuLvsDQxU/WJ6pHwUY0biZ0+itcy78Y+DxB
ABJj8wrnuUNw6t/0GPINIfxWfXLDXP430OCbjJa7zcKpzeqtdzyHgbzXh0+W
WYCKIPKIlWAEiqQ+Rx1YXIKPe152sMPGIIRjUDORvQp7QSay6Ms4KOeIZ6y+
ImGA4U2znxn/QL+llHUQVQT7rMhFSmYC+KvhyQfdwA3YvlQn831QAK5SH2NG
xzYifeXbtQ/RkyDXQRGpY4piQ63tKG/XFDRFLBiM54ih6f5tv9wpmILLAp+e
DTvJ+HZHVnexjRAUjLyNzoaLo85Hy9M53ULIcCSTc2a3oCVTdeEnr2k4KOT7
a7pLYs7YhSX9lWlouKyZOVayFXUpTI2r4TPwzDFGtYUihdv8K977ic+C+8Uq
y6YaKTQI6nGziZ6FF8WPm118pFFxqC97i+gcMKcLIzw0ZTDtputfadFzEJdE
TVDqkMGJ36d2rmycB/jXpx7jOFlMcLrENIiahwtTSgEkCzk8VplL7RdbAIX9
mT5nZ+WwxIp3ezZ0AfSsbzzVz96OhuqMWOWVBejrS9V6f0YeLbzPvZT0XYQN
uae3N4op4JX41nD5vxchyf2X3Y6lCpjJC8hxdl2Cd3cz2JGXFLFeXVF+nLsE
Zn8YnGBoUDD3rtNq/8llYEpvdwrhUrAusibFuWYZxhsjC85EKKHTD4G+1/VW
QOhhZl6gp4z/NBs3OeavQOg1cwPO38oo2B72SPbHVbh2OdF1L1sFg+9tdKlJ
X4U5NqtL7/QOzKNIH01RW4M5szf5w5uoOOiQ8vB5whp4tOwqlymlYnVFuXWc
OAnd6ga1+jxVsdg74c4mUxKOE9SrNAkaLqU8Dv0QQcKvUgLh3fM0/OLAJkTK
SKjk6KbaVELDHHKFR+IKCRsdrPStSmkYr/bGM2OVhGEOeg6fymhYfFwhtGBt
3bffdr+1koYKicGVHQSBr34uWuXW0zDW3mGWIkqgoZ1sby+PhskFm8dTthLo
alWRLJhY36tbMt+qEihn9brAW0DD4xJOylU0AqstH7dPTdJQm9o+zKMTqGnp
JTEzTUNu1cHcRXUCpy2UQxYWaVgxFzlpvIvAW+a+TBExOo4IGVo8BoG65s6B
v2+m41gvv/u7FoEjx8zjNorTsczEI35Jm0DrY6oNopJ0bGMEHqAfIFDRrOHw
Flk6Jk4Quz31CKw35djHyNGxgRg9EXGYwFDTVB9JeTrydEjhcfoEDhwNfLmN
sv631ixVaEDgo6Ou1bFKdJRMTbzSZEig6VHLAWmVdfZ/3dcPBM6b6K4+3EHH
Q5GKztNIYJaJupKcKh0rh3pHxYwJ/B8UJzgF
          "]]},
        Annotation[#, "Charting`Private`Tag$33257#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjHs41Pkex+enohHlFgaNGbajTResisT3yxFJbmldmhMb26okuZNrsxVJ
pcQqHhtKpC2ERHx+7nchM+N2kNhy3WHcr8f54/28n9fzvF9vpovn6QtCFArF
YyP/75HdaWcmvCMNPvlNZ84f0wLZ3bGtUewLKDtxRaQjIBXagwtGHdl+yPf7
RJRSfibEeD8sfM+MQPflleLDDd+AhlpdgBH7FppuCRsaC8iFjp41nebBaOTm
dESkI/IdHKtTWM1mxqJLP9323nWhAPpDbMoOs+PRQ5cbpcn5RaDBG6eHaCWi
mINjque0i4GtGRVePvgUsZBblP2fJSDt48zIYD5DPuI0QbhRGRSqJXzRYL9A
F32eLRQGlkN/x9eHtt0ZqG4mxOmaUAVsZWsa+WtlItLNsGxfVAU49jallQy+
QvQ7914LoiohrI7QSmfmoM6Z5z5Pf6sGlVAdwX52AeorazIYL6yDQltnc3Sg
EAWuXL9Lp9WD+d7b6dbdheiH2eIRXlA9+PI+2/poFSF7ll4z40gDVGt65hcN
FiNn7RKFhLRG0Ba0F6cySaRovfBrrUkLdL6khuxjV6N3/52+JhzSBr03K0mv
/mr0LSlHtzu1DQbOh255f6wGVS7QDzjVtsGI4tR9w/kadOVXC1aYZDssPehM
tbtSh0pP3hiySWsHpcCXtRF2jcg4Z7Un9f1n0HiedudyfCvCzr29th84kPdo
XV28qhWJ2KtHDPI4oH3jPy1vp1uR2NKWH03nOKDjJCs9a9WGTFKDjsVrccFQ
Pjo5XLQd2aE8M7ssLpyO8Xr7OPwzoo6FrUw84IGPL+aUXeKikKw+6DbuAtl1
D+uT8VwUqqf+1O9cFxTfSWrkkFxkU1Yqu+jXBZQ/58rH5Xhou2q6UElGF8TU
v36jUMND6I9v+Zoi3fCcTovyV+lCyU98bZSruqGjburogZ4exM9WV/E82AtJ
921aLTMGUNDyo0gZTh/wJ3sbLq4MoxQJ14GOki8wfPmT1amaMWQtHDcbOvMV
ggsuB7xI4COx8QW5i5xhOPNvZgz1pgD9VnN603zBN1DjGY9VuM6hM1tV2+56
jAB1vzePKrWIKgOpo5b8USiR+Bx1aGkZwb5XnWlh4xBSqF87mbOG9iOpyJIv
E6CYK5q59pqC/Q1umf6s8Q8MWEhYBdKFcL8ltUTBlA9/NT79qBOwCXcs10t9
H+KDiwTEjI1vxszVb8Efo6dAppMmVM8Sxo11NmPcPdPQHLGoP5Ergk0O7vjl
btE0XOV7927aTcXvdmX3lFoLQM7Qy/B8uCjWBouzuT0CyHSgUnPntmELlvLi
T54zcFjA81N3E8e545eW9VZnoPGqetZ42XasQ2OpXQ+fhecOMcqtNAm8w6/y
g6/oHLhdrrZorpXA+oG9rtbRc/Cy9EmLs7cklh/uz9kmPA+smeIId3UpnH7L
5a/06HmIS6InKHRK4cnfp3evbl4A9K9PvUZx0jjB8QpLP2oBLk0r+FPMZfCJ
qjz6gMgiyB3M8j4/J4PLLLl35kIXQdfq5jO9nJ3YQFUjVnF1Efr7UzU/nJPF
5l4XXon7LMGmvLM7m0Tk8LX4tnDZv5cgye2XvQ6kHM7i+uc6uSzD+3uZaZFX
5HGDqrzsBGcZTP/QP6WhRsN59xzXBk6vAEtyp2MIh4brI2tTnGpXYKIpsuhc
hAJ2/CHA54buKgjcTc2KdBXxPy1GzQ4FqxAabKZf+Lci5u8Meyz94xoEX010
2Z+mhIPub3auzViD+TR2t+7ZXTifJnk8RWUd5k3fFoxsoeMh+5RHLxLWwb11
T4UUScc1lRVWcaIU0rV+SLPfQxmXeiXc3WJCIScI+nWGGAMvpzwJ/RhBIb9K
8AX3LjLwF/s0QqicQio4uCo3lzFwLrXSPXGVQjbZW+pZkgwcr/LWI3ONQobZ
69p/Kmfg0pNyoUXrG77djgdtVQwslxhU1UkQ5OufS9Y4DQwca2c/RxMmSANb
6b4+LgMnF22dSNlOkC6Wlcn8yY29qgXrnTJByli+KfLiM/BJMUfFagZB1lg8
6ZieYmAtescIl0mQ6haeYrMzDMypPpy3pEqQM+aKIYtLDFw5HzlltIcgb5v5
sIREmHhUoKHJ1SBIHTOngN+3MvF4H6/nuyZBjp4wi9ssysTlxu7xy1oEaXVC
uVFYnInbNQIOMQ8RpLxp49Ft0kycOEns9dAlyAaTQrsYGSZuJMZORRwlyFCT
VG9xWSbmalPC4/QIcvB4wKsdtI2/9RaJYn2CfHzcpSZWgYnFUxOvNRsQpMlx
i0FJpQ32e9M/gAhywVhn7dEuJj4SKe80gwky21hVQUaZiauG+8ZEjAjyf0Vv
boU=
          "]]},
        Annotation[#, "Charting`Private`Tag$33257#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0wtMU2cUB/BLCwPKS6TQQkGKjMcSozIzgmzk3ok8MpEJgcw4zK5MBnuA
27LNTDDejQBuMxO2jGjCWFGcoLERnYM5ExrqHJtjCWBbHS4UKJaBPFoohQJl
Pf/SpGl++Z9zvnO/5sYUH8svETEMc9T1pV/XR6jecZeVGC5eV0/3dbusmsge
YGum8rqYnkGycuDYMPnhaMQQ/PvtUXJK/8f/ol7uOclqbYmr134ZgZeS5shF
N4tMcOlNC7mqmR0nc9se2FAfXGsmM2/Z7eSmnLoJstHvWwc58pD+P9RzIWvk
O7reSVjoXCe/5NH9FPvUNXpw5M8LZsiafZ0iclG/eBbz7TYxN3JC+nWV7xz2
iTN5kQN3hFlgH4U38vtdMF+e4UNWW/ysmG8SS5D/9D6s2pbut1EPG60/+GOe
6Og89gv1DyT//WXyAvY5MAWrD7TCvK50E3l7e44N814ICMY8VdIi6vdcgyve
scFC/J7NqC/Jt6O+MDoEuVEHK3vuwercT5fgBxFSuOseLByxwhWnm5bRn/5V
KObpnbBG1xgG1z9yYH8+ToZ9FqQr8PeC26/EwpqOCjk5t63CnYtTwpGnpq7i
vFs6eHvOMMxsPRmB86vL1nBfWxUK3M9y59rG80ciP2OF+b3tsPptmRPzPDOi
ML8+GzZeGoLVH7bAzJ2aLeSZkp3ryH3LovF/KAywps1TyX2QJkl4cS+joX3n
c2Hvwu9g4627sPkjszuflccg/yLeg6w63tTDLiYWBX0iv89SvWb3IFspVZf+
GK8jCwtDQ+Ss6ecesXievnE2TWLYNVRnRF5zaIocG3R+lMzXpsyQtfnPjpGZ
gjEL+eKFDhPqm/tssE+7GfPqg5bIY6f0E8ibLjjI1Z99M8m6X2En5u1MeIr9
RpMZzuX0q3/BqqwRWFscME3mzl8RkWPzymDm+SdisniuFRbePOyF/tw3Zsma
fyTeXLTrhZc0z6E/I8uHnLTLAfNjl3zJDX8orLDT9X6QYwrnUd990h++MQgz
jw0B6NefWSAr2cwg5L8etuH85Hc3kTv0KzBf7hUM96Ytwo0tcMP1Nth4OXMz
uf9xlR39LytDMP+Z7CV45Tbc8VoDzK8elKL/iQnmrjphS96pZezXYg5F/0Cy
A3lxfRjqU3thTW2CjBysDlzBfM/fYMurBbAqrlWO/uGwVTinMBz3t7sS1rxu
hPsz/4T5K6oI7FecuYZ6XqpAf0QdrKm8Aec97ISF9y5H4vxsmRP3N70/Cp5q
h4UT41Eb/8c68iPaLcg7z8FC0vFo7myP7WBiOMPReT+LlOQu6z6YMe6HU06f
ddughc+VG2F+1fV+uCyPlHlw/wOn/nEY
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVx3k41IkfwPH5OlqF3EcyExK75c5Ris9HWNVSEpVKD7Y8ZaKSfsiRW6wh
E4stx+NxJT8jtJnccoXJNQy2kccRK7lyjuvn98f7eT8vZdd7drf4SCSSx07/
f/mTheih4nDTTx3bejOKR2Eg9KfMzzxXcKBdO2t3LgsWPc+alvK8INGl6Lbn
6CsIUEzQWPUJAEv7xv6VMgbwjVNp6bxQqD9Wu+18rgSaTsQLmDGjoEsj5+Kf
PmUQQy/xH/WJBduciZpq6t+wO3NDP5FHh5lx0zTOKBPcf4u7P+6YBPzs2tnV
RxXQvnyg0JCZDOGxK+X2C5XwzMb84IDPS+AJa059elsDsZsNQvG8LJD3josU
OV8PJj20XKPD2fBtdmzq2pd6mMm/ZDHsmAOO7jFqgdQPYGs/+USXmQfFGab8
Mb4NIP1aeKXHpxC8igv28Hk0wTmNV16xvBJwkmqw+TT+EdSSaXXO9FIQiU4T
YVi3wjbhJW5wuAymmkYKBEpaoZhjXMR1fAvpP9SS7XzbQDKs/V8t5jtIUJOW
kVtqh76BWecun0qQNKeNejE7gGH+Qv0PXj3YWpu3cS90g8YlA6Lf+gN0iUvc
DPDrhvzbHYOqGR+A8TTVqjmzGzJp/HHV5g2QHVEq5j7TDc841MX52EZopD4+
Ih/ZA17Uk3VXDrQA15AaHJbPBsPn3KtqFiwI0otS9qjvg5IcH/2Hf7IgSWqC
Sx3pA61yib21kywom2MlmPJxQI1rWedI+wSLV2NKXM04IKdepE7r64Bdvuzn
5VUcCHACnp9+F7wvLlI4yOiHG/NizcNNPXDGKMks3HcQkv6bo2DzvQe++SZ7
WtIHof3OCU+mFBs2cttlZ14PgvGImwzdmQ0iOcXzy0ODINtT9bs5jw1bxdrH
Zsz/AVYZlZSr2QcNjuG/F+z+DCd9m49TE/vhdCdrdCiCC/u3gwqXXLgQ3Tg9
53loGHqGtcfd3Eah86VIxljCCMhLpctuhUxCXGogx2BsDPyyVZTtfv0OVQ9y
fg0Y/Ap3wyTzbh+bB7/VSv49nZPQqVwsnFr3A64WCCkF/DUF9bP9n9UPLIO4
3rpdrOY0HM1FaGesQsvAg40r7d9BL/bo3g7pdbBvcPbvNZmFm19Ova732ITI
wEj9z9ZzILs/YaBtbRtU/avDkvnm4bC5wft9mgT604LILrnzsNvDzLb/P3xY
YCRRc9luAUJZ12zi3/Nj1Ot/E1SWF6C+sSL40aQAMm6t/DwU8wNO6VUEfNXe
hfP/iD458fMiRBuSGJEuP6Fdkphz7btFEGeMvXpTKISVe72EF84vgc4NjnDv
/G7UuWwhcGFkCeRyxLLVlYUxlHP8kuvtZTB1nhAQdBfBUn9RpuXKMmiUCryU
SBNF3wilhfjHK1B2Uucv2da9GMmxEHu0tgKmaYE6F4XEUUU2PONUyCrsmhRk
lGSK49weq9pbW6swM81N4FhKIOfASN+D8DVQETXJX52QQGh2p6Tu4oHxWrWj
7hNJ7DfOusMO4oFXxrN72gelMMR19IgUaR1oEhFKlpVSaGfLl9ngsw5L6STB
y3bS2KUtuMd2eh0Cv7bZaC1Jo4Jpyn2S+wZMrjF1yTQZdJKskswd2oCHzSt+
XbqyOKUeSY6+vgkjzlec0tpk8XHFm/T8rk1Il0HvW65yaGQ5XatlsQWPw31m
FwTlcXy6SUCzdguO13QJpqTLo1zqg30fj26DfJl/MJ/FPmRODIeJvdkGi4ZC
rTtf9+H1VJqVjCwJL2aSfCcCFXDrg1vei/MkDDXMPnREZT/at/Vq/hJHwqQU
d8/Iiv0ovnIh82MLCRdlyqe4FxRR6LhD8VM+Ah/aOLTxFhWR7iRkHG9GYJ+t
jJU2jYzvZ66otwbsOPX8RF88GRmsv/N6AgnsHYmOCqKTkf/Qc11uEIFs761m
VjIZk1OHXeaCCexOmTh9N4uMUX8EG8hFENgxzDz76h0Zpwzdi9xoBLbcv3Hu
4AgZUzYXpUTTd8xMmWkdI2OrdVynXAaBzXw9cV4TZLRO9E5WySSwKdGqo26a
jAI3TlkcyyKwsVzH1nmFjLpPXyjczCWwnsRvlyZCwXZN8dqqoh2fMVmwEKOg
SRVd9SODwDq6D31agoIOj9qfs4sJrFWd7j4hR8EvesH0byUEVp/uvTioTMFh
So6EwrsdJ4gthqhSsFwprf1QOYFVg2cSf1Gn4Hf1ULouk8DKu9VsXw0KhlzX
gjMVO3676q2kTUF1BX41h8odb+nJtOhSsHbzi5xL1Y6tPN7e06dgJbtN2qOa
wIpneQ5yRhTM9WQp+tUQ+D/d9D6m
          "]]},
        Annotation[#, "Charting`Private`Tag$33405#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVx3k01XkfwPH7szQK2Zfk3pCYKXuWUny/wqiGkqhUOphyiqikB1myi3HJ
jcGU5Ti25HGFJjfL50e2LNkuF9OVY4mRbFmv7fH88T7v81J2vWd3i49CoXju
9P9XPFmIGSqJMP3Usa03o3gUBsJ+yvrMc0UO9Gtn7c5lw6LXWdMynjdKcim+
7TX6CgIVEzVWfQORpX1D/0o5E/jGPegZvDBUd4zcdj5XCo0nEgTMWNGoSyP3
4p++5RDLKA0Y9Y1DtrkTUOPxN+zO2tBP4jHQzLhpOmeUBe6/xd8fd0xG/Gxy
dvVRJbQtHygyZKWgiLiVCvuFKnhmY35wwPcl4glrTn16CxC3WS+UwMtG8j7x
USLn68Ckh55ndDgHfZsdm7r2pQ5mCi5ZDDvmIkf3WLUgjw9gaz/5RJeVj0oy
Tflj/epB+rXwSo9vEfIuKdzD59kI5zReecfxSpGTVL3Np/GPoJZCr3VmlCGR
mHQRpnULbBPe4gaHy9FU40ihQGkLlHCMi7mOb1HGD7UUO79WkAxv+1eL9Q4l
qknLyC21Qd/ArHOXbxWSNKePerM6gGn+Qv0PXh2ytTZv5V7oBo1LBkS/9QfU
JS5xM9C/GwpudwyqZn5AzKdpVk1Z3ZBF54+vMa9HOZFlYu4z3fCM47E4H9eA
GjweH5GP6gFvj5O1Vw40I66hR0h4ARsMn3Ovqlm0o2C9aGXPuj4ozfXVf/hn
O0qWmuB6jPSBVoXEXnKyHZXPtSea8nFAjWtZ60j/hBavxpa6mnFATr1Ynd7X
gXb5sZ9XVHMg0Anx/PW70PuSYoWDzH64MS/WNNzYg84YJZtF+A1C8n9zFWy+
96BvfileloxBaLtzwoslxUYbeW2yM68HwXjETYbhzEYiuSXzy0ODINtT/bs5
j422SrSPzZj/A+3lHpQ8zT5U7xjxe+Huz3DSr+m4R1I/Ot3ZPjoUyYX928FF
Sy5cFNMwPed1aBh6hrXH3dxGUedLkcyxxBGQl8qQ3QqdRPFpQRyDsTHwz1FR
tvv1O6p+kPtr4OBXuBsumX/72DzyX63i39M5CZ3KJcJptT/Q1UIhpcC/pqBu
tv+z+oFlJK63bhenOQ1H8zBqY66i5oEHG1favoNe3NG9HdLryL7eOaDXZBZu
fjn1us5zE0UFRel/tp4D2f2JA61r20g1oCY8hW8eDpsbvN+nSeAAejDVJW8e
dnua2fb/hw8XGknAZbsFCGu/ZpPwnh9Hv/43UWV5AeoaKkMeTQpg5q2Vn4di
f8ApvcrAr9q78Pw/ok9O/LwIMYYUZpTLT9guWcyZfLcI4syxV2+KhHDVXm/h
hfNLoHODI9w7vxvrXLYQuDCyBHK5YjnqysI4jHP8kuvtZTB1nhAQdBfBZQGi
LMuVZdAoE3gpkS6K/SKVFhIer0D5SZ2/ZFv24iiOhdijtRUwTQ/SuSgkjlVk
IzJPha7CrklBZmmWOJ7bY0Xe2lqFmWluIsdSAnMOjPQ9iFgDFVGTgtUJCYya
3Glpu3hgvFbjqPtEEvcbZ99hB/PAO/PZPe2DUjjUdfSIFGUd6BKRSpZVUtjO
li+r3ncdljIogpftpHGXtuAe2+l1CPraaqO1JI0VTFPvU9w3YHKNpUuly2An
yWrJvKENeNi04t+lK4un1KOoMdc3YcT5ilN6qyx+XPkmo6BrEzJksM8tVzls
ZDlNallsweMI39kFQXk8Pt0ooEluwXHoEkzNkMdyaQ/2fTy6DfLlASF8Fvsw
a2I4XOzNNljUF2nd+boPX0+jW8nIUsiLWRS/iSAFvPXBLf/FeQoZZphz6IjK
fmzf2qv5SzyFTE5194qq3I/FVy5kfWymkIsyFVPcC4pY6LhDyVM+gnxo49DK
W1TEDCch4wQzguyzlbHSplPx+5kr6i2BO047P9GXQMXM9r/ze4IIsnckJjqY
QcX8h57rcoMJku2z1dSeQsUpacMucyEE2Z06cfpuNhVH/xFiIBdJkB3DrLOv
3lHxlKF7sRudIJvv3zh3cISKUzcXpUQzdsxKnWkZo+IW6/hOuUyCbOLrifee
oGLrJJ8UlSyCbEyy6qidpmKBG6csjmUTZEOFjq3zChXrPn2hcDOPIOso/Hbp
IjTcpilOVhfv+IzJgoUYDZtUM1Q/MgmyluHLmJagYYdHbc/ZJQRJqk53n5Cj
4S96IYxvpQRZc7r34qAyDQ/TciUU3u04UWwxVJWGK5TS2w5VEGT14JmkX9Rp
+Lt6GEOXRZBVd2vYfho0HHpdC52p3PHbVR8lbRpWV+BXc6ja8ZaeTLMuDZOb
X+Rcqnds5fn2nj4NV7FbpT1rCLLyWb6DnBEN53m1K/oDQf4PD0t1Jg==
          "]]},
        Annotation[#, "Charting`Private`Tag$33405#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0wtMU2cUB/BbBIblUR4tFkpL2aawuS3TOIOkeK/zLZlAdTAzEWTgWMyC
DQlzBU1RcRlTNIrTZbq024RoHOs0RrZgbSHMBVnEkFTmWOVOKXN0QIXyKKVd
z//SpGl++Z/vnHO/tmmlldryEIZhyoJv+gy+rI8abrM10tbceU/3naCNm/lu
Nlv8sCWm7AH8/fYBcvpby/rJJT1FPHn48+EBsnWIdbKp9SMfdP3Nkw0thS7y
em3kEFmd/2ic/N2uP5yoT5dMkI/ueO8ZHKXzoP5kzQg8cHMaeUTAhXkxr3tx
XvZ4lDxYWexD/TH3GPK+dj97qsPDmzvG4aslDBf03pwsN/ZJfSIim46Nwpwq
cRHyuurnqK/ODYUbmAk8770ALKraCjMr94XjfPOIkDuVEeS09Y2TcNMQbGsL
wIazcjG5LqvKg/7HMyPJ6z7thrmlnij0qymbwvP+9EYMnPD2NOp3aiXY59o8
PKjbFot+527OoN72EDaNJc1iflx5HJlffQJWZ/jhNKfai31C6+PxPNcaBSve
ScB594Y5uPGp4GQTbJTopZh/0CXk+YtlcNF2H/ZpvQyLTrTDnGZeyOM9sPGz
rkTM3/jzPPa5XrQE+7GJfvS77ILX9ZfCRlGtHPdnuiXkm6RJ6LcpPABvuwrb
YtfA3O0zydhX9rHgX1MUmPf7D4IvWRXcFt6b1/8KYxV+vynk04ZimOP6YPMX
TfBgy3EluXdfjIhsiJaoyAdezoOth5RWtn4kv1dz8TeW6our77OdnoxMS0Uf
XFdlJ7dpyuxw6KonZLnCPkBWp6X+w/J66cXzDTyZuVHjIvsyDj4lGx9bxuHa
951kg7TVTa49mjOM+lM7PGSNeOJf9FsRMUPezX/5H/L2MC9yOz+Kfkfyfawu
W2wpjR4nlxQc8pMPZ1+ArZ0dDBf0N/IzbvRLnRSRD69e8xz5TlsIfLZZcE/P
IvJa+UsTcN7+MOSrYiYxL60xHNZdEXxaEoH+n7zqQf97sYtx/sgBmGtuEJNV
ZmYK+1e8GLkwHza6tVHIK8xTC/cbTXbcXTaN81+/K0E92wlb/Stj0d+pmUG/
C3/BKl3WLGz6MA75V22w9dIY7JiN8uK+V9yKh3vNsHpLXgJ5z/6MOeRmHnbo
v4XVkhwp+hU+g4P/R8HXl/vg7r0ysmVzJcyELE9Ev13SeZw/fwd2FOhhq7Zg
CXxjGB6UKuVk/5/lfsy/ewW2nGyCjcbMpIV9Yc7eBe9R3xfywoZk1L+ZHoA1
rynwfZx7ADMbflFwbaqwyhdkDEf57rUpZIljKxy8HziXtwm5RK8k/2ifgzlZ
lAr+aKmI+x90YHIQ
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk41AkfAPD5jXUl5E6OmTZLkZQSr+v7pU22hJlypMQS2qhISJNIrtyy
5dhoc5UOOSfyGBlXdGgwvOPOkso17kjs+/7xeT5b3S7SPcgkEun8//x/647g
RXeNKNNT2i3pfx3UhVwirukP+hkQu82cpYQ9gOey9UEm9MvQv/SkbbD2EcQ/
wo0WjOsgaSO1yrcpAj1VF1sNegR8epu9fiisBNQ+Z2U+8bwFc64drbopZSBd
2jeiw0iEHh/2G6+LFfDt52fGyvQ/wTfScz7hVSXwo9/+frrvLvBie/iSZi9h
bGI86m/PDOCSPevYT6uhi6nJUWNkA220hneQxgKnXzpL5el5oF/5VOf4jTro
6nZv1E/Lh4mQDxIOYmygx851O/YVQLTlvQMnU9jw27T0j0zPQsgZY4Q/u10P
BlW0QxRGEYT7jWWd8muEuIKxSRl6OZCP9xrerX8Nr0N1gvLmy2G+bk8+Wb0F
hE4EkfTSKiC1tODeQlQLhIsJy9j3McHD1ses+NdWuOqrbpDuWQXvV28tCZS8
gbOGHuHKDBYwIno7P9q/h21efnHS9AawrN+a9ziSAxfooQp7HjeAAyvwUMYT
DlSaJOTakBtBpDPgJwMOB6xkC6vjSxtBWao1KUGpHQLrhsaFZJrBaMhI5c3T
dnitZGv1vaMFHnAfNk6wO+DCh13iI3Zt4FySKGLcxIWqauMMclEbWJYvHBsZ
4UL4sfzbmwQ+AMPY/4GbQBe8NS1T1Tn5AQYLm+f/gS5wlWvb7yPGgfWJHDex
F10Qyxby+uTdDszI0piL2d3QrxzY3LOTC5uS4rUWjvPgXKp6+podF0ZcLMYf
nufBomj32Z9DuUDZ94/1gSgeSCzpbzjH4cILbXEJvRc8MOUsWy0HdEHJ5GSI
2OYeyI4MaVeo7YbeQQOBKm4PuE5F9B+n9cC1vHPtseZ9MFKbOvc+YBB0Rz+z
YHwA7tX8NzOxcQRYVfz3wq0f4UdktG6myVegBYfUHBQaAWNvT4q+4zTUmCbr
1HwdhYysS2bKvrOQcXJa2b1tDB6KlV7Zq7EAXXr7wDjuC6jF3HJKfb4EES5V
dD3pcVhdLg7Kv7ACnkZHKafyJ+DXq75AWl8F/ai/Z/aJT8F9UnG8X/g6DFfR
s8pcp0GLdT/2sCqBURvNPGTd+GB6c28e6QwZZ7c8Hcgiz8Ca+cVeyUYB1JEo
uJ/4ZAaaBb3tHlMEscE671W/1Sy0tJWqfXETwuGYPXZlg7MQ/GeO1I06YVwN
4w1eYsyBq+vAsRoRUUxWP8LsF52HeXV2Gd17A6q0/pJ09ME8pPA97P2bxZCZ
vtno9N4F8KqzszbYKI5WCkaSsVULMB4/6W7vI4G7K/ezFi0XocCF835zhSSu
WUzd1Hi3CBWZhqZljE1Yj4+dbI4uwVT4UG6UphTqfhyO+dy1BPUXdu57+k4K
s5new1T7bzDlYHXs+nVpPDITUTY88A2yzd/KyO+UwWq50HrNM8vwdffs2vo7
GZTdpB7CGlyGBOWJK3dDZHFX8UT1Zo8VeCsWrxK6VQ4NWjVPyH9cgaTVOHdt
thwu+JjMHHb6DoVfXQxifOUxlpYxmNj/HVz6ePp6MgoozvRI+eKwCj5vNJoS
6xUwpODyaGLfKsixlEINz27GFtaKeYLjDzAvvch7IqqIj3Smm0+2/4Cm3DR2
S6UiOvE7t43Yr8GndI+u/5zaguU0txjFjjVwjhMOthdXwsBdvbw/nNbhRKho
jUG1EtrF1XqrDa0DP7BE67yzMlpFtyd/2UXCAW/tHdbiKmjZ3nYt35+EZ8/Y
0G6UqOBvZmgSUE7CoNOcLVfpqrj7WlPDs3kS9ttp+FMICu6vKG3QNyJwwHbb
onweBVP09yXNhhDYflk1b6qAgvzIc49VQwlsTlekNxVSUFBbg3c4jMDiIcmi
gOcUXLZ39MsNJ/Cm76pH50sK6oXfS7CLJnB7MpebwqGgRWFLSE0ygX5t0RUb
1ylYZGx5/V4ugWXBdXtmSVTMtXJSfpNH4DOxWpHTZCrqHaC0LecTmKPzkqkn
SEVZ68+XHB4RGBdULD26gYq04IhymWcEOgtntR6Qp6KSpPP2ZCaBjhmZD54r
UFG1W03+1QsC6VrpV5QUqbhWbKjIryTQwiZVfU6Jijm9QS621QTuTrsVnrOV
ilF3jkxKvSJQc0f0CYltVGx2TosyryNQrTpi91U1Ki7JhOn5swlUHAwdoGlQ
8acVm87OBgJl/UIqarZTMXnDkQbBJgIlBBjxOzSp6NW6oXV/M4Eid66439Gi
YoFuxqjXawLJGoGGhDYVJ4CkkNFC4L8CnS+s
          "]]},
        Annotation[#, "Charting`Private`Tag$33553#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk81HkfAPD5sTmakDs5ZtospaSUeJDvlzbZkmOKpMQS2qhISNNEkyu3
bDkWrbOcOSfy4vNzR4dGhmfctaQiTc5I7PP88X69t7heZrgLUSiUi//z/63e
BC24aYabnNHuSPnrkC7kENFtfzDOIepdzgwtJAseyzUHHmBcRUOLRV0j8Ahi
HuEN5sybSMpaekVgXQp6as42moxQ9P5F5trhkHJQ/5CRVuRxB826vOnUTawE
mYrBMR1mHOr3bnruebkavv1cYqzC+BP5hHnMxZI1IIh48fvZwfuIH9UvkDJ9
ChNTk+F/e6QinpBHY1NxHfRytLjqzExkO17PP2TbAI6/9FQoMHKRfk2xzolb
jdDb59aqn5yHplivJU9Sm4ARNdvnMJiPIizSD55ObILfvsj8SPMoQNkTTHbJ
3WYwqLU9TGOWIrbvRMYZ31aIzp/4LMuoQkInBgzvNz+DZ8E6gblzVWiucU+e
kEYHiJwKpOglV6Okivz0+fAOYFNFZe0HOcjdxtu07NdOuO6jYZDiUYterdxZ
FC5/DucN3dkqzAbEDB3oeWv/CrZ6+kbLMFqQRfOW3MIwLlxiBCvuKWxBJxsC
DqcWcaHmQGyOtVArEuvx/8mAywVLuYK6mIpWpCLdGR+r3A0BjaOTIrLtyGjU
SPV5cTc8U7ax/P6mA2XxHrZONb2BS693SYzZdSGn8jgx4zYe1NYZpwqVdiGL
qvnjY2M8YB/Pu7tR+DViGvtluQr3wguTSjWd06/RSEH73D+oF1zku/Z7U7lo
bSrblfqkF6KaRDzfe3UjTlhF5OXMPhhSCWjv38lDG+Njdsyf4MOFJI2UVTse
GnM2n3x4kQ8L4n3nfw7mIdq+f6wOhvNBclF//QUuDz3RlpDUe8IHE+6S5ZJ/
Lyr//JlF3dQPmWGsbkXoQwMjBsK1vH5wmQ4dOmHbj27kXuiOMhuEMUiafeU/
gnTHPzSgyWFIr/9vWlzrGGqoFbwS7XwLP8IidNMOfEK2Qaz6QyJjYOzlQdN3
+ILqTRJ06j+NQ2rGFVMVnxmUevqLilvXBDykVlzbqzmPevX2IePoj6Aeeccx
6fEiCnWuZejJTMLKUllg3qVl5GF0jHYmbwp+ve6DKGsrSD/876/7JKbhAaUs
xpe9ht7VMjIqXb7AjoYHUUfUCBy+wdRdzlUAJrf35lLOCeGZzcXDGUJfYdXs
8oBUqzDWkcx/EFf0FdrXedkV0tbhFqtccshyBjq6KtQ/uorgd5F77CpHZiDo
z2zpW42ieCWEP3KFOQsuLsPH68XEcYLGUc6Q+BzMaTRVMrzWY9XOX+KPZc1B
osDd3q+dijkpm4zO7p0Hz0Y7K4MNEthS0UgqqnYeJmM+u9l7S+LdNfsbFiwW
IN+Z+2pTtRReNZ++rflyAarTDE0qmRtxMy50tD62CNPs0ZxwLWms+/Zd5Ife
RWi+tHNf8UtpnMnxeke3/wbTJy2P37wpg49+Da18N/wNMs1eyCrslMV18sHN
WueW4NPumdW1l7JYbqMGq2FkCWJVpq7dZ8nhXWVTdZvcl+EFNUY1eIs8NujU
OqXwdhniV6LdtJvk8bz3ga9HHL9DwSdng0gfBRxlmzoSN/QdnAf5+nqyiliC
45748eQKeD/XbItrVsSs/KvjcYMrIN+gHGx4fhPuaFg2i3X4AWYVl/lF4kr4
kc6X9tPdP6AtJ7mpo0YJOwp6to7Zr8L7FPfe/5zZjKtsXSOV3qyCU7RokL2E
Mg7YNcD/w3ENTgWL1xvUKWO7aPBSH10DQUD5jotOKtgyojvh4y4KOeylvd1K
QhVbdHfdyPOjkOfPWdveKlfFv5niA/5VFDLwLHfzdYYa3n2jraVkjkIO2Wn6
0Qga3l9d0aJvRJDDNlsXFHJpOFF/X/wMiyC7r6rlTufTsCDsQqFaMEG2pygx
2gpoeJ22Jv9ICEGWjUqV+j+m4SV7B98cNkHe9llx73lKw3rs9Fi7CILclsDj
JXJp2Lygg1WfQJC+XRHVG9ZouNTY4mZ6DkFWBjXumaHQcY6lo8rzXIIsoYLY
WSE61jtI61rKI8hsnaccvXV0LGf14crJRwQZHVgmM76ejm2DQqtkSwjSSTSj
86ACHStLOW1L4BCkQ2pa1mNFOlbrU1cgnxAkY0fKNWUlOl4tM1QS1BCkuXWS
xqwyHWcPBDrb1BHk7uQ77OwtdBx+7+hnaZIgtbZHnJLcSsftTsnhZo0EqV4X
uvu6Oh0vyobo+TURpNJI8LCtJh3/tGzd09NCkHK+rOr6bXScsP5oy7o2gpQU
ZsZs16Jjz871nfvbCVLs3jW3ezvoOF83ddzzGUEKaQYYEtp0PIUoiqkdBPkv
M+VmLA==
          "]]},
        Annotation[#, "Charting`Private`Tag$33553#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1A1MG2UYB/Br6eaWwlZhQFtoOWHisH4yzLZOvMOFubCRDNBMFyRAhiE1
mWiQmTLx7AQHJsMNicsGWc3QTUHCRBlTxy58RHRTRIcSYK58CQjlo6UFWsrs
8781aZpf/u/7PM/7Xq4P5b6RnidnGOaI/0u//g/78q5OrlVfWn9qtPeG3zau
roe8f8zSR+ZjUgbhuR1DZOHTo2NcZmV7aeCuYfjpY1Pkh3tfGYUdTbPkz1WV
42Trno8W4Pd3T5CZtdtO8rj2tSkym1LsRh4nnyaLRW3LyMsnYDY2w0tOVs7M
oH5ji4+cV9JhvyHNz/B+d6UJc5j30KCMb3xhWD5vnke/7w8HkJ8PGIKzLz+j
ILcXRS9g/0j/OnJ0lt6BfFX9ANny7XmYSVVsgJO1TtQPeGcj6lecgFljsJI8
krR9EW56KxD9nA7YunwlCPk20YX6t+5swn7uUTdy++pm1C/4DOY9X6vgncYl
5I/teRDzya7AQlU/LFdqlvG8VkqCsb60DRauGUKQm8+toN7BHyVXBXlwv0sZ
W3D+hAyYvfZsKDm3YQ5mHnfAFm2VFz53MgznubB5FZ41hCPv/EByVw8c7fbC
rClVjVyd78M8OfEa5Nqta5j3p7OSPzTDgum4FvO9qbqHevNhEZinb79k5XcR
958nLGrSInGfp67CfOR05P35pfWaZh3/98WCnIZERqT7PhmjJ8vacmFrTx+c
lNsOM++ZosjDK0/JyLYGDyyrLoPF8NgOrrLdlb/Dc4uj/done7l9w+YXYzv+
JIuX6wbIi62+fnJ28IkxcuHHqrtk29b1U1xdQeJAXdkwmWkuniUblfZR5LpL
C8iH7ONkYczhJB/+y/cv6rNNbtj4yyTWV3+zQjZ3c/9hnqPBq6jHrU2TWXW1
j6wttM8gF75geMq3tcyh/mC+jE9v1d85snce8ySclpNrq+/Cgq1GQfY5fliA
q86uQ35spwPnS3WuJ+tsP8OCInkDOdF3xol+IQc3wsd9MHsgVol6NysWkXsy
A9F/fBAWe4Ug8rtLggv1okY3wbv9/wuUxytU6J+hWsK88nr4+iP1sG2v//2g
eVLZZbimF65NKYPF7pZgzGN8YgV5Y14I+nf8A1vPd8K6LoMH87oPbSG/WijC
VktaKOwp96J/eDesM/8BZxuKwlAvPnsV+5viw+Fml2TTr5K/et2H/eM5auz/
3QZbt4/AtW8HrWHeCwMa9PvkDGz90qLFekPMPTI/qYnA/Zwuh5maZvi6q1Py
xIFI5LrbMHtpUvLVIVgMLdbxcZmVzxVEMjzeH4OeXGKqgFnvTTgr3QVbe16K
Iq+pk2RwVhyL9Qm/yfj/AVNldEA=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVj3k41YkagI9ftiN79vVHZaQhMdbR+T5dY2o6apJjDdkbkSWaJC4qyy3r
nKxDSshShrEde0KRxpKOJdxGliuK5KhjyXT/eJ/3z/d51dwDrL0ICoXi/5X/
e1HbuDg3IJZ2dEYzkTOgBwOfT10vZXoCcSI6K5n/LriVyhVFMENA3fhIGxFZ
Ao72cdSiyUhgXWx9NGRcAft2hBv6MK+B4tXmqjb+KtBw1DsbzkqAJ8GMs0nf
VIN65XxW8mQSjFNkUE2qFhIPlH9xYjJBxHyV0RvJAuFXcbKzGhlwyWk0aUKo
Ef4T66EbyMqC6IRXclHRTRA7oeB+bTIP4m2aq0+btkJrZ4e7LfMeCNfH+K4K
tENkjl5AzkQhdKvs91RNbwdaUH74a41ieNOwa7c2+RialK4wfVklMCAfFI/7
OqD+gn5X5ORDOM4KFHWV6YIR8QHmKWY1hNUJWv8Q0w31GwKKa8Y1UDf8wrts
rhsyZml3Midq4N68UO/NYz1g21T+YEKjDo5u1Mfzij2DIZ/4Lh8WC9qpU4au
sb3Q3wKfwydbwCNBteEp9oGn4bC2NbMDZL4J+3NBeBCCVVKJlHcdUD7QLUF8
NwjR/MeGn1t2AmfquXaX4yDksVuijnI7QUCnNM+1eBBGLha9QJcncCxmVGrn
oRdgVRcadkCzBxwNQs6XOQ2BobFUp3BTHwydPiLVcZ4N6uJz9EKhfnBICLF1
TmKDFq+FkYVRPxT02Z559oANxotbO2NS+uH1pelUzUX215+gmq3DA3BzIGyM
6z0MKacdBDlfu7wOa2KRjBHgzdV8+CboJSylteoly48Be9EuLzHnJfzo613O
pz8G983ikow6X8LG9ISSJ30M6OMz52/IsaFHNXptNHIMmIoFB/Rb2WDiYzL0
x9QY7MlWrowRHoHPyyfLzItegUWGZLVa8Rjw0UwFAlQm4GrqJst1/L8wGchp
D/nqBLpksyV1BppCo7TiGFNAuyxSp/HbW0hv+f5b/XvTcFTN5pxPyxKUVFUF
JGTOAslt+924fAUa7GV17BL/B26zi8v7/DhgyWLgYfu3QE+h3X22+Qnyj294
ty4ugE7f1dcDHesw4KiSL5f0Dhp73ofHO2/BrQpm6ytiCYSfnb+2f34bZgqi
pNwPLoOW7oeb8rY82PCAI9c8vwx7Rg/Fcm4T6LISQLinfIAsOm/XVT5ePMNd
d5iCFQg8zDCL9+RDi4yLgZlzK5ArY/L3dBk/qu77bdUt6iP8UJPe+1FUEDk3
InJuqa/CYb24WUdHKr61ijpDrVuFxrAPliGPhNDfj2UqxOBA+r9mJ3aoC+OQ
chYl8x0Huhb8CxZ8RdAuVkBvMmwNgl0CKq73iaJu+EGhdbFPwBrm4XwvKo4b
p8zqw7M/ga95qnZgpThGWI0VzpOfwSHFOSHCXQKzmNnT5yo/w4XjFzZrBSTx
QHMGXd+ICz0fOtO6GyQxf6PLSP8JF6zZzhYZvrvQPMdOsOXUOvBpgUiqqBS2
VZTZH2Kvw5q7M9ejTQpN297ssfTYAImdnZvu3tLYz5/9JXd2A5xXgxSVqTKY
GEbVM/LZhLl2J+c/WDIo3bU3oWFlE36nJNcGuMjirbUVggjdgqTd23qCEnJ4
0svf4RrxBcpq6rt66+RwKbA4RDzuC3Dj60LpTvJIyfNaTaBuw3Xzjz8WCitg
q3JcX3/GNpj9cumgVpUCrjKrGxtFKah70ZQW76WID2lXLtXaUZDRYe59R1oJ
d9neKBHIp2BhdFrhLEsJudelG7WnKai/hxTk81NGZkjS3vc6PLho8Cn6hKQK
6jRZTOeH8iA7fpcso0YFq2XEVWcaeXCrza9P31sVjwzKW9tQCdSsjjtxm4/E
8bW4LLY1gQ17/3wqJkAivVT6qZoNgfSMSfMoQRKNucES/gwCAy4bfOe2k8RB
seerO+wJrMU3crslSGSU22zrORNo8Zw2VaREYqC6v066D4Gus5yQh/okvvBg
Hgu6QuCyndp7FQMSvbq2FlojCIzppvskG5L4ZLLjvui/CSwqL3AINCFR3eD2
r+XRBC4Gn6TpAYmyJW/PzccSeHm7XKD2JxLfR6g0nE0lUDhoJEqDTmL6ho8G
K43AvKkd6+lWJGpHTVRQmQQ+6nRc/PVnEm9NRSmUpRMoeFNwwMSWRH+q3M9L
OQRmb+n/VGpHokGmbjHmEvhtgOtjBQcSqWaTiml5BJ6wrq3ZcCJxrkzbxeAO
ga8f/63j50ziZe78/ri7BAYbiNwfdyHR0DVQdrSAQN5iYzWrMyQuaP1F7i8k
MF3OM7vZjcTKCvEjEUUE/gO9YyAf
          "]]},
        Annotation[#, "Charting`Private`Tag$33701#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVz3s8lPkewPHx5DZyTwzCQ2WlpTLruvL76di2tlGbGkIo146SS7RJHFSG
U4SdXJeUkEvZWrdx+z4VU6TjkobEbCtxRJGMjCFnzx+f1/vvj6FvqEsAQaPR
Qv7u/06b2ZQVhCY57H1nkirqtYDexUOXK7j+iDiQkHtN9hYcr2CUxnIjkZHN
HoqIKwePIxx6qTAO8c7Cw36batiyJsYqiHsJ6V5seUDJPgBjD4sTMbwU9CSC
fSLtmxowuj+Ze02YhoZpmthQow5St1V99eRykZLjPLsrjgeKrzla48bZ6Jzn
q7QRhSb4d5Lf9jBeLkpIec2IT2iGpBEd30vCQpR8uKXmqB0AtLf5unJvI8WG
xOB5uUcQl28Rmj9Sgjr0t/obZD0Ch/CimDfGZeht47qNZuRjaN5wgRvMK0e9
2uHJeEsbNJxh8uOE99B+XpiyjyYfBlV7uYe4NSi6Xt7lh8QOaJDI6S7Y1KL6
gReBlRMdkD3ucDNnpBbdnlTourqvE1ybq+6OGNejvZKGZGmVZ9AflMwP4vHQ
I/qolU9SF/S0osUYYSvySzFofIq7wd9qwMyF24Y0v4n+Y0qxDyL0M4j0D22o
qrdDjfiuDxJk9w08392ORKPPzfgefVAoaI3fK25HcuYVhT5lfTB4tvQF9n6C
9iW+0li78wU410dFbzPpRB6WkacrPfvBykajXbG5G/Uf3aPRdloARqoTrBKF
HuSeEunqlSYAU2knayfrHlTc7Xrs2V0B2EyvrE1M70Fvzo1lmEwL/v4Jr13Z
1Yuu9kYPiQMHIP2ou7yorA9Juy+oxLEHQbrA5N7b8JdoJhMsrmkPgWDarTA1
/yX6MTiwSoY5BHfsOWnW7S+RZGxkgz9rCFjD705fYQhQp0HCwqu4IeDqFm9j
ggDZBtn2/z46BJvy9O4nKg6ixdmDlY6lr8EpW73GsGwIyTjYyYXqj8DFjGWe
z/CfSBgmehQ5/CeksNRbdtPfoeaoeFMOexQczivVG//6HmW1fv8t8/YY7DU8
fDKodQaVP3gQmpIzDqSY+s2mag41HtEyd0v9Lxwfn57dckqEdvPYeNeR98BK
d7j1bPkLKtovCYTpKTDvvvimt20J9XroFzHSPkBT58eYZK8VdL2aC6+JGVB8
dvrS1slV9K44XsN3xyyYbv90VdtVCjfeFTFaJmdh06udSaIbBPaeCyV80z9B
Lkuaf1FGGh8TL7mPojkI28W2T/aXwU7ZZ8NyJuagQNP2r7FKWWyw5df54/Gf
4YfarK7PyvJYdCU2/7rRPOyy4Ix7eNDxe+f4Y/T6eWiK/rQ78qECDjnFs1Ng
iyDrH+Mja4wUcb9eLi3ngwj4UyHFU8FK2C1JzkIYvQAR3qHVl7uV8faYHQpL
Kl+ANyAl+l5ZFUsO2TfE5H2BYMcMs7D7qjjWeahkklwE93SvlFhfNZzLzRs7
eX8Rzuw/s1wnp463tWSzmNZi6PzUntnRqI6LJHxr5hMxuAi8nLKD12HHfDf5
1kNLIGOKlDKUNTBVXXlkp2AJFny9xH6UBraj3m7a7ScBtbXty76B63GPbN7X
gnEJeM2H6+rRNXFqNN3COmgZJh55ev3O08Tr+ZtTGueW4TfatbpQby18fWGO
IKJWIG3jqoW8GgMfDAhxv0R8hcraBn5XPQPPhJVFqnK+gji5PorlqY1phQHz
KfRVuOz4+ccSRR0MepzunuxVsP/nuR2mD3TwPLemqUmZRm0/a+eQHKCL7zlc
OFfnRqPYbY6BN9dvwOtcr5TLFdGokoTMknHeBiy+vL7JbIxGMTeR8jKn9DA3
Mm3zR3MpatryS8IBdX1s3uw0VhQlRQmS12mxa/VxjaaqwbsmKWqFOtXNDDTA
e/q0XQ7TCcqkhnPghgyJhxc4uQIXgmrc/MdTFTkSsyrWPzU8TFCsbKFjvDyJ
bcQRaiFsggo9b/nd8bUk7lN5Pr/mCEHV4beMjWokZlcdXrXwIiin5w6jpRtI
HGYUYp4VRFA+46LIe0wSv/Dj7gu/QFCzboYf9S1JHMBfmYJYgkrsYAVdsyLx
E2HbHeV/EVRpVbF7mC2JjSxv/FKVQFDTEQcdLBCJtcrfn5xMIqjzq1VydT+R
+GOsfuOJDIJSDB+MN2aROEsSZMzLJKjC0TVLWc4kNosfqaZzCephu8f0Lz+T
+PpovE5lFkHJX5XvtXUlcQid8fNMPkHlrTB/qnAjsWXO9jJcQFDfhvo81nEn
Md1eqJtZSFAHXOpqJZ4knqg087a8SVBvHv9lfsqLxOfFk1s5twgqwlLpzrA3
ia18wrReFROUdJmNofMxEk+Z/ofcWkJQWQz/vJbjJL5frbontpSg/gfuq1af

          "]]},
        Annotation[#, "Charting`Private`Tag$33701#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1HtMU3cUB/ALCrR0oBSxGw930WAAh8pEi3t5k42xMlINMuokKD5AXRZM
FMQlDO4fMIPNlFEUpzLrIiaNWhUdjVLnJSMgatCgpPiKV6BpoSpYCwV5uJ5v
S0JOPjn3nN+P236J3bo7q8CfYZjtnl+qnh/x39C2NZ4a31N696anctqfH5AH
ilQ98IoVT8iVN6p7yfqH0j7y7JbhJ3DcgI3cVOwWyUKA/CXZWd7VR2arHCPk
TxcZrb75t+i3L7Chv3j9KOZfJ9lhY/o4ubatcgg+VPIO81ypgyz2rXqP+YLc
V+jHdDKcp2aNDMK8c7k/eVfhsREy81QzC9698A36Gx/MJktzOCf22YYCyJ2W
K3D+46ggsqp34Vv4WKaEnBCug5nR21I444IL3icGk6tdIaO4jyH8AzgzHeZ+
2RDiu4+3X18Riv3NcWM4P+flHLIheL8bz986MBf3k9lg0bwoDPO6jHG8vzNq
OZ5XJk7g/NcOOOGrSJi/dDoc5ycb3uG8xi/n4bzDLpizP4J3rV03if3HCyMw
P/APLNyOnU8e/OzvKez/5josPRI4jX0FPyrQjz8Ei0YrbIibP4Png059iH12
2Xu8P3PKR+i3qmB9UTecMPwTzN/fG4n93adhcTAiymPeZQhmBJrPvQynfL0S
5pdlRsM/qGA21eY1v87b/ytkAbl4yWFvX98Jp9Ss9iML/dkfo3+8xusKCYvz
Ell/zH+bDdfZt8Bs441W+r6Zw57dpyrM7eimGm39s5cqH5OKfEwl3ULVb0ro
p2pMy3pBlenZj3yoDzQhN2LZmlfw0hNW9NdeRD6KGBmeE7vcTqqh+8rssNyJ
fHTlmoeosskS5ENd/cxBlau9MwXvOYK93L1C5MOor4PZ+Bnkw/JbyYjvfv5k
xfkhmN+Wh3yYepPeYJ7TIR/KtgrY830IJGsUVbgX15aMfGjupSDH+uiNEl8f
Fo7WIB/u5Kswa+xAPkyR096+ez3yoZD3uTA/awfyYWHL8Xfqi2qRD0uQbIyc
f/km8qG8ehRmDp5CPkzKdjfun5GIfGga1HgvQnYrXP/d7zA3PI58KJ/HTGCf
qgH5MJ1NhxlzGvKg2NuI/zNs7HPY3R01Ca8qi/DdD+a7JMiDptgJ58v/gy2/
OvA58LoNyINp6RfTmJ8e87q6HBb665CP0g43zEywyINl+Y4Z7Mt7Cte3bMfn
mL+6GPnQNLfC4skw5GFJbCA+V36gCf7+k8+9PqhGHrRztsBcXEkM+VxaAyzk
aWFH2WJY334H+dBey/Iji9KdyIdscwXMmxjkQRvSDLOp6bDsD6sf9z9oc9n+

       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVyXk81PkDx3F3M0TO79goS2YokSJn9f6sctS2bUrYLTZCSiJUNMUviVql
a/385Cg6tnJFqJRrVhOlcUSUW4513+Poi93fH6/H84+XprvfHk8xERER33/7
v0POjfoFD8O2fLyo1WqwygC39+RV5jBcMMZUZ/m0JKJPSMICGb7I3Dg2q3rk
PramKlXa8E9iZMrrx+DFR1CoiGzcyziHiaGADdda0jE6fTbAkB0OhYCffMe0
nsIpOn/GhH8Rw8r7fOwyssHOWS25jXEVC8zjxqFHcsFPzbZ+4HAdlv2jK68+
zMOZY4JLuuybEDoEfh9Qm4+OxSXL1vFjYct/x90q8hJZHK7aJkYSQp0/hta0
vob7aJxrcWMyfOrZ5z14hZBx+bI7xeEu1hx+aXfwThGKOdO3tNmp+O/Qq6r6
VSXgFBgu1+M/QIp9rNTpzFJMtt/jmDEy4BqlpefgUwaB9YbykNEMbDvgWxj0
ugyPnpQcedWYCaOWmy0uS9/AoOC44x2HpxhpSfMvfvQGHRei47XYOZCR9NCX
qufDjvVGYzU/D/1OlWueiFeA2mK21oRRiPcNCeIqXZXg1l9JUossxJGyUOVY
rQ9oP9YhJypRBFrri+mNgx/wOOH3sfeLRWAGJUZKN31A8tnjTU+5JUjxIyoO
7wQw/FJy1yaQhwsCX50fdlTDIdZTL8CdD/HOGsWk8RpIdSzr8kjhwz/J06BJ
phYv1hYkOrXzUWASHS/UrsWKMjm5za5vofHHSNxbx1r0jD8fXfJrOZ5Zx822
v6hFyG7p/CT7d4jvYhQcOP0RyTJZpIIIoBOY32zbXgeRdh3l61wBUguKe25P
1sE9926vY74AFZdPpnxh1EPH5WZMl14Vnp3cIaW5vh7ODRbDYTLVePFM9VDV
f+rRqbtyU4KwGnMME5lW9U8Qvu9qqKmsxYW+JEuhXQNWKAYsQ8gnSFyZ9EgP
/oxBdWlv44wWnDUfP5++swUJlq+7XhZ1IvJnXZ1xbjt4E/ut1Dx6IGMRli7L
7MSfH73upzj1Q2Jk0LYu9is+BBhy88yG0RTGXFco0o0zu06EXRwYxXa14xYS
pAe+02F/8TrGUSRrsL3mUi86usVa7+ZPwtDHu6cv429MGXXnWIcLMe6n26rE
68PfKvPM+aAZ3NivOVjf2Y8Dmy+b7rOZg/FA1fOdvQPImtnRW7yFxpfddVOi
s4NIVTpmP6a/AIuDgR1T80NQCRK9+de3RXDYQUc5A8MwNvZa4zAjQhpMbMsO
9IxgRY3kNNUpSm7HR1g1e45CaFoicahNjOiu/no2sW0Ud3Y98VNsFCdT5i55
nx3GwLgksFYskSAmOlSPa8kY3KJlXRJeSRJzmT/cVhqN40x2ZFvQQylSMdXc
/ixxHB5R64qzrywh07x55R6xCWzWmWg7HckgOQqyaf7+E/jUN+oT48ck25a0
86PrJ/DbKaa5wTFpYrQ9sUHaahIvcuwPrfeQIXdkzdhxaZOoVaibifhxKXGb
ZXDtZKfQZHGiys1GlmST16URp6ZwP9JO4ZqhHLFqy3Rb3ziFLeE/P9WglpFT
2Vqz4aZCdN0zK09cIk/k2hM6riULwfxfz1ANV57Y7HywMnBBCM6YZu77WXnS
HECJmHtN497+uSxfPwXy0O+857K302AkH/21tFOBaHOV7JmcGXhaez/4/Jsi
0Tq81mHj1RloLYhxbtcpEptD1vbFQzNoUNOz1dirRASbTKpLHWcRpDBAOVYp
Ec9cvwK3olmcULVT37hVmRwN5cje15iDV8QGXmOJMgl/Kdz79fIcXokWJGmb
qJDgqGPBU0NzmHH8rKP1WIVI5fYaSNl/g75C5J4uNkUoYZp9ceE38Jqrcnbd
pojxrc6sS9o0YoUeEY6JFJE7f73BkUPDW35un2syRbZHhqizdWnIbtOe9U2l
SO7CpoVSPRrOacG4+oQiu1V3rprfQGMkRLPyfQFFNDpyREN+oKHOCuy2a6II
T88gPMr132/IeL67hSKrmsr9fzlIg7cj6ZJzG0WiB9JC9dxpHA59q+f9lSIb
o2Nmqjxp5HSrBUQNUCSzKNlruS8Nu9yyhTffKLL1U7lFHpeGmuCX6g/zFJm0
amZfPkdjuHc4pX6RIgExdutdwmjcUvvOulucRW5V+z+WvECjNdw3WmIpiygM
d33v/DuN7EQxl6VyLMKVvS+vf4VGRH6cgbI8i1xotdEUi6Gxpr+0ZpUyi2yK
OPcg/QaNeXGne3oUi0i6G38XfotG9YrBICNVFkkTV8l0iqWRanrexnI5i0Qu
Gnrox9E4aU+pblVnEcWJeEvxeBr/AFg6QKk=
          "]]},
        Annotation[#, "Charting`Private`Tag$33849#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVyXk81PkfwHG3QY5xfMdGWccMJVLkrD6fJUdt21LCbrERUkyEiqb4OUKr
dFg/P2cRbeWKUCnezGoit0zkJse673H0xe7vj9fj+cdL1c33uIcAHx8f89/+
75RTh07Zk9CDn26q9eqq60Ly8ZL6IoozmhNTpnn3pMIYD4cGUJgof9/cquL5
LLDIlKu34lxGM0uePwZtPgVqbVTHCcoNtDDlv/duTy7MLl/316OHI6r/T8w5
tRfgGFu6Ysi5iablT3rb5BUCvWiH8CHKHbQhdtEg5HwxcDILLbPt7yGz8dnt
d56UwDWfxhgt+gPEsw/43r+1FAY2RaV3cxKQNecjy4LvDRQwWEr7KWkoxOlT
SEvvO3CbTXSBjnTkzaWHubPLQcK50zbD/hHaee6NzZmHFQCM5XgNeib679Tb
Jq56JTDK9LZqc7JRhl2CyNX8Kljsf8wwpuQhl2g1bXvvami03FsTPJuHDp1m
lge+q4anzyvPv+3IR/o9D3qct7wH3bKLDg/tX6CZnhw/ePoeBiJik9ToRUhC
2F1HhMsBG9p7lR2cEjTuWL/zuWAtEAeNdxlSylFde4qgwlA9sLi305SiytH5
6hD5BLUG6PcZkOIXqkCkWqfR/TMN8Czl97m6zQokFpgaJd7VAOnXL3a9YFWi
DF+sYP+xEfQ6Kx9ZBbBRRCNT84cjzWCf4KHt78ZBgoMtsmnzLSAyID3knsFB
fmkeul0SrfB6V1mqYz8HlRnGJvE0WmFbtZTUAZcPSOWPmcQPDq0wMv9qVvTX
GvTSMnG1/3UrBNuKl6bZfURJQ5Sy01c/QbpEAa7FjUgzoLTbur8N+Po15e+x
GlFmGYwkL7aBW/GjUYfSRlR763JGJ4ULms4P4oa0m9DLy0dEVPdwwanddDpU
ohm9fql4tuk/XBjU2r4/hdeM1iiGEr3Kn4FXN9TeUt+KIsbSzHg27bBN1l8a
BX9GQrcX3XODvsCksriXQV4Pum4yH5Z7tAdSzN4NvakYRFE/a2nOs/qBvXDK
XMl9BEmYhuZKig3Cn588szIcx5HQzKR1W8JXaPDXY5UYT6OuULHd5XzDcO3Y
pdCbE7PosNJFUyE8Aszl0L/YA/OoQlL3cEvMKAwMC/Q+Kl1Eet5eI2N5f8OS
/nCRZTgPzftq9cqxx+BvhXWx9cAVdP+U6iR3cBxOH7hldNJqDRlMNL06OjoB
BStHRuEgiTpt25b4VychU87Hbk5nA5meCRhYWp8ChUD+B39920QMeuAFxsQ0
GBh47rRf4cPthtbVp0dmYFuL8DIxyI+TkyLNuz1mgWdUKXS2TwBr7fh6PbVv
Fh4ee+4r2yGIl0ycS77YzwElptFStlIIG2oSIy6Vc+AaK+mc8lYYm0j84bpd
fx6uFUb1BT4RwbVL3f0vU+fBPXo3FN4WxcvsdfkRgQU4oLnQdzWKgouokjl+
fgvweWzWO85XDB8S7efEchfgtytiJro+4lj/cGq7uPkivC6yO7vHXQI/lDSm
J+YsQiu1bSXyxy3YdZXCspFcgi7TS02uVpK4EL+riryyBFlRNtS7elLYvC/f
dU/HEhwM//mFCiGNrxSqrYYb8WDosXFNqqgMlupPGbibzgOx/41MtbBksNXR
7O0BGzxgzKkW163K4G5/gs/Ecxken1orYPpS8RPfMA/pD8tASb/wa9UgFWuw
5OzEGCvgYemV/eU3Wax2bpf9vjsroLYhwEhuk8VWZy3tYGoF2pW0rVVOyOHG
/YbNVQ6rEEidIBya5LBHsW+Za8UqXFK0Ud5nIY8vhDAks1TWwDNyL7ujUh6H
v+Gd+HprDd7yl6VpGCrgoGifoKWpNVhx+KKp9kwBixSP6orYfQMdatTxITqB
CV6OHZR/A3Z3U9GxZAIbxA8WxGiQkMBzj3RIJbBU2L12BwYJXjJrJ13SCXw4
KliZrkWC5CGNVWYmgYs39m9UaZPglBOE7jwnsK3iUfX1vSTMBKvW15URWGWg
iD/4BxKUaQHDNl0EZmvrhke7/Pv1KK9sewis3lXj98sZEthH0mKc+ggcO5ET
ou1GwrmQD9peXwm8LzZupcmDhKJhJf/oCQLnV6R7bmWSYFNcvfH+G4EtPteY
lrBIUGr8pblhncCL5t30WzdImB6dzuBuEtg/zmaPcygJ8UrfWQ4L0nB8s98z
4QgSesOZsUJbaJg6PfS90+8kFKYKOG+RomGWZJaMzm0SIksTdeVlaDii10pV
II6EneNVLeryNLw/8kZ27n0S1gUdH2sTNCzsZvBdeDwJzdsmA/UVaThHUCHf
MYGETKMwK7OtNBy1qeeuk0jCZTtC0UKZhmUXkswEk0j4B4mCdyk=
          "]]},
        Annotation[#, "Charting`Private`Tag$33849#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0n1MU2cUBvBLQQu0VQotLrBqB5JsQMbikGkz0jv8AOlQR8xkGR8d4DKc
Uza7hZUZGzeyGTEY8A+3ibmhGhgQTYxsxslWu5jFwYgZRaeA3hYY8lVKKS1t
oY7zXEga8stz3nPO+7YvlR8rPCRiGKZy5UP/V/5YedZt7aa6qT2Lp+/8vmLT
8d295KqPiqxk3qh4oG2wLtyoqOlH/pb+EdmjK/wX7lI+hYfuD5LVjqIxbZ7d
aLwhs5O59B3PYFmKg6zfWTVD1rATI2Tm4usuOm9IOTcAb8hzU54gl46j/+Hb
cODjvTB/6c0FeD5nAvWSLh/5cevFSTJ75oiffOvujimc330+iHkXkqbJlgu/
wj+0GZEzm18OIX+NcWLfM+8zLPX36mbhRk0Ye7k6W3U90oV+7+wRkbNvnob5
KTYcnvfD6qAugjx89dwczufa4WXbCMwf7lhDLvHtc8Oq1rXIj04LHp8Uw1tb
59HPfSeS3G0IwdzB/Cj035Ttwf6dL0aTT6R+Dev/2iLBPrnDsOWTTCnOP9Et
4H2aTTLcZ9QpOKxgHbl56zYv+pkb4eHPdYL3XVsP3z8LW9oqY7CfZhDmep7D
J+J3+vA+9V/K0a/0PKyP8stX3wdmz26Ixf03i4Tcdxle9vKLwv1T49DPZvDj
/o/64O6+8oCwX6EC+xcHYIuyFm7uTg+iXzsPd4vbYC5QrIRDqiXkmUw8+qvM
MJNYCg97umCLr1/INUeE+jTvL1q7UREf0XBPK7xXr/bT7OhaJW8jcwkZA5Rn
NUb0aIX6h5R3ZHBDyFuS7dqbG+tS/hy1Iy8Tj8KKqhG4t2QCrjeMwd9VzJB3
JRv+I/OSJhe5LvGNcTLzSrEb9RniZ2TLUJfgJ+kwE7J5yHerIifggm985EOn
pFOo/+I3P/oPJk8jF5cFyVeu8qjn7/0Bp8iiZ8imrI5lzL/yrhP1ByoYtrjB
umX0BRf23Z4ZRv5s4CvYdKlARM75cdK1+l7h5BZP9Ry8mBNBLu91w/qSIcHv
JboxP21sDdnRXim4M7AW599uF9wkjoS/f3UePvYUFtVwMKe3RWE+t9GD3Fwd
TU4K6mF1fq0E/Ys6BWsapZjvnIX1BcdlZGsodwHv1d8BO5ylMMs2rSOfetgK
q4+a12N+v0Nwz/4Y5H0qL85L52DRh/Uwt9ckx37Pf4b1NQHYqt7lw/mi7bGo
d5pgds4MJ7kf+IR90uLQ35WwiPvFXo9bvR/McdsUq+/px/eRdxJuyT8JM7ce
w0n5MQH0T/1JifkHV34HNP+D8HjsN/s3bFn6FnaUSZaQ/zMLlx8YD2r/BwbX
heY=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk81HkDB3BXboqa32gVHY7aRalpednZPt9WRc9DZNnYRpRKJblV0mW2
tIpNd9oIjXKmwqpclXFMiwkNIpakMYQY14z89nn+eL/eS3cHue1VUlBQCPyf
/+9nUPDmeeGp9XGsuNs5Batwtfp8ZSTljVuKDyS0dzIsTPS8bKhAqAWZ2ukd
48FhdOj+LWEEqh+1HU9yysJRN490JnUCtpv6H23emQf3Nu8GgWUMloXWhqjL
8hGooVf3u/AsVuxjhQ/dfIzkA0dq1Kh4nGc+Nc06VogOJ4afH+cSyqXRHzZW
F0HcO9T90vIyFlXNefFGqRgKjLSuM8JrqHVamMJ3fgbrCPV2mnEHarqhnot9
y7Bep8fL51MyHqaym2+6lIPX6H3Ih3MXL5qe9OovqsCjgzYDZZZpyA9Sf+Eu
r0BtkkR8QsjDsrSoQV7SS8hkrr1yRi4M/L0Cf47mQ6G6ND17NhcPTPKuFr/h
Q+3Kt347PuVh5dWv9iLTKsQxlEK8OfkwiqFywgRVuJ7bPlxi+RjmjI6WeNUa
5L1P+HxcWIjO5QMej90E6PpxXDzNKMVrB8Ox5/71iJQ3aBpeLUX+UGd3QmY9
tJ9mWbD1y8BS9rdqkdTDjuUbfFK3HEY5k7++DWjAf699PH6GWwFNW7f44bVC
ZFxwVVaNfglbe+e0n0zfwPuomf7cwCpk3OvK3tXbiBUt89ONc6rwXfzgGfls
I6TrFFmrB6qwRDdGErywCXFj7R7bDlTjR0dFwYhzE4oPJ966srcG7UUJW9wL
m7Bg78wSg50CNF1/xjY82YzX2xpXLXWpB2/GK/uO7C3YV9CtHFePb8pqNLTn
iZDTnHO5r7IeVVFjJvtMRUjYHjuebdeAt9YbojpdRMi0SvY2nC8E5SZ7+TFd
hEOsn5dnzApR05acE+3YglGU5j1/24iyCMO/dc+2gv4lkd/HFcGTw9/xsukd
Ui6l79z8/D02xJ7fMdzZibLUr9p3qnvwD5/paObbjTO8+6PFh/vwMZB3ukjl
Az7sDe832iPBbutbIdzMXqhbTFzTcBiC3bx8c9m3fdig+4PphbERbFvSEnD7
5CfU79E+XyQZxdrtRTYDHWKcFXYMhVZIoVzn1lrAkMCoPDb/y8UJqO5bNSNm
D0BVuzLq2ukppPiLU41DB7HwMO0ocJMhd8eS/oTfP+O41d/GJk4zuLCBTq16
OITykLBthD2LG6kK1V01w2B+vPgqco4CuZTNl4fvGUFkxYMeHwVFUlRnkOk5
OIIAs0puokSRVHpaWRTs/4LYH1ZkeoiVyHdmV/7R+fwFCy5Py6O6lUmQdtZN
0aFRfB8mEIprVUhzie3O7T2jOK3cu7KfP4ck1ZVsNvAdg4/RV5U1j1TJqdDN
fNPmMTyM4up03FAjY8vuLW3YKIX5Obckg8vqREbsgqWlUrAWLc28c1yDnNpk
YW1mNY4Du2zZhUc1yboOZ850xjjmiktmLEO0iDuqHaYWTeA/0wTDntpEMcK8
6nbcBHKf6qjau+uQsMSIlDWKk+CpvNvatV6X+Co+4ZUFTUI3cT6/w2QuuXeq
uNygYxIufQKf7+fOI5JzlWLBtinsqtVKTuPOI/F3X3Pay6egphJi1KqoR7Tq
D84m2UxjSlnU9eiIHjG6vfCz7P40Uu99sWEP6JEndItWIyVD55/WjX/s1ydi
Fl9z6g8Z9v0akhv7Xp+kZF1i6yvJERP0VuDImU8qoy1eaZ+S4xfTkZPPWucT
97U7JlzlckTc1QwXOi0gB0RWv7UGz2BF2Jbsh4IFJHR/VsmW0RmYap1fvpYw
iF9t+M2NgV/Rbn9ijf8TBql75yVliL/CpPk6d89qivAdHAMsg2dRvDKfocqj
SFkPy27l6Cw8njx9r3ufIqEphcXh0lmMsl/xmJkUUfftPlIxMQtLV9G6lbkU
OWv9vNhTPou0yBkPp0KKHN2v4nhRhUb8K8frl/kUyWvlPqUpGru9uynjPoro
u7CFBmwadJ+k01xMkcqY/vRD62n8GSzNWC2hyOaMgyUVhEYLV83mpyGKVKwN
LTmwiYZTluX2vRMUCQjgzJRtpWEzeexGtiqTKBDVpMhdNJpPc30K1JkkctWa
1/V+NEI1481LNZlka42Pvfk+GjmL7/5Vr8skenXOGm0HaSzbWNXyhWKS2BGv
YYTTKK9rSJEZMIlW9BFOUiQNzvY2f2VDJhlbU6A3fpTGjYODkwuMmeQc29Aj
+wQNlnS8fPFSJmmqjf+geppG4wk61mw5k7RMPny2O4ZGkJqG6ypTJhnQy3hX
9hsN7UR9A1tzJumJuGpvGEvjX6lDUI8=
          "]]},
        Annotation[#, "Charting`Private`Tag$33997#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk81HkfAHBXborMb7RKKUd2UZiWl53t+20Veh5SlsVGlBCSW3JEbLGK
jXRpIzTKTY5V4SMZx7TG5BaxJI0h9zmD3z7PH+/XW+2cn427iJCQkO///H83
5Yr3ryujDyfSEh8VVhyAtOaExlDCGT0Ufs4jnTNAR13B0YjwRRJ+GiYKVxhg
Pj/97CEnBDWX9UekW+ZDmI1dDpWIQsbHJsrMzhSDbb9zO0s3Fu0NbA2Q5JeC
r5RC2++c62i/By14+sELyPC63CJBJKEE6kuN/CuVMGhJcXNzuo1gMfLT0eYq
4I5NjzTopqKdTVvevBepBiFK9vA1zl3Uarkjk2n1CvRDJAdIymMkIR/osMu1
Dg7LjTq6fMlAJVn0rgfWAIwO54suTk/Qm87yMcWd9VDmbTRZp5uNSv0k39gK
6qE1nceN4jDQ3uzwKUZ6A/D5J8cElCKk7Ono+3MkE4Saa3MKNovQc/XitOr3
TJC4863b6S/FSDttw7RHowkSKSIBzk6lSDWWKAxiNcG9ooGZGt0XSIsy2Jsk
3gLFH5O/RnAq0dC+SbsXNiwY/nGJu0apRe/MVRZee7IhVNAurZJWi0qnh0aS
89gg+zJfh65Yh2iinnq9PDaY0Fz9r8oDUi1c+bXbpx3+e/dzxLW4eiRtbJM0
Y8iB3JsnRcUjG5CxqVX2TxrvwTlMU3GrbxPKfTpccHasA/b3bs/ZXdiEvkua
uibY7IDFQ8K0g5NNaI98LM9/RyckLgzYnfJqRj9aCLNmrTqh+lLKwzvuLWig
Kvm4bWUnKLmv71E+w0Kd917RVa52wbtTHQfUrNmIse5Y8JjfDfQ7aEQ0kY2+
qWuRkt3WA4VdhanjjWzUFL6g7qHRA8n28UsFJu2oW/9I+JB1D+TpZTirbOcg
wobf8DmnBy7Sft6Xu8lBLf0ZhZEWvTCPaotfd3eguhCVv+Wv9wH5SwpzPK4H
OTgxTzd0foDM2zlnzF5/REfiE07PDA1BXdaG7OPmUfQPk2qh6ToC1xjP5qsv
jaPPvoyYKrFP8Mk9eEL1PA+d038YEJc3BpI6y3elzKeRybZSLf6343BE/geN
mwuz6NSeXp9HV78A+7xsQhVvHhnaVxlNDnLhOmdwOrB+EYm22fRVUHigCvGl
c7eWkbjHgXUufRLEZRvD78asokxPbtbuwCnYcYm0YNnwUdHpPRPJv3+FCL2/
d6tbrqObR8isppJpgICgU5i+ie5nCTUPt8wA9fOtt6FbhPDtAqYg+PwshNY/
H3UREsZVbcp5DlOz4KPZGJfCE8aNDno6FRfmIP6H/Xl2XBH8neadf+S+zoFS
6pogfEQU+8nmP+i5OA/fB7E43FYx3FVjfMZ+dB5iRMe0J5hbcHpbjZmy6wK4
qG6IGZSJ4+hAM6ZG1wKUhMfJDd6XwAt7n6q1H10ErRs26cqpkpiPTfwXaxeB
tlMt73GEFI4+pqOvqbcEXmeN6ZVh0vjQoJXTWu4SbOXWrOsGyGBb1Gy+unMZ
/rOG0YyDLBYO0Wp6lLgMRS/lxE1t5XBQSkimgfAKMMQ+nBg+LI9dhcsZdX4r
IJ+ynTmovhU/ja4G5cEVsB5nuXy/dRvm3Wjksk6twtlWmYzsuG046ck7pwFY
BQmxANU+YQUsw/beTDdag1XRnuGyywpY9dGOr/xna5D1dM6IPqmAy8lemQ6C
D0N/6nf8cUERc2lM6dU/+ODxa0BR/EdFnJl/m64oIoBYv26WhdN23Bip81Y2
WgC/aMxefdW3Hdsanl4+KRBAyBPpYI6lEvbq0futz38d9gcdLyhhKeHAC/k1
x+fXQUMmYZ8hpmC31uAHR303YMA0ysCznILbPjguUrgboN51L+78QQIzzS18
dP03oVq7lCLOIHDdKM1Ee34T7MpffpR/RuDAzMrq4MVNmKe/ZVDzCCzpOnK5
fnkTdE/2HNIuIvB1/dfVDoJNyA5dt7OsJHDYBTGLW2IkJL21uJfKJHBxX9xL
kiDhnPMIsXucwIrWdI4ynQRynDekxSVwY+xEzsXDJPzpv5h7kEdgs1zvmnpM
Qm+chNFP0wSuNwys8TpGgmW+rr37MoF9fJzW606QYLRy5X6BOBULYfH00LMk
dMXEuVRIUnHoAYN3bDcSAqWTtGqlqfhEi4uplgcJhbue/MWWp2KFNiupfm8S
9h5t6p0jqDh+1nEGBZMAbe2ZfGUqlom87JQeSoKTfb+nqAoVLxhUKCyFkXDf
e2pFaTcV36Cr2BVEkUBbXIJdalTc2Zr0STyGhI4oMl5zHxX3rpS8OhdLgp+E
1MkDGlQ8qZD7oe43EmRTFJWNtah4NCTNVCWehH8B2ouHDw==
          "]]},
        Annotation[#, "Charting`Private`Tag$33997#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0QtMU2cUB/ArtLS8Wl7SsLiuaFJhyyKmzOhY17uFh0pqNuYSiroxhros
I6tu09iMURJqHTDRGlw69qgKOKdzyTYTSrLQuK1jPjImgsGqtCiwAlbskwul
zPO/NGma3/2f75zvnubWfFixO45hmNonX/p98nEnn7BreuSm82K9s48eHHBf
0+xsu2yKrxog2ywvDpG7DOYhMtsvuksWtozehi1XPcj9lrvk6rTKcc3FMs/Y
gXVusiNl3wTZf/w67P5F95D8c3r2A3hfs498o7MPdsiUfvL+j9sn4bb1QeR9
u7zo3yMP4/wx4xRcWxQhWy6unSYbvz49h/qX+2HFp+/Mw2xgBv0KrFH0l+X5
YJF6iVxhNj/CeeWrDHvrjN67rWAW98t6egXZGjrH+/WNcfA17WN4mo0n6969
B1fvWC8gb/p9ux/9bmUIyXbBJZhJfiEBPlsWWL4P7/caYWPVoIjMla8N4v4u
Tox5Rf/Atr2qRPJIOBxc3k8SvOZcCPdpzUsm5/ybEUa9anUK3FnN25qTCk+Z
wvz+kySw6lc+z5VIMc+3NYL5rUlpuM99wRz+7/Ofwfa4ZtjYLElHLsvm8P7l
R+BNDVW864QZyGu/gm36enjkdOY85q/ugHPeKoIVu3WZyCdSFzCvcxS2/tQE
O75Zl4X5iV5YMdAEc86iKOpfi8LW++2w4suGlajvWrWI+duYbOQ1TAz9fJ/D
ugspS7hvo0CG+5T0w7YWV49ms8ewvTjrLw3lf8auaDr16qfKJ26QjZdDN8kG
/Y4RMhs46oJbOBdcUjamqeiRP//9H24yo20aJ19P8HnQr+BZLxwcGUPee3uG
XLf10AOyo65wFnZFxuHIG37yj1s6JtH/UGUA/evV/6Gf4pUQcuEpL9ntbQ+T
U88enELeu4UjaxtPzKDfrvIF5CXDD+GTx6I4P9jr02C/xTHyF+IfHuG88AzD
5u9sUxouzSLvUq8gT9TEYFaliiM74/c8xn44aTy59GiQ9/svCXBedM9PtpVs
EKJ+VB3A/MHnEtDvO2uA36dERD7M+ODqU8O8Rdog6nWfiHH+5hHYdrUhEf2H
Inw+NJyE+c98FEJ+cFUyeQ9r4S2dhw8XLsHuhfxU5Gv+DsOVMgn6vymPoL6j
WEruzvsAdkRFaciNXTDrMcDd9imYmUxJR3/t/jnUy01w9/QAzMjEGcvvz2E/
mxvg0txvYYV5GFYeX4TdYxsycb514zz/Pndgp/MK772qLOzvTuEC5gXq4VJp
M2+ReiXyfHsU+6wzwcq3ZYtwIsf7QgfvWVM2OeG3mhj6m4Uy7MfDxTT/A8zo
hzA=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVknk41fkCh09kkuzn59yJrBE52Zq6stTna2nCRFdKrmiyXNUwESoTSioG
2eaIVLLeZGuxZLvVGVu2U+IaUlzmCImTff1hun98nvd5/32fj6q77+F/CTEY
jJ+/7v9cK8jYNPkheN8D9TJ99aNsvM+Z01CI/ydOaH+n3KhzB3diKR9+3Bl0
tGp4jIdnwWMwOWsLOwDCq4J++cIHWLy6Nf5V3C9Qj1z2Z+vmI0H5SbD/1BV0
q5yu8t9fBM4JpVJJ9jXEFMyF+4k+wXY6P6MyLgr5T20Dcq8VY8ZmkhXPvYkZ
w3rOwewScFMNYz2n4nH21oyKe0kpChT+/M8GNgc1PgcuhxU9g1nl2bziuFQY
v3w46KxfhQf9iZ5pmnchm5bbMLBaBXHRMuVfufdQU9QS7PuqGt2Oy7dcp9IR
fuFdWYTVcxguWZitZ2eDHdXVFSTGBS+lTedxXB48iopEeBE1CGO7x6gfz4fB
ty65QW012PlyeiRVswAvZ2S/E9tci9tDrJzr3EI0Ccs/ksqtheduV3nnqcdQ
CFNZbSmvQ+inwGtC7BLUeRt+ti9pADNynV9RXCVuC0t3OBs14/Wx/sCrK5V4
8sWYp+vfjGitl78c9anCqNxsQEx+M4SaQ66tWFejWkvCc3RzCybEF5JtRZ5j
pWKxJ2q6Baes5/vm9nLh6Z4U6pTEg+WbcZGU0lqExYxY/nSwDVmGrqLrxmoR
0K+o5+XRBkZGq5j31jqwL4o2mF9qQ7VfgRR+q4O2WctKem4bdsqe2TzsW4+D
2g9n5xlvoXp0cIch+xVsl7Qcrjx6i9WeHoeuzGbIy5zPujjfDvYtltmtzmZk
UZWCtY0dcDp0WNdhYwuUvZ+0X9jSgeLaJtE3fi2oVDTUNjDrgFdhxfMGtOKE
nsbJ3qgO8EKTNZ/18uAXnPOTybf/hZ10XmjzzTY4vxJTUNfuhFKJp31eYwcW
/nFbKXp7F8oFQkfHlHvwWEPIhZffA+NWhqt7WD9m68K+t9nYh0379ptKPOMj
e/lvnf7+/RAMGbWG6w9jf+Svf6gNDOC1mLlY9Z1RpJQ6ehUb8JH5g9SsQfM4
WpvsS9udB1Hr9n2jUfoE6LvbbozFfoRe4amxRZMpjLzJqivPGIJ86W+n7rZN
w3pakJmWM4zYLjmTrMhZ6EV0vr9YNoJLUcueVqrziBjafS6z8BO+OBoNO/Qu
wEGjnXX96Sj4A2FckriEn5OK684WfIb9svZEqyYNxnO3ysL4MVjp6wS96F/5
2vHiufvh4yifTnQ8FLKGstB3LiluAjidyW1QS2OQlEeXQ9IOfQGnPDpWMmgd
CTS18GUpTGCTbfqataUQeeqt/9b3xgQOTPxPsUJVmNxLsOvLnp8At8d++PyE
MGksqE897TaJhWwrF/Xq9aSjbnBHQOMkZi95h4qkiBCpfR+YhYZT0E19af13
z2/IZmumKit9CjvqUZNqvoHI3Uwt/yw5jU9vLIfGt4gSOVvDUxkh0+CrBpcl
joiSiOuc3vX8aWRe7dU/Xb+RmLldCbE5PIN7WueOxXHESGBWi3Zk1QwcH0Vt
/7frJvLClRWwU3UWnWavcwV7xEmnT5LFocRZJGyxfBspIkH0qeLh6qVZSIsM
PXDgS5AKr1hX+bNz4O2q1PQtliRV9QFtG97PwdpC5khwqBRR222aqXJgHvWP
bVi9O6TJcOnx05Iv5nHNTcMphyNNbHZ1yHfrLkBdnjWxXliGyFW7jVgVfHXz
pl5XPxnSKOBwVzQXUSshl3niDxliXxke2nd/EZb9F6oWLGVJohbLn6+2BA/H
c3nGhbKk/eEhL+/MJfxpoisIlGGSCjM3wUeVZVhorYuyusIk4qbsw1cfL8O8
wmex9iOTdDdHXWIZ0fDT+syJHWaS3U4KoZEmNO7fPqN77BOTsOvX+hf20lgK
8vIYHWOSrvZw3gdzGsVGJ3nSM0wy/XvNvryDNFSrHTJdhSgioyhedOTk1x+9
MLaeV6LIeGSi3HwkDV3dSj5XhSJPk+yyAqNpuNw3vBytRpHm0xnJUzdpVFze
VaK4jSJS+u3PviTS8IWuoqUORZ5Zbn0vuEujj6s6mWBCkWR+xADjCQ1xg4wY
570UsbDXYtwopmGcqbRNHRQx+bEgamMZjeSrCsfLzSmi3aDTx6yiYWcuV99r
TRGN65IcnToaIcWcH3N/oMi9vgeSZQ008tVkl/xsKeLc3z5n2kTjG2EpvfX2
FHHZ87uE3WsauwJim3iHKbInbtK0q42GO3+TZ8oRilREJ7472UEjwSF69aQj
RY5e7uaPdtJ4Xiuaqu1EEfrdyvHz3TT+Ai47Sdo=
          "]]},
        Annotation[#, "Charting`Private`Tag$34145#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVx3k8lfkewPGTZbJv53HuRNaInGxN3ZOlfj9LEyZcREY0tisNE6EyoSzF
INsckUrWIVtkX66+Z2zZTolrSHGZIyRO9vXBzP3j83q/Pkrufrb/5qFQKD/9
3f/dK8kWXvwQcrpApUZHxZ4O7/PXVGWTvkeXNL5R6NR8BI8SCF9O4hU00Kvq
MR+ZCx6TabkH6YGId5c7LlNaAJsRh5JeJf6MVGK2A+haxZCsUBESsHQHDSt6
NwacKQPmJflqMXoUii9Zi/QXqIAjZHF2Q2IsKn5hGVgYVQkrFou0JNZ9tMJo
Z57LqwJWBiPBcykJXX2wouheVQ0lsn/+Zz+diVp8z94OL6sFo4arRZWJGUgf
nk066TRCwXiKZ6baYySVWdgxsdsIIgI1Cr+wnqCWsp4Qv1dNMOyw/cBlKQtF
3nhXE23WDIwtEyM+eh6ixw4NBQuxgJ3ep1meWIQ8ysr42dEtEE53j1e5WIx0
v3YuDO5rgWOwPJOhVoJgReoboQOt8HCKln+XVYq6eGWeixe2gucJFxmnpXIk
G66421PXBmGfgqJ46FWozYfx2aaqA6gx+/zLEhvQQ16JASe9bnh9YTwoYqcB
VXzRZ2sFdEOcOvxs79uIZqVXA+OLu4GnOzRqx7wJNamLes4e6IEFkY00S/5m
tFO/ORK73AOXzdfH1k6xkKd7aphjKhtM38zzp1e3ovD4GdMfz/VBLsNFYN9c
Kwocl9P28ugDSnavkM+hNkS/KdBhfKsPmvxLxNGvbUjDqGcnq7APjkldOTDt
147OaTxbXae8BSX7yaMM+itkuaVud+f5W9gdGbEbyulGMpLXc2+u9wP9Ac3o
wWA3yiUauHuCA+BobatlJ9iDFHwq+m8cHIDK1i6BN/49qEGOoaFrNABepfXN
HagXXdJWdR2NHQB2WJpa7Sgb+Yfk/2jw9X/BSqIorPt+H3J6JSSrojEI8lWe
NkWdA2jjXw/l444MQR2Xx35OYQSVq/I4s4tHQL+X4uIePo5W28K/tRAcA+HT
ZwxFazkob/sfgwEB48Cd0uuN1JlGZ2J++UN5YgJeCxkLNT2aRenVDl6VuhzI
+U58Vbd7HvV22VT3O01Cq9u3nXpZC4h8fPjeXMJH0C69PLdpsIRm3uS21WVP
gUz1r5cf9y0j82VuTmb+NCQMSRvkxqwi7ejB9zdrZuBW7LanmdI6ip46cS2n
9BN8cdCbthvdQHaq/bS7L2aBMxHOwilb6KfUyrarJZ/BZltjoVeNRJRmt4bS
pDkw09EMfjm+gxytb157GjkPdcspDtahe6gm7J1zuhsXHK8UdihnUnD689uh
mdZfgFkXlyAWvA8HGZr40WQXQNgya8/clAe/8NF563dvAc4u/E+uXokXP0m2
GstbXwDWiM309QVe3FnSnuHttggbeWbOKk18eKBt8mhg5yKs3vIJ40/nx+Kn
P1BLGUuglQHm//T8Ch8wpyrRspbgaDtqyTDej6XvZ9R9FluGT29Mp+YPCmBp
S8bl7NBl4CiF1KTMCODou8xRPs4y5ESM6ni3C2IjtzuhFrYr8ET92oVEphAO
yu3RiGlcAYfnsUd+cxHGL11ogceUVmHQ6HUh96QIHvRNNbFOWYXkg6ZvY/hF
sQ5ROd20tQoS/FMFdhxRXO+V4CJzdQ3YxxvU/CrFcGN7YN/+92tgbiJ5PiRM
HCufMMxRPLsO7eUWtNGjEni6+qK32Mt1iHJTdcxnSmCL4wMyw1oboCJDW+Dj
lcTSTW4zZiV/v3HXqIu/JO7kMlk7apvQKiqdc+kPSWzTEBk29nQTTMdvNG6Y
SuEUdVoAR3kLPByuFemXSuH+Z9ZePjlb8KeBFjdIkorrjdy4HxW3wUR9X6zZ
HSoWMaTbRpRvg3G972brRyoe7o69RdMjwV/9MzNhmopPOMqGxRiQ8PThFa0L
n6iY3r43vnGKhK1gL4/ZOSoe6o9kfzAmoVLPlS2xQsXLv7ecLjpHglKTXY4L
D4El5UTKzruSQHmpb74uT+D5mBTp9RgStLQaOCxFAr9ItcoNiiPB+Snjdpwy
gbu9s9OW7pNQf/t4ldxhAovr9Nd+SSHBD2nJmWoSuNb00HvuYxLGWEqLyQYE
TuNET1AqSBDRzY53OkVgExt1yr1KEvRz5A+rIAIb/FASK1hDQlqE7MU6YwJr
dGiOURtJsDKWbh81J7DqXTGmZhsJoZXMHwq/I/CTsQKxmg4SipWltvwtCew0
3r9m2EXCV7zi2nw2BHY++buo1WsSjgcmdLFtCXwycdFwqI8Ed46wZ/p5AtfH
pbxzHSAh2S5u19WBwPa3hzmzgyQ0twpkaDgSmHy3c/H6MAl/AV+DgFo=
          "]]},
        Annotation[#, "Charting`Private`Tag$34145#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0w1ME2cYB/CjQIXyZfmIODeDjBkYyci2bHMy0otbdMMhHyMwaMWiNIGE
sTk1M0KWywZE2dwk08DiTDpxqWOKOrdJVEIhrGNapGZh4FqwtRVaWlvb0lJa
Gtfnfza5NL88n+97uU17P65QCBiGaYg89B/5KU8qBiUDO0yj4zWjwxEbj6Rr
YFZxh6z8PHRLMt33ycjlLh1Z/U/+FLnbMTNFZhqzjeQrOpkB+RP9JrK46edZ
ctYJpYVc3nP+PplNFNgkjvLBdwdvmMhyZ60D7px6gPqtUS6ydeIPM5m78JUb
rnvtIfbb0OZF/rrKefTvsC+RGz8QL2A/9gs/4gYzbCzZGyAfvf2s7ek+cOOR
bTAjyA+Sc1/cvoj8rvAqeTy03YF472yYHLfpJqzWap9gH8XJR9i/V8uw1E9X
5kR8uDmKnDsxAxsFxwSsP1d2kF3/GOe/2BRNthz8HuZU1THknAvZbvS7ugjH
aA7AbJopljxWV+BBfLdMCN/ugLOEUWvgST2sfOYSbBn2wOzZ3+LQT97mRf7b
P8QjX+j38ud5X0Ruv166hHiSPAH7ZEf7sF/9K4nkc/ZqmLmzPon8jm0INu4X
JcOCl/2Y71LBDU2HYHmFKgX1fWuW4aqitZivb4G5hHNwg2gWZmzXYMubebDx
weti9C8wB+DS43C7U76C+t8zUhEfKAmi/mYHPOaegZXKAB//uiyE86XsTMN9
fHoCVjv/5n3aASu5zenIt1t5D41ck1QMbixKLtZIKD82dYw8VBWvfWqdJE/2
bcvq3F0Jf1/3YG/lv2Rjt2yOPPCXa4bMPl9sJidHTxqQX/7eQ/JLh+/OkbOa
D1sl6QM71u3WGcnyfrmD/MavjBnzCne5yJ91l1nQv/5HN3nakDkv4b9nL7mn
7dUF5Ld6ltAvIdOK/spjfvJy/jjMPbclgPqNVvTjur6Bq90aG5nZWROEy/Ys
on42ZxX5GXV25Of0hDGvuMQBx/z5BPMWXI+Q7xlhWNq/RehC/ND+KPjyFKxe
PCBgRdN9odjWx8hvq48mt6bdgrnN22LIhdOJbuyTHYZbd22FuY7/Ysk3VGo+
vqIUkvXCGt5OO3za0evB/bv3xaE+WOXFfYlfiMf8j87wvvghrLdegSPfq4gs
De9ZwrwvCxIQV7hh9fUtieh/VOvD+1rNTMI+tW/58X6KVuDQpWaYnZxPxvxf
VDC34XgK6jN8vO9Fvg+q/+nUMvLvl8KFI2dhedUQLP0uNYD5pjwx4jndMKc/
D0t7GldQ356Uivmda4O439FOWJq7AKtrfHBhf20I91W5Lw32XYXlBg0sbTbB
6jMF6bB6LCT5HwHHjVY=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXs41PkCB2AMKUnDj+wJK2NqHZrakNjj+HzXpjxbpNqepkcrSVYX7enC
rmkdOimFCKXoYtyKmIQuruW4jJohY5RLCu1EaozGfUw/0zn7x/u8NkG/btuv
o6WlFfZ/f82g5+SC0JMeDWypWb6dAzZcy/42nL0L+Rfn9tgzMvFjg9ceD/YB
HBCs8BMH5+D33VaUTe8xsJz5XKe4W9jcdWWaxY6ET9vf+UmMO1i2zeQVOywa
/l95JD03E4AXIgygev+D6Vwls/R1CXzeEk8z9nnoFxYFn91fhodfa5zSvRPR
fqG4befpcizbXb3cPCwZ/zrao1uech88eWasYW8q7PvNqzPPPYRviFmoETsD
K5921tbpVYGhNzng+zAT6/iRjippFSpypbuSva9jReVTN5JZDZu3yZuYYVmY
9q9yH/qqFmrOGfMFvTmYb+WSIhx4gucFX9QG7EJEKo8UlYTWw051ZJ2DohBc
zcsRWWk9Tm/sO77p4R38kFE2+GW2Hq5DNSMJ3sWoKlBvt45rQLYtr88wrATe
1VqGrPRGfLdFHajfW4a+QbtPx5KEMBKdWL+AXYltw+1LxEYiLF8U0mWUUonW
K1tDf9gogrvfzoOmmkrMXDhl7xUtwsFOt4vW3VWwfTMWr1SI0PynpndtYg2Y
sjKfNUIxYj6fOx40+QS+yfRAYHArItN9238OasBQ3MJn2o4S6Lo2Zw5cbYCJ
15Sk21uCiz0I3tfWAEsjbuXFPRIUWK6ZCXVvhL/pwpX5iRJ05lBWJ5Y0Ia9t
SBY2KIFjSXdovEiImtcPfuxPaYe8OUjrkaMIi9Wut591S3G1xUv/xn4R+Jzu
3c5yKda32xmdvirCWIZ584U5Ka6/GrXYohHhXVtxzCJWBzYreOvePxNjqbHB
U6+DHbhrknbEfG8rSsunP9TNdKDi7t7R6o0SvAh42DGl/xInZ1N2W0Z0IIPd
ZL9GtwuKfQyLj2U9YHkWeCijXyHaMy417h8DYPT1n+T0vAFTz2m0dZ8Mbke5
v33LHcBYTtGnJ21D6E4g1qWNb+FdtDKowuEjWLO/q9dTMhQObi9656PAXOPj
Pwu/ewfBnK1P3y4ldpg7h2kODSLeZmz1u09j6P3yMt01agg5PM9NiqgJ8J2V
9rej3yPoe55bC2cKYuvJxs9Jw/jGRo9qqptGroP/7qexH3DpSMSTtHAVVgSJ
hR7nPsJ97FDefpYaIxPxyZIYOYYT75/YWvYZ8r1z6s59I3BPl5lTwXOgi0JK
Y3YocLli/61RlQYlHUvFW5xGsYn9niHZqUXsBrO2WSz7hOGzb/zsV2uTm2bj
qY91lJgfEZVmrNImZzriVyUdVoK+dvGJrF2HXOXwbqzuU+KYr89bzxsMckJY
XBa2cQxnLTZn5QbrEtfxy4bTgjGEWT/e8Mldj7DlGr9cy3F0lfTImufNI4oH
LZ6Jp8dh9lvowYS384gNKevsHB+Hkut2wa9Cn+Tdc0xlBE7At7k8PydmPrE6
D98PTROIPpx9u3/XApK5SMnKd56E003XrEK2AeHyrx0IvD6J2I/GTuFyA/Is
4lVBgs4UCsMC7jk0LCQOayOLLY5NYWvUT7a/JhqSbGMXvk7vFFobaqNvhCwi
dwv0R1p8piFOl7RzHY2IY2sgVlZNIyR2eZ2Z2oiYfW16+MHyGbwsUFyplS4m
f3THZGpfn4GsuMQx0pdJHHn2jFWGKgiXsYwW1DCJ4qw5LY9TQZX94FHGN8Zk
RW2h23vGLA59sHqtTDAmvMfr1jN5s/BuQXitypj8M1snmszNIiTc5bxfgAmp
T8qfGOep0eHge+jdf03IKf3qFwmzatyJsq5XcChiyTEbt4z7jPrLTWm1qRTh
vrnEyFlMo3ZJb0X0JYpkqf5YZGRCo+KK8s336RQ5wMyO4JnSuJthYSfMoAhL
yv3lp7/RyLxxtOY5nyKcdEGzoS2N4/lWg/13KaLRRAqSXWiwH4S76IgpMhd3
bk//zzSsXRL8G1soEpLTKNgZSGPpI37M2ecU6YrfvFcSRINZKRYZSCliPzN/
tv4XGnSNzR6qhyLlnVXK4qM0XjS2xrHfU6TJJp1z6QyNNi9Z8dAwRejIgGGT
czREQlV7wUeKGP47b2FqPI26p7aWnFGKaOvxElOSaRS3RN5bO0WRos+6UZcz
aNz2SX45M02RVZLjp8yv08h5nqeuVFHEdIeuMuMmjauStvUeNEX2lQUY8nNp
pG0dPKCloUiaKrXK9haNJKk6qf4LReSi2o7bBTTitzPvx2qbkh0CU+7KIhpn
Xizv2cAwJZWerRtLBTT+B3IoZAo=
          "]]},
        Annotation[#, "Charting`Private`Tag$34293#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXs41OkeAHAMKTHhR/aEFUbruNSGxB7H+64lni1SbU/TwyK3pdKeLuya
1qGTEHItIXIPMYTIta/j3riNkVtyW9eMYdzH9DOds398no+m+6/nvSTExMT8
/u+vKeQul+lz17KZxlHO09WHU8+yvvWnXUZ5cbuuepRU+LHZxtWS5ot8mUcc
Oz2z4XdndUJz9BbSMsmkG4e/gDNDT7e0aIHIvvfvmTGUl3D4vOIHml8wcvrK
MqZHmQkM7zYXYvQ/aCuHL1/2sRTsp7CVMu0hki4s8gzzKoeqr0XGSXbRqO9R
ce+l+xVw2LlOR8UvFv3r5ohkRfxrYHBTQ2VHE5DehEpdakQVOHgr+1BpKcig
Y7ChUaoWKFIbkw5VqehkZqCRgFML1Tmcy7F2aehITYc5Tq0DzanY0/J+GWjL
qdZi7qsGEBo+UNk3mo32qpvGt00C9BR8EcrQClEg/0ZRqU8T6ApunNTnFSK6
aGBpuqwJ7tuO3z5d9RL9kFI++2WnCczm6pei7IpRbYHwgkZ4M2RpM8Zl/UqR
XZ2YrFZSC3x3VugmPVqOxmd1V27FtAGVdcd6H60GnV/oO9hJZYGOnPcQNb4G
dT895/ODLQssHC9dVRLVoO1H9/RsgllwddA8TmO4FmmPrUbyeSxo/1M0eiK6
HslPl9sfb+uEkM8Rt903ADnEkpNunt0QmOTQ97N7M5oL3/9O3IgNkmbtqZPJ
zUjRZpM9bMeGuBHk6dHbjNSo9Jo4VzYUqB3f9rFoQU5K+w3yotkwmE2o3znY
inJ756b9ZtlgVDrsE8lqQ/UfK3+ciO8Dbru72BsjFjogNMt/N8yB5C4b6XQv
Fso0HHY24XLAuk+Xej+ZhVZTVNof7XIg7cOy6lkRC830FofIafXDGR7j5Py7
TnRIQabD5mo/lCgm3lC50o3KKrY+NW73Q3XJleU6WzZ671LVvyk9AHd34p3V
AvpRCq1V77jkEPA8KKqL5SNIy6rAkh/8AYKtwhPC/zGJKOMTdw1HxkBeyni5
22Mamd+k//YtfRJWs4tWoHcODUdhjbKWKbArMnCv1l9EWju/C62JaSicvVA0
Y89Duy1v/yz8bgaYu9r245f56KKKiZ/o2ixEaq4em1lZRaNfBpLMguYgm2F1
mhe0jjJN+Hr5wfPg/j3DvMtwE3VqbLR8jlmAbzSliNbGLZSj7+TcEfoJHt8I
gER/ATri3tlmGbEIFqvXcr20hGhpPTKWHcKFhejXd86Vf0bcK7vCQY8lsEia
ViE8dxFZ5F0WcpEHT6q9XiwLRKi0/1DnWeNlOE2bp7AviWHd2YzzqodXYCFs
zFHvmDh+rryW8FaCD3sDghIVBOL4QX/k0ZjrfCCfxcF0nwRONmSkHxvnwy0H
+ymrdAq+01Zc7me7CmGqZzJyPCWx2doT2S3mKvhpvD21YiGFaVyRY47aGgyV
jky379mDeZVdVtH310D5N5+rUVN7sCYuHxxcWwM+3fyRY7U0zn1llEBxWweH
9oq87JC9WP0hcvjUug7B17PyJy7vw6lyfK08kw0wfm6WUUiTwfTMZ75uaRsQ
uqhg7M+Vwe8CPhRESWxCoZ/LK/3m/Vj/RGCx6q1NOBf0k/av0bI4S8E0U2J0
E7qbG4LTveVwSYH0Upf9FnQmsfvoRlRs1O2GDGq3wDtUp1FZSMXKXytdr9TZ
hoEC3tMGzgH8x3BIqnjaNkwXlxoFOshjI4Ye5aisANoOa1H31ctjXpgKyQ0X
gCCr8k3KNwr4SEOh+TxlB659Uv/Ij1LAjLcnreUZO2DXhfwbBAr4n1kSwXh3
B7z9TR86uijippi89TWGEPr1Ha7N/FcR35Ouex+1I4SXQRpNPEMCqxkqr6mF
f4amJ62JDQkEpo89pmQfIKHh4Gh18GMCZwj+kKMqklD9lD/2fRKBfeWzAhhK
JJSkqOq2pRBYi0P/5ae/kZCafrO+J5PAhknMdlltEm7nqc9OlBBYJApkxpqS
QKv0N5XoJPBueITrxM8kaJhGObV0Edg7u4V5yY2EQ28yQ8J6CDwUeeYK250E
+ZpOlgyHwHrbe3eafiGBrNd0JUYIXDFYyy++ScL7lu5w2jyBWzWTDB8/IKHX
Zrp4boHAZKDLgmIECaw2QV/BIoFl/527PyGShMYObTXDZQKLSzGi42NJKO4K
fHVik8BFnyWDnqSQkG8fO7C9ReCj7Nv3VNJIyO7JFdYICKx0UZKf8pyEZHav
tSVJYI9yF9nMHBISz836iokInChIqNV+QUIMRxjT9IXAXFZDf34BCZEX5F+H
iivhi0wlukERCQ/e64ycoijhGqtu2zImCf8Do3Caig==
          "]]},
        Annotation[#, "Charting`Private`Tag$34293#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1A1Qk3UcB/BHBNyGkzFezjK50RmO0l4QjstuPc+ddSK+HeSR7IIWKEfr
xS4vTbzsIaNup3KGRqgJ8wpzSTC8wGmmSyhvFZVwsDXT8TZg7gU22YAtz/b7
Pu1ut/vc7/v7/3/P/57/Msp3Fe2MYRhmR/RLv9GPwuJsZz2FprWVwevXoh5K
OGZhQ8pX4sr1N8ncmjX95Be1mwbJ5oajVljqsJH5urE78KaW28if5kfY/Slt
H20RDcHpaePkC6u3D5P148td5Hp70Qj8+FI3OXBIPkpWrHtkitx3q3kM/mZy
mlw00O7Eej0dAbJc0jwO5+lmUNd+PIF5tqaHsJ6tYRI2Ds8ibzO5kH/YPEd+
11Bwl8xsLAljHttKN7xC+S/m3bXSg/62rvvo9w7A+hMnHqDeet2L+S6cZrio
sz8848P5pNcuIAfOGqdQ126O4VSSl/ep86bR7++DXed5mEnoXEi2WJ2w4tOG
WLLYssGP9ZxsHKztgHl3YTxZ9+bGAJ5HtGoR6pkXYTMXIyJniWT3yBr7Kdj1
WxGsf0clhuO7YaYmVYJ8T+oM9q/wweL3KmHmsj0B83VOwvwNw2I456Ug8qEv
pP/PDzONpUvIhsfyQ9jv6z/grL2fwXz+tUTUTX7Y3KyWob9NN4v6chOsO580
B7esSiK/XvETzO1rhC1VO+ax3xM3YF19E6yoy5WjfrIgjLrMABvKR2GFV5qM
9dR5Ebzv1ho4K+Og4L9bYZdOMO5HStv6gZLKn1k6T89T3eTct1N6yUMr4m+y
EutX9mcm+lnhStnI6thfbGSu97k75HAyd4us12wbQf7AG7eRH3jfST5pqnPA
ztdcbK278Mi3jcNkRcF+N/ylfQTr8Rd98D8HxrB/bI6fLP014iTzTb0BsvcT
xzj2S6yeQV7+wwTMZ4aQN01Mks0lwVny6oNzLlZ4n+fR3119F24qC6M/xwQz
L4QjyF9RuVHfbb1P3py4zoP1j+98QH6rPN+LeVpaGY7q0qVT8LIjC7ju4Lni
9qencZ4+dQx58NG9MJ/y5ELyns4OmFnWBIf6XIKv1MYiX5Ttx3l07Y6Df6+C
9fVr48lpDyUGMN9RxSL0/3VVcIUPTisV32OF/xMR5ikrhjXncsWw7TDMW+US
5MWZMziv1Ajc9X0/zCUPJ8DrPwhif51xMbnhcwc8tD16P2i9Dc+GkP+zcgnm
3VYK80ovvEd1VqiXXU6EpzNm0X91iwz5USOsCV4SnK2ZwzxBZRKe71X5PPY/
dErw4R5Yoe2Fi7+LC6PueF6OefOOw3x1CxwyegSrJMnIpyojyP9YA4cqquAh
1SV4UFYRYf8D8rOHcA==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXlczPkDB+Aio6a2aL5TISrSMaJ2o1J4f7ai3SW7HShl2SxWolCx3cdE
Kk0SKRWJJF2DdJgtZkOjoVtuO2pRU9N0H1/p99s/ntdj4OPvumeGgoLCwf/7
b7dsK/N3w2HrKmzCHD2dOAjib4r6wNuO2SlvhTuXZUDZLeV8Ac8XnwKvhFmK
c1FoFD5aKj2KIisnibP4GpqX3MpN5IWg6OlhvmDZDYSlHM2/nRGFVTr1ulGG
RdDQUA/Llcbipe8S1ra2ElipORiH8xJwEHtrPoj5ECW8/eIrOY2Ty1IL/SW3
UKK0Zn9RRgqU/wxOZny6DfvY5+sypWdROsJnXHpajj+iVHuCeJlg9RxaL15e
hVu1L9r8bLJQtLZnvddwFeiv12p3S7IxFh0xy6y8Go/XXX5SkHEZuXH05n3G
Amz/y/byeWkean1jCsxe1CC62n/jEV4hBBUdua8aH8Bo+/P7fbtvYpc0y6RE
S4gnE2us9tsUgf1GN/iItxDUaqbBLkkx/nBu5XzpEqLNy5XOzyhD4QOyy0L6
N/a96m1Kk97GhKOJqm7rQyR3GIQF8KqxMDg2/0crEdKUCuTZM+5BzaDfQeon
Qua3K/Y0BN1Dflei4fw8EfITbTcbeQswerruJUf9Cf6Cm/4bkxrIG75bs+v9
E4y62X9YIrkPAy576ZwAMQwFR0/wQuowX+Hl5PWtjbjecpcY3alD/IC+04uY
RnC6JyYFfXXQkiW5i0saYaEV5d+z6yG0GjxEijObYBeQ5LHe6RGsf2rldHk0
wdXwGodm1aOX4aR8e7oJ0UnPn+0tbsCLZbpyqV0Lsho8eWadDbi9L9lV4NyC
u8y3Pw/qiNFrFDoWurMFvfGdTeFcMZKoBJEopgVb4+QtaV5PIeRKr1ytbwEn
gtkhVGlEcP1Bk3CXVnRbX/LXsGxGs79FT51HG86Yth47wGvDeRWFAmfH5/i+
3Dndx+g1rPtfeV298hIUk77BMZKgSsiSB71/A8W/XfyosC4El7nGHsh5j1N7
MBU67zMcHr12iDCXgHjfZc/Ml2JR/b1a0ZEPOPzGPDVkRAZ1l0u1pimd0Fty
WWa9YQAWVtaurIouCLNMH3GGBtEWbenWW/Mvwu8f+604fRg2h9ptDlV+xCzP
uV2ynaPYXbpOY0vNJ/xkVXShQGUc+s6psvibn7EjPnWlQccEmhyPjby51o14
7to00ywavtzrkznnehDwsHtpof0U7L1CLRMDpFgaKsnpVpuGvcXcm3GevRDb
9l39xVuBRKvrlDqb98HviIZM1VGR1GZnbznGkkFnmjWPZzyDjIWEG/rJZVi8
Yt6OZ/QMsnb5unNWgn6c1a6j+iQzSUKfvU7URjl88vz/fVypRIqnlNpFZXKs
5U6l+ybOIveZKREBrAFE6n1b0+vPICV3rpR3hQ9Af8eeKc762USc+c3+F/8M
wHgLyn4wUya/F27d0LJxELZXaMcVGirEPFCkWX1nEEVnKgcbP6iQrsu+Lhe1
hhBnt4ByqWeS/oGyBfKoIQhORmxOzlEl+sbWeTFdQ5g2qfM9G6BGqiSM9KQN
w7jBLZ085v4NecqevyGFPwx+zMU8HVN1ol6z9YuR1gj07Zbfv6ChQUZXFR9Z
wR1B37nakbaPGoT4hX5V6h1B5+LME73ec4hUw7hEyW0USh7Gm35tnEO2PLac
+0PdKNzfrVy0wnYuWbC4/HGe+Rg6vmcX9hXPJbGVVWxG/hj+afxodEZPk+w9
ofngvO44dEptylJPaZLrDDvjxNPj4B7YMRT7RZO8rXzv/Yk5Ab0/Zzi07mOR
9D1G28ZjJkD4F2IZzSzCYgSqv6InkPZIMcLUgSJ67WpqkzGT0F4u5RYWU0SR
cg5cM4sGN7GaOlFKkU5Fr+HE2TQGu09d/Y1PkeaUrc9eq9AQ55vU6ZRTJLq5
PiVMnUaM/t6ZJwUUSVWKdBdq05CxJNG7GyjSuKn4668cGo8mn0fodlPEY1Bf
793PNFZ65quP91DEeoy9arUrjdyKoJzWXoq4MO8VprnTCAukahLkFHkb11a+
yZPGdzKXqfExipyUcX954EMjWyIObWewicJRK6EgiAaTZKnyldkkWVncvfA4
jeM5By4mMdmEIZ4fGBlCw9WLec9BnU22jd7gO0TSUG53muSz2cRENN3eFE8j
2FI74bQ2m1SMP9NZlUij88zHefvnsUnI4Y+1Gadp1GyOW62/kE1c5BV2v6fS
MCt2F9GL2GSJTsecJ2k0MlQNPTv02aRRrLzRIp0Gw3fo863FbBL+ObLnfAaN
wHrh8WRDNmny8e+fukjjf74uS0w=
          "]]},
        Annotation[#, "Charting`Private`Tag$34441#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk81OkfAHBKE8MS8x1RCpFjEnYVojzPouxuadeRiDZbqzYpKkfrPkbJ
NZKIkKMkuSbJNeujWZXJlPuoqJ3YimGM+/gmv9/+8X69NY/7OnqtkpCQOPt/
/+2UY2r0bibUqsY81NbNjgEB7AORH1hH0NqUQe6xbZkg7ZSSXszyRp/8C0JN
+PlQohM2VyG8iEpN7QT2/LvQofUwP4EVjEpfnmdztt2H0JSLRVWZkWinSota
pHYpKCjIh+YLY9Brby3a4e5yMJWz0Q1jxaOz6GTjBz4bePGDX7wFSejKttQS
X8FDKJfafbo0MwVJ/xmYTPlUBdYxvVZZwuuoYpZNuf2yGv6IlB0NYGUh2ui5
vfztdfAQ+rt9zLNR6Z7Rve4zdUB+vQsnBDloPip8jUF1PTy3yntRnJmH8mPJ
g6d0OXDkL4u8dGEhAu/oYoP+Roiq991/gVWCODV9+W/anoDOkd6m8RMPkKcw
W69cmQsvFnebnjYvRfQBtcALHlwgdlE1PQVl6A/7LsaXYS50uzuSRZmVqOQJ
9jQW/g2n3oy1pwmr0KKtnqxa11NI7tMM9WPVo02BMUU/mvIgTapYnLOqAclp
TtgIfXiQ9a2hV2tAAyoaTtDeUMiDogSLgzoeHDSX1PyaIf8C/kJOGgN6jUjc
+t1uz/cvYM7J+oOWoAlpMulb1/nxQZtz8TIruBltkHi9dM+lDe51PsY6j5pR
3KSGXX90GzBGFpc4481IWZTozC9vA2PlSN9Rz6dIudWVJ7m6HSz9El332j1D
Zj91MYZd28FR+y6DpLWgMYqddNVKO0Ql9r46WdaK+repiYWWnZDd6sYyGGpF
VaeSHTn2nfCYOvjzlAofjemEzIcc64SxuKH2MCYfJRLxPF50J7jEijvT3F8i
LlNYcKelExjh1D6uTBsKbDmrF+bQBSNmt30VTDpQh6/xaLNrN1zT7wo6w+pG
6TISxfa2vfB9tX3GcZ23yGzijfudgtdAUMn7DB0BquPSxAHvB0DybwcfInQY
BVY6xpzJfQ9XvdByiOpnZPPsrU24kQCwx2P66iIh2tzSALwLH+D8gFFq8KwI
yTvcBv2UIVDXyhOZ7ZtExqZmjrSaYeBm6z9jTE+h7igTp7HGfyGsKei3sowZ
ZH6ux/xc7UdY46Y4LDo2h05UWCkcavwEP5mW3iyWWUAa9qmiuAef4Whc6g7N
vkXUbhs0O3B3BOKYe9L0s0nkzby3lHtjFPyejmwtsV5G1u4hJgl+QtgaIsgd
kVtB1saKD2LdxoBvMX7nFw8JHCWvUmFvNA4+FxREsraSGHJyDgXRRKCyQlNl
6a7C88Fh2j5iEWwxVD36ilyF92y3umHKmYDr65uJccFqHD9urRK5XwzHC33/
fV4rhcuWpXp4lWLYw1zO8E5Yg5uoKeF+tEmIUP+2ccyXgssfFVQPh02CxlGv
ZcbetZif9c3p/n8mQfcQqvzBQBr/XuKyr3P/FFgUkLaGCjLYyJ+nVP9oCkqv
1U61fZDBw3neDreUpyHWciPh0ELFE5OVG8WR08C5En4wOVcWa+iaFUYPT8OK
XrP3dT85XCegZCTum4H7zIqlIOdv8Ev6hn0p7BlgR98qVNGXx/KNLl90lGdB
w3J7000FBTy3s+yCIXMWxm/AbPdHBYx9Qr5Kjc3C0Jasy2Me67BQQbdcymkO
pFx1D/zatg4fem6i+EPzHDi/27HZ0EIRb9xS/bzQaB76vqeXjJcp4pjaOjql
aB7+afuoc01dCZ+8rPQkXW0BVCrMK1OvKuF7FEvdhKQFYJ45Oh3zRQkP1r73
+ERdBPU/V9l0naLhDC+dwwvRi4DZN2MoHTRMo/jLvyEXIe2ZZLi+DYHVe+Tk
lqKXYP12IbOkjMCShL3/7jUkMBPqicsVBB6SdJ9JWEvC1MjVO7+xCdyR4vLq
rQwJ/CK9ZpVqAkd1tKSEypMQrXFy9RUOgVOlIpy560kQ0QRRJ1oJ3Hag7Ouv
DBKeLfWGq40Q2HVKQ/3dzyTscCuSXxglsNk8fecuRxLyawJyu8YI7EBtKElz
JiHUn2iMFxN4MLa7+oAbCd+JHJYX5gl8RcT85clxEnIE/JAeCh1LXDTlcgJI
oOJsWbY0HSdL80c2XSLhUu6ZW4lUOqbwN/hHBJPg6E5tsJGn48Nz99k2ESRI
99gtsel0rMdb6WmPIyHQZH180no6rll4pbIzgYShax9VT6vScfD5j5CZRELj
wdhdGpvo2EFcY/l7KgkGZc48cjMda6n0rXuRRkKmrLZbnwYdt/Gl9xtnkEDx
nv78cAsdh32OGE3PJMG/hXspWZuO24/7TizfIuF/73aBzA==
          "]]},
        Annotation[#, "Charting`Private`Tag$34441#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJw11H1ME3cYB/ATFXnRAbo2joR4qItSYOgURadwkslUtjhrK8RpvBIxE1An
L46RdJwaYnxJQAX2h1YK26ID3cBsRCTYThwORFTeSoNA0VGBFstLy1thyPO9
2KR58unze7lf777nH3dCHu/CMMzh2S/V2Q+nEcojZmtYRfVDHf3w0lBLTjpQ
/JzMfT31nGyVlzWR+fQMI7k+R9ZGFia8OshfqjqNmH993X8Yf2ekA/09O9+Q
NyTvNpG1Pzr7yaN3NN1kVlU9QJb6p73C+Jsxg+gf/fk1Wa+xDZFP7Q/owfX8
+e8IuTXhtBnXEzjqwPjeRb3ol4SPkcu9/frQZ7eNY3xzg+g1sklyfmpfP9b/
5PgU9veVWsmmkMpp9HMrYb6wdQb7Z5UO4PrOhjAc9eVWmH+7fw5Z+kuoDedp
/8GFHDgQNgg3+84lJ9ZmwpwsYB7ZYrGI/dJkOLBmwRDWDy6cT/Z8WAbrFX+7
kksce4fx/32hWkC+OJ0Ds9On3MjRm7pgpukpbLk5BHMr6tzJT1zWj2D+gf89
sN/mKpgvKPHEenZXO+YvVy/EfHsabFL5L8L4pXpYL5d+gPHCHgfmR4Z74Xqz
pKNYP6gatoR9J1qb7o1+iNsYrjerBI7mwmGTYZsPzhfjGBPv3wM4WqEex/yq
OYthtVG0RxScaNg6gf0zjXBg0AzMpsQsgbcnT8J3NXC07hasjwz+EH2zEWaq
D8MXbY2wdosVTpTOE+cnpd+n+9/rWd9AVb9xvI5q6hafVqqc+fcXVJuDfjJQ
Nf1zrJmqvSmzDePVfiaquQfXdFIVMn59RVVRWtNFlS/TmanW1TgwTojKRT5k
N9xeY/0477dUEyQbkCvm2D4b+imnYf6bMuRj15lLPdhvlZcd6+VvRu7YkA64
OKcCfp+PXZUveuHkCThBMQWzETXIR3HKYB/O4/wN+ShOumyhqt1ejnwk8NlW
+Noj5KO/8wJyzHnEIB8eBWaYafoK+ZBFPcM5TLczXOD1lTiHMN0D9xfaYP6z
LuRFqZPjPcCnrkQeWrJdcU7m2yLR+fEwe6kO+ZBcdxvG+OxI5OOvybUw930w
8uCo+ANm/ZchD2msFO+R2ecHVmqUsL67D/kIbW+ABcMV5COvNgD/o7bjKvIh
cT8E84fOIR8tix/DQuxq5CPUxxPvJUH1KfKQF6uGtcoCWHKkHuYenUQe8m4U
jYrPRw+cpliF+8K7b0Ie8mbiYebz+7BkeSNs8nsj9p1eeM9xuq3IQ8u9ONFV
jbDkox0T2F8Wizw4wnxxn1n7bTi06DzM8R/j+VfeGxF99ATccnmtE/sHD4v9
7t3OiHcKD/Es
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjWk41AkcgMd/rUkhIswf46hNB6qlzdHT70cPSoqlVK4kInLEhlHJuLLY
2kw1U45yjFJbGSNHElEbEiGhyZk743EfDdr2w/u8H94Pr6Z7gJ0nQaFQ/H7w
vw1t3+garYnazUpkEt2F+uAyK23yD8sNjCh5elU9mVB/O0UxnhUI7lJ3PMf5
D8DfOG+1cUcYVKVqPdzsmAdUP3fxEFYkLA+Wzjf05MPH56MUm+IY6EqjNvmq
PoUcqdAl7Y54sDAzP2KjUQTrPpqLzrD+hpO6FdscCp7ByuUERjs3Gca2MItU
7Z/D5C/v58yLrwP6HER/QRlUnnOcpndwYMhEzI/lWAG8hKIQb9ZdyFcY9Q/t
rYRs+qen6akZoDqrM2cTWgWc/MXpD9xMyLpjk9lGfQWRn0yDTYuzIYZhJzqm
9hpsN9cFkB33oeaYFTNR8w3MewQanGLlQWxz7DazwlqYfCx2SEyZB1tN0gdc
NN7C6HxycGoqD240hVN7499Cd9LT/CZuPgxnZ5WfPlwH1QXftkFxAYyUPpjX
7HwHHPFYXeWOYhglGmadnN+DapO1vCerArrCgrjG/U1wxCbc2UJQAb/u5qor
yTRDct09rva6lyAx9hOm/dYM1DeE4Uj+SwjO4bU8jmuGydJi54CmSjDtk45R
W/cB3nDX5zDkXsNDabZzxsEWCGIsGl65WgMtaoxmN0YrPJrdFBXQWgMCYUL1
8dutMBR85K2tei0oJr2z3V7aCi7++S7yT2rB3kRS3GaxFfae9I7i1L8FHvl6
b/yFNlA78OFtpnQ9OPD1OiLOtYOHrMMTgXkjXPdVkdp8QAAGhwbTfLwawWYP
VbXESwDinLCkhfhGoDmwuvWiBJCtnnJaqe5Hr7DObSgUQJ9e9zp7uybwYk8J
hPTP4HnAh1Pr2gwDuu49LSOf4VRCBLMktAU8Gbn+A0Gd4C1+z56d2w5Ht7yI
Xs7pBhn2/jbORDdcmCpLqtjwBV5tlUvL8OqHnGMyl2MS+6HRXzsj+NowiNWm
b3a5Nggl2xNNmApjQC4NXDl3cxjKLNVpYDoB7L9+odEDvkLNPk0DLbspeL31
7GeejBCqpK3IrKszoKrSJfB6NgZD61Xurrg3B2LLFn1FKuPAkFT40M9fgBeW
xqHqDeMw/0S/2U0oAqnfArs4CROQlSs6W0FZhj93DH6/pT8Jab/OCF01KOhD
3clQ7p8E9VBKOM1EDDfFZU/tvDIFO/u7Dv9rRiBdycpCoD0NFgV2SpVuP6Fh
8Pj7i7XTMPLPrY15vuJ4fvCh7KDrDMRK/KEuTPoZP4n2Fp1cnIGPFu7C/vsS
2C1jHzDPmoWyvPWrGnlUDDS+LjFGn4OU8+EyqxpXoBCsXHT5c7A6MPvEzg5J
vHnJXCPRZB6M9vcmqvetxASd6rrI8nlwvMxPcRCTQifFMP1R6wWQFR4VXVol
jS7LpecCGxagjH8N57fIoOc7bneE0zfQONHprGO5GkWl7zMqv3wD6dRLHrna
smjUabJr+IQIfi4+Jt1XKIuFvsns9mERVA+pdbJ3ySGdbT221nsRBqTO3M4t
l8NdW8etnb4swqWe6JreA2twXM8vs8x7Cb7UxmrcaFqDXyNM8xb7lqDK4/cR
f3d5NIur0M/wXQY/eernl0PyOHH0vHz48DIEPbUoCTqjgIfu0Klant9himor
uV+kgI+GJiSrvn4HCNjDTI1ci9RpSdGKHRSUuEw5s1ZOEcOfjdImGRTcmGxp
NpquiNHRd5b0X1BwbX4Y7lqnhAtMnjB+mYIXo4J5/HwlHFayo2ubi2Ge11Gr
bENlPCq9o00yXgx345v6yVJlzJ4wv3G/Vgz31nx/7W1FQ2GZK/eAAoFqXlr9
Rxpo+PdowgWmI4EyJcNhuY003K6x/s8XTgRSVvGkRM00jGLzC0XOBPY+BoP0
Nhoq2VLPhRwnMGfWObqvh4YRFyoj/TwI3BbH1jw7TcN/e/gDJ/wJ3MOVck2g
kXiqxDvSI4pAg7nmCYEKiWsKvT5wowncsC8lVpdOovYhcevBGAJXCDc9eq9F
4n6+f47PZQLrDCwXFXVI1Of8sTI4iUCHV8zbWbtJ1OG0ZCbcJNBScZ/eDJJo
w9I0qWcTaOgtW2mxh8RUo6B5uVsEqkjdGR62JHHjhou9t1II7LZ/brjt9x//
rrKQh3cJbORG1zHtSVTS5xuNZxBYOWfl1nyYRPonT60dWQRmp7RfDnEk8Wqk
m2c5l8Abwrsq1c4kHrRvLRe/R2AceD+hHSexWv00Wt0nMOza1j2+J0hkBOsO
Xs0l8PSX2Y/PT5JoNmJS0PKAwP8A5VQu7A==
          "]]},
        Annotation[#, "Charting`Private`Tag$34589#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjXk41HkcgMdvbZNCRJjBuNp0OVraSE/fbzwoEUtJQoiIHLHF6HLkWGxt
phrlyjFKbYWRI+nzi6wzt9DkzJ3xuI8GbfvH+7x/vH+8Kq5+1u4EhULx+cH/
1rOq0tDfHH6QFRdG9BXqgOOCmME/LGekT8nVrOjPgIaHSTIxLH/kKprmPsV9
Cr77czft7w5GFcmqz3ba5wLVx1X4MisUrY2ULjX258PHNxMUy+KbqDeF2uKt
8AqyRYNW1btjkImh8UlL5SJQ+2gsuMD6G53VILVtC17DhrVYZhcnAU3uCitS
sHkDM780LRoX30XY6xj25ZVB+SX7OUZ3Iho1EPJh2ZOQF1t02ZP1COVLT/gG
DZRDFuPTq9TkdKSwsHvRMqgCEvNX5to4GSgzzTKjk/oeQj8dCjxUnIVuMq0F
pxQrwWpnvR+9+wmqOWUWFqdSBUtu/rrnWLkosjVS27CwFmZeCB0XkstDWgap
w47KdTCxlBCYnJyH7rWEUAdi6qAv/lV+CycfjWVlwvkT9VBd8E0bFReg8dKn
Syo9HyBROFJDrrsYTRCNC6cdmkChxVzKnUWi3uAAzv6hFjhpGeJgwiPRrwc5
SrLirZBQ/5ijrvYOrZv8Caf81grUKkJvPP8dCszOa38R1QozpcUOfi3l6NCg
2E1FtTao4mzNZkpWomdibIf0Y+0QwFzRu3W7BrUrMludmR3wfGFHuF9HDeLx
Y6vPPOyA0cCTdVZKtUgm/oPVntIOcPTNd5R6WYtsDESELVc64PBZz/DEhjqU
R688HHO1ExQt2uoyxBqQLVez+/qlLnCTsH3JM25Gd73lRXda8ED3+EiKl0cz
sjSiKpR48EA4MTh+OaYZ0WxZfZrhPMhSSjovW/+jk+Y5jYU8GNTsU7OxbkEe
7Fken/EZ3C28EmudWtGwhmt/+/hnOBd7PawkqB25M3N8hwN6wFP4sQ07pwvZ
7XobsZbdB+Lso52J033o6mxZPLntC7zXkkxJ9xhC2afEo2/GDUGzr3p64J0x
JFSbutPxzgiU7IkzCJOeRPTV4VuX7o9BmakSDR2aRuy/fqEx/L5CzREVXVXr
WVSpdfFznjgfKsTM6Jm355GCfC/P4/UkjG6Vf7T+8SISWjMZLJKfAqaIdNsQ
dxm9Nd0fpNQ4BUsvdVqd+QIk+pt/b2LsNGTmCC6SlDX0596R7w90ZiDl13m+
kzIFe1H3MeWGZkApiBJCMxDCO6KyZvfdmoV9Q70n/jUkMEPWzISnPgcmBday
5c4/Yb3AqaZrtXMw/s+D7bnewvjKyDOJEad5iFz3hxI//mf8SXC46OzKPHw0
ceUPPVmH+8Rt/JZYC1CWu3Vjcx4V+++/u26SsQhJV0LENzavx3xk5qjBXYRN
/lku+7pF8P0bxspxBkugf3QgTmlwA47dXV0fCktgH81NshUSxadlgnUmzJdB
gm8nuLFRDDuulV7yb1yGMu4dvLRLHLt/4PRdP/0NlF16HHabbsKC0qb08i/f
QCz5hluOugTW7zE4MOYigJ+LT4kNFkrgQu8EdteYAKpHFXvYByQxg20+ucVz
BYZFLzzMAUl8QGvK/PSXFbjRH1EzYLEZT2n6ZJR5rsKX2kjley2b8dfrh3JX
Blehwu33cV9XKWwYReqke6+BjxT187tRKTxtd0UqZGwNAl6ZlARckMbH0xhU
VffvMEu1EjkqkMbPR6dFKr5+B+RnFJYcugVT50QE6/dSyHXRlAtbJGVwyOsJ
2gyTQm5PMDWcSJXBERFpqzpvKeSW/GB8QE0WL4fl8WPWKOS18MA8br4sHpO1
ZqgbC5G5HnZmWXpy2E5sb6dIjBB5EFc1zJTK4axp43tPaoXIwzXfKz3NaJhf
5sSxkCZIRQ/VoZONNPz3ROzVMHuCFC8ZC85ppuE9ylv/fHuaICkb80QFrTQc
zuYWChwIcuAF0k3tpGFZK+qly2cIMnvBIWKwn4avXy0P9XEjSO0otsrFORr+
t5877OJLkEYcUadYGh2fK/EMdQsnSN3F1mmePB1vLvRo40QQ5LYjSZEaDDpW
Py5sPnKTINfzdzxvUqXjo1zfbK9ogqzXNV2R2U3HOol/bAiMJ0jb92EPMw/S
8e7E9ozY+wRpKnNEcx7TsSVLxaCBTZB6nhLlJkZ0nKwfsCT5gCDlRdPGxkzp
ePu2awMPkgiyz+aNnvbvP/69ZZefPSLIZk5EfZgNHcvqcPWn0gmyfNHMufUE
HTM+uavuzSTIrKSu6Mv2dHw71NkdOAR5j/9IvtqBjo/ZdIDwY4KMQp4vaWfo
uFrpPDZ7QpDBd7SMvF3omBmoMXI7hyDPf1n4+OYsHRuOGxS0PyXI/wAWq2Vs

          "]]},
        Annotation[#, "Charting`Private`Tag$34589#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0AtMU2cYBuBzuA1bodwFYlzRxTHdhSxKUMCeZslwczjsUEfH8CiMRJ2j
wEaEMaCrcbdEmHHTqTEIEhnbkDC3OKfjqFMyhxaiUCZSWoHWdSUtpdSWSzu+
tzRpmifv+//f1z9pT4nivQCGYYoWvvS78DFkVgqyc6rMsvQWbdeCucjUXpni
0gqPsFxHNqyzDZIrD7Q+IEtltwzkDV+9OQJLxEbyb9+W+x2iNpO/616qX+xb
yAmaZljo6bHLnsuvP83EPyLz+lIHOUNcMIp53SeccNTVcXLdmGOa/HAw1Iz9
bGlucvX2fx7jftdxD/Kmnn+RBx6cQ3511orz5a/6ZDHtWSu2fmAnNw5cZDjy
9x2TyLf9xcKSVgdyNiOA7M1jp+D4Q4HIfxiC+VxFEFlfuNeJfW9OBCN375om
M1WpT8GsBeYOhYXCDZkunC9Rwd5jpX4X/b4E+YgVFvoYMblgX94T5CltsN53
GuYGVWHIm8+4kV9LDkee7IGF6VYJuebv5TPYp9YC6zXpcGN0QwTOz+pgadya
SPKZnz6axXuE1cN/bLnvt/B6FPrp1XOYN94L15guw0JFTTT2j7w3j/6P4hg4
6YoX/fAXYK/WCAuKuFjs0zHhQz9AGcuJdKsuvP0iI5B/iY0ja0f+hPnco7Ak
2g0LOWuXkUsuJLLIX97u97OrYUFqh7WiN/z+/Gg8fGy/v68OSiC/9G45zGSe
guvHd7CL8xPJtncW72vTtsjy668f+Kzruoze/9epO7L2LKNp+Ol+uO/r++TV
IqcObro4Qj680/yALKRvNZKLqyeGkO+JMCFfs36YzOiarbBKqSc37tXbZbpm
1SulZQb01xc44LHXjGTpkMdJvpHheIQ+e2UafmvjKDywzk3WpLeMkfn9J2fI
q5hbJuxTu3mePDqz0oL8cJqPXDhssZLrdncyHOVZ522YpxFYzrrt0rWcu3b0
pfIAMnuCm8S8xoOB5KRipQP984+DyLtFG53or60IJqurQqfR33k7hCxPu+3C
/38mOZRs/ND1BK7gYXVquJts2Ny+BPe3t8F8v1mEfnGaB/17d8TIDQ0e/zzX
UtxflziD93s+Nxzu6IeFqU8k+D/atFl4NDcC9205CTM7jvitHoD57ClYfXbD
HPb5pjMSXqmFuS/kUZifbYb5Xd2w8a5yHjZ/HE0+W1PghYNHYblTCzM3imLQ
/5L34f3+a4LltlMwH6WJ5VzJDzuy8xmO3s89CatMx2GD8tM4ckqxAeYGU5aR
7dpNLPKqXDiiUgHzNzfFkxuKzsFM7T64V/gZ5vJCEnC+rA8Wut6Hcwp1/nwg
OBHnL3ey3P+qr3Hu
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVkHk41Iseh39TjEFF1hmJlNQhxaDS4vsVdR9L1HmS6BpytbiynMoJkVxC
OVI4OOkUCTm2EAYnIssQZZSxJmvLiCyTWYxxnT8+z/vf+zzvR8fT/+ezqwiC
8F3ZPzyVpG563ifCgm9/NPMgyxgIjV0edj/cgav34gCFkgmPbRJLpX/4w+HI
ka5Vak9hc2R0fyn/KnhFDcsMhRfC5ZFXA6O8cMj9zlTQoZTA6KMbfrLCSOD0
h7r0yJWBnKO2fyY/Bj5V0cT0wedwuvDfAWxeAqROmGKUGhMOFYUxnwvvgbZs
bE3hb1XAke5gEsIkaAiX35cyXQ2S5z5VafxUuKPfqjd84wU4KudVs3iPwCaw
jjFFqYdLZqFucqIMSGbEau1OqIcDI1luz4SZENB64mz6+gbo3DvvJhZkgcE3
Zo5A/hUIPt9jJPNzwct19ZbSD41gc+SteyOvGBxs05V6qCyQC17cZRbyDCx+
Za5NCWLBdwcFI4roGfR9LI6b4LCgSrTbqEhYArVTv3sGJrTC0Z+jjUSCMhjf
3nWzb7YNAklbjRP5lVAdG7NgeLMDmt096Q28OqBHSkkfWsMGjsknzl/wEnqc
oh7qGrOBtSc9mRf1EuQpE15VTmwoAmnFWIV6CNAalCE9ZEOQYx+5WLcBWhv0
I80NumCNfwRP7NAI1/YzGx6bv4PdRey3aVks+Kss/eOdnd2wvTQ6fvQLC2Sn
P2qftu+GDRX77XbsbIW4PeeuSLy7gajNbq5jtgIvQ1XU/qQb2jqCX3zqaAMj
+d7x+1QOuE/p5JsK2qFzkr4QJOSAtZq51YWcTthRPLg3IasXztkFXahv7oSp
g6SZ+JpeuHWjMl7jcydAZf5w4LteeMM1623fxobsuvbLq1b3gUsd3dc4jw2z
gjAr1TN94HdhR6oovwve/vd/Uk60fkit1p78reQ96LsLr+ZeGwAug5xU8ncv
XF13OeOu4hCMz5Yd2uU0DFr5yzaLtiNwwjolRfbxOEgXLN2uDRyD6cV1lRez
v4AwlZu3ZDsBsVbmpe8k3+BN0rGLYu3P8Oj9SVjInIFkGf4t9Y4voLBvUL7l
0Ryww62Lao5w4cb56qY/WDzY2zVMbnk9CTdbxiaetS/ANWWJUrneFKTtLp3O
aBaAwlqiguk7DQW+feOJkyL4mkQ1ef3qOzj12Fm2TophaCDnkkXoDEgo6nEk
9WVIakpNiNKahYEnrxiyDwh0HVPsdayahQiGjoHpfRKOnJ9RUzsyB9tCDaY/
Fq7CkIJUzcMDc0A1OT1uWLwar2gnBib8Zx5kHfawxU1SePV9l5wrbx4iZs7S
mT3S6E8ttxgJ54HVjupm1R4y3myOE31f5gG5vfo4b1IGW1U2pVXE/gBl6RGF
wGkKMn74lBeQFyC3yeXQ6KQsaltbZpfdWID93Os+nRI5dDAZd8pYzQeNp60t
HsvyeCpK60BaKB+ErS81LqmuxaraX8nxEj64X5Yb9ddbhzh0vEMnbOWXiuBB
ha0K+MDt6JeAOQF4FLWdS9NUxKDCxg+iACEwHCYFwX8qYrT7T3F/fBKCNt2s
ib1hPeoG37K+4yKC4X91r+E+WY++VutJ8hwRHNGn+L3TVUJyzgxL1XYRCizu
2YYVK2FQjl/z15ZFYGoXosBIGasDRtqSDoohxnou4GuxMnrXsWz2lYjhZHq8
Zrq5CrJ7Nm/ZvmsJXtfWjGysVsH+2gGKXfYSoApuPnNYFX0kPie36UkgqHDq
gcYbVRzTa/ulPFsCTso7jbOPqmFIWH7D243LQM9vxJkeNVSeb7IMylyGcoVp
7zUu6ii2zk8TrCNwsRI7Hvaoo02pp3OXPYGWiV/zZz2oqJmXorl8l0BD861P
VEeoGFbXVfSSTWBIxy+dx8eomJOrED/eRWDzmVpx/AQVvbk/RVHeE+hx29mJ
zKVi1WODF8c4BCYP3CLz56jI1e07PdpPoDhs+kKvFA1DUu47y40T2NZQaZi+
nYa+M99yfRcIVHeWcu3Rp2G4SPrvZD6BXpPHopUNaahpUcKtERAoUeYOxRnT
sKJyIVVukUDjs5p3Q/fRENtZJnnLBKbJRMy52dPQYl4YOkkh4UR6h9Z9Bxpe
CRhEFTkS0o007DjHaBgHZpsOypOw/VRZloMTDecbI40T1pJwOW/iBDBo6Bhj
kGGqREJ7C3rENQ8aFl93tmQokzCt63phpScNm9z8JDEqK75FdbLReRrGZ6a2
D6iRMDzBi37Re8V3veWDNHXFv6WE8dRnpcdso7wRjYQ05tLtcd+VnqTcE64a
JDxnb1u5KYCG9RcDq6M2kPD/hkFL1g==
          "]]},
        Annotation[#, "Charting`Private`Tag$34737#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVz3k81Psex/HfFGNQjawzEimpQwuDSovvV9R9WKLOI4muoW6bK8upnBDh
EsqRwsFJp6iQI4QwdPL5kWWIMsouWVtGZJnMYozr/PF+vP97Ph4v/VP+P59Z
RhCE79L++ePJWubnfCKthI6HsvZxTYHQ3u7l8MMT8Q1f7qXRsuChXVKJ/A9/
dCBqqH2Z5hNYHxXTWyK8gk5HDyoMhBfApaFXfcOCcJT7nUPXpxXD8IMIP0Vx
FOrsDXXrUioFJWc9/yxhLPpUyZSy+p/DiYJ/B/AEiShtzBxHa3Jgf2EY57n4
DtJTjHtR8FsldMq3cghxMqoNV96dOlkFsuc+lenCNHTLqMlwMOIlOKvlVXEF
D5BdILAnaDVw0SLUQ0mSiVLYcbo7Emtg79Ajj2fiLBTQdPRMxupaaNs16yEV
PULG3zg5IuVXIPp8h50izEWn3ZdvKPlQB3YH33rWCYqQk32GaheDC0rB89st
Qp4hq185K1ODuPDdiW5CkzxDPR+L4sc6uVAp2WFSKC5G1RO/nwpMbIJDP8eY
SESlaHRz+/We6WYIpGw0TRJWoKq42Lmt11uhwfMUq1YAiBUlJ79/BQ86zT51
/oVI1OUSfd/AlAfcnRkpgmgSKdPGTle68KAQyavE0WtQgG6/AuU+D4Kce6hF
BrWoqdYoytK4HVb4RwqkTnXo6h5O7UPLd7CjkPc2/REX/VWa8fHWtg7YXBKT
MPyFixQnP+qdcOyANeV7HLZsa0LxO89elnl3AFGd3QCcJiTI1JC0PO6A5tbg
l59am5GJcvfoXUYneE7o55uLWlDbOGsuSNwJtpqWNudz2tCWov5diY+64axD
0PmahjY0sY8ylfCiG25EVCRof25DqCJ/MPBdN7zhW3S3bOKhbGi5tGx5D7gB
y9c0j4emRWE2Gid7wO/8ljRJfjt6+9//ybkweyGtSm/8t+L3yMhTfCX3ah/w
2dTk4r+70ZVVlzJvqwzA6HTp/u0ug0g3f9Fu3n4Ijtqmpio+HEXyTxduVgeO
wOT8qooL2V+QOI2ft2A/BnE2liXvZN/Qm+TDF6R6n+HB+2NoLmsKpSgIb2i1
fgH67n7lxgcziBduW/jiIB8izlXV/8EVoF3tg9TG1+NwvXFk7FnLHLqqJlMt
M5yA9B0lk5kNIkRfSZRzfCfhqW/PaNK4BH1NZpi9fvUdXLocrJvGpWigL+ei
VegUyGha8RStRZRcn5YYrTsNfY9fsRXvEdh9RKXbuXIaItn6xuZ3KXjo3JSm
5sEZ2BRqPPmxYBkOeZqmc6BvBhhmJ0a3Fi3Hl/WSAhP/MwuKTjt50no5fOV9
u5K7YBYip86wOF3y2J9RZjUULgCbLVUNGl1UfL0hXvJ9UQDUlqojgnEF3KS+
Lr087geoyQ/RAydpmP3Dp+wpdQ5y6932D48rYj1b6+zSiDnYw7/m0yZTwk5m
oy6Zy4Wg/aSp0WtRGR+P1t2bHioEcROpfVFjJa6s/pWaIBOC5yWlYX/DVRgP
HGnVDxMBvTy4n76Rju95HPoSMCMCr8Lms+k6KjiooO6DJEAMbKdxUfCfKjjG
86f4Pz6JQY9lUc9bsxobBN+wveUmgcF/dazgP16NfW1WU5Q7JXDQiOb3zkAV
U3OmuBr28/DU6o59WJEqDsrxa/jaOA8cvQIsMlHDVQFDzcn7pBBrOxPwtUgN
ewPXbnexFI5lJOhkWKpjXtf6DZu3L8Dr6hdDa6vUcW91H80hewGwOl5/8oAG
9pH5HNtkKIOggol72m808Ihh8y9l2TJwUdtmmn1IE4eE5de+XbsIrPw6PNWl
idVm662DshahjD7pvcJNC0tt89NFqwhyvgK33u/SwnYlp1zbHQnSOulr/rQX
A+vkpeos3ibIrZYbH2sMMXAYtBeSPIIMaf2l7cgIA+fk0hNG2wmy4WS1NGGM
gb35P0XT3hOk101XFyqfgSsfGr883EmQKX03qMIZBuYb9JwY7iVIadjk+W45
Jg5JveuqNEqQzbUVWzM2M7Hv1Ldc3zmC1HKVc+8yYuJwifzfKUKCPD1+OEZt
KxPrWBXzX4gIUqbGH4g3ZeLyirk0pXmCND2jczt0NxPjFq5Z3iJBpitEzng4
MrHVrDh0nEYhxzJade86MfHlgH6srkQhWSbaDp2HmTgeWazbp0whW46XPnJy
YeLZuijTxJUUcjFv7ChiM7FzrHGmuSqFdLRiRV71YuKia67WbDUKmd5+raDi
FBPXe/jJYtWXvHktqsk5Jk7ISmvp06SQ4YmnWRe8l7xrjR/kGUv+hmL2E5+l
Hou1yiZMCsnkLNwc9V3qSc496q5NIc862lesC2DimguBVdFrKOT/AbeJglY=

          "]]},
        Annotation[#, "Charting`Private`Tag$34737#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1A1MU1cYBuBLKQhVTKlFwAGjBpzJlglREQ3Qq8tSoiPKj9vC2KiuSNTN
LYFhrGiKE3TEMHBOl01rFSW6IcxlEiBTylzG/hA0DFqw5TYKYQUKtbSUAu36
vZcmTfPk/c57zj1tKtv/SU6RgGEYlf9Nn/6XrmV/h3wiu7UmseSfDr/ZngPd
ctf6gq4vmp+QOTM3QC4+ZTGQdfc7h2m+6USjnqwsTbDIj0ubPlfGcJhnzM/J
9WVVFnJ8arGV/Mz013P4ks9GfmgsHYXP7bSTP5wXjGF/w7SD/IZklxX9gy+5
MC9pH0e/Ns0N6wMmyfrZXA/2q0uw4Xy+Wt4HrmCefVOxKE8XDXSGvjUNN4h8
5GuvOGCdYZhh/baYRu1kjWCNgHxt+PoLMpMlDET+0TYH8j/zhOQKd8QM8m/e
h7ffioY1974Ogp1XeK/7NZgcwIU74XRRCPqTTsC64o2h6Ns2Ausb5uDteSku
nLelZDnWp8TPYn3y0RWw8SfeXbdhS24XzB4zhCHP3ORG360bK8n7Eo67+fsR
i7Hf+OY53Kf8BtzZfhlWbmLDkdc6YPZCCxyQn+nBfsZ0Cc63qxHW1fbAnZJ+
7K+cmIL3mffO436c1avwvFuewly5D66YVC7g+x9qk8IbqxbRX74nAvMxGV7k
mb2wbMgEs815q5EPHvGhL7YYthRk83l/UCT7cuV476FYRo/f93U4yVMI68sy
osjT4VUwc/ZnOMl0Eebyd0ST9zg0/PzZJw/k0ibF41Zvt5yeLy+nRy4aqG99
N6qfrKnMHyC7VWuMZL3qewM5NWsGZpUjHDnq055hsu72qRF55Xh22snfLOi7
22Elx7RLRjB/56CN/MvRvlHkF2V2zF8+PIb+x8wM+SnbbsX86TAXueD1LRPo
dye7yeVZr04iv5/jwfwdsQ3rF87AMSoh5uNT0hYxHzk1hfUXinzyh8715qR7
03i+z+wM67f3v7t2Mte7VkCOO3TwBfLdcYFk89pZmDO+JiR/4C10IJ95T8jS
+dVH0M81qoPQN+RArrz6QzD6tOoZzF+yLYMfbXbifD5ZKFmr2eGCmxQi7Fc2
CGvaDi8nZ3S/M4u+uo9XwLqbs0vPEwaH/MHnyx7BcUYrb2fbSvRdTXGjPzlE
vHQ+WL+1HtbOvz2H+dCt4bCpGWYNP/LeGezBfscUEvSpfof11hL45L+B8/x9
L8Dav7+DdbKaVbivhnULyM+JpDhvTR2ss5+HH1iCFtFXmhuB+TEnzKn7Ipb6
vGSmYu9quC/Rh/WJKthcHc3n34ZEwuJnyP3/D5GsRS3d4NvAsHSfsalR5Kmh
IpjLboWbT1fDykJFNPnLM18x7P/a7IsI
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV0/k/1HsfxvEv4hTZ1+9YSiKVcBgi6v0RdUSitEwpazpKliJGoqFJk+PO
cmwVISO7m4R0wiC7OoaMbBOFisaa3Zjb/cP1eD2ef8Cl6upzyp0fwzCvjf2/
Lr/FtnGZYYd28GsxH4boQaYZKZ5BcoYWlYSfqWUZEJZ3cTqF5AshUXzq10Ry
QZf4n8ReKhkc1ZrS7AuKYJrtqPIXiQLlqUF7/yorgWa1wBu53lTwq+iKym0v
hTSP6HdNVBrk2Bom+BWXwa5lJ4NwUgwo0R48uilSCXGKPx1j3eJgXNftsGvM
G1g/SKale8dDl8HIE4S9BVZ4TH81NRl2qOcKkQuqwTxiiBFCSoeAfToDBWW1
QE56cUbQMQPu5Gis7Derg6Kc6+NRbs+B23/SqqK5DghtS9Ip3nS4G8m1H2iv
h1lxyT/fUHOgzPVPrLK4AZjt6RHBpGKobnBNHxZpgevdAiehvxhuGfe/tfNp
ASH2FUUBxxKIyM83NmO2gOmUVnGk20tg9Djpf49phRzJyt7H3q+giD+wlI21
A+UsU+s19TWEP2VLWxV+AIVpytXbJAaoJsTE2pUzwZnsYXAxjQHHyp+Hxw0w
IRez4zs0xoDfbWXs7vF3wgHJbY/5/Gvhm/0ZxyCbTnDQq2qmRdeB0Ok41fHP
nfDMf3lXUuM7GJwIpsFSF6gt3xgrJbaA9OxNbUteN1wPO/8yIbgFhhtumamr
sODVFrPQwLoWUB3OetxjygILgoSciV0rfBFa/VgdxIIrJkVH6jzbIHXd62nu
DAtyQsbpHc/fwx79qQv+fT0gH1ZSErCZCXYUaD31dy/E1DeQHu1mQqhRjvbO
gl4QFurjZVkxgRH8kTH4rhfWIvlPdEcxgWxICRVe6IUv8fbj+pKdUJ5kF3ny
XB8U5szvmMG7wFk3KaxNth/MO4zjPfd2A0dM0fX7vQHw2VYX4HyiFzwnszjK
2p9hOKv6vFPZEEjuV6jRmRiG18F3vkYpjoLQV5bqys4RMFSyio0z/AHKPkqD
foJj4LoWmJeYy4EpQzsP1ZFv0BhbdXdcYAakDrRWJib/gCLhP97eEp2DqQjv
s67yE+CVSdHGzOehrJRz3z79J9xVrXu5cGoROmMpEp5cDkiYT56OJC3DzVTR
0ENHpoBMbdVSjlwFh5W4PHebadDPL5JTSuTCM+OUXwNj09Awc9iQ8IEHsxJ5
5ZQHMzDBGars42Jo1mN1XGD7LKSeobuw+fjRhHFsg3jeLJi8B/qwogCqUrrd
kGEyB+H7P08R1DYhyqOnOZM1c1BWcpZljwTRga01zq+tf0F2SL21A0kIyZo8
sc1k/gJzU2Jr8qXfkMY/x326rOehVTjkazd5M5LSXHR68H4eVttaBI+FbUFr
3RE8fYsFmGCLVERShZH3d5WTXuUL0MSnIdCeKoIMNGfY23QX4bi8BcmcvhUV
6YVh1WmLUGV6wPINQxTFWb8ZqZRbAk6pehOvRwz9TiwXzX64BE3KsrbBA+JI
2Lc222JuCRqtJ42CgyUQbcFyVefyMnD5Pn6w50mgElf/5L3tyyDjQiz4myKJ
auhp0b26K7C9GTvXtVUKnRjxaWxMWYEwTVuhomgp1Jdl4GiLrcKnmC33aMrS
yIqtOCTouQrU2SOb1jOk0X+POR1Nf78K4ty19j41GeTlnnfddd8axIhvd6so
lkHuiNVnE78GVxQbuNpEWeTsZltCm1sDPR2W+4s6WXQjvPnCt/PcjR+5yN4/
IYceE3eU0qs2nOHTst4hhwaR6aIEYR26nH5YkR3lETG+t7AwZB1U5Ec7or7I
I4se06B9fetgGejwbPNlBTTkwKL7E3ng8fmgMXVaAbEudmUIJfJgED3/9MQP
R1Va2a6t0zxgS6doj9zC0StN3T1OsxseS6DuI+NoSKmDMzfHg6Goh7qMOzgK
9fW5qrzIg5FPvrTR+zhKqxjV8+Xy4KcvGOkm48hf0DxSWBBDa+kDSQ1vcdTu
/WF7kSSGuH4sjlgNjowzQ4+TpTC0frTDnFSLI1GxFwGHpTGEceqnxhtwlG7i
0ciSwdAm4/w/JP7F0aIS4TRPHkMizKDFC8M4mjprtNdOBUNb6X429K84ClZe
BsK2DQd6ZXJGcXTnkof9yIbFlF1sKeM4EjnoHEBWxZDUVcvsrDkcHT0vX5i+
E0PSpoe5k/M4sqkvrLimjiEZcVN7oyUc3c4WqyVqYEiuTIfXuoYj3szBjuZd
GJKn7T4jw8PRu8vSrDhNDCk4qOVf4iOguGu1fRd3YwjXVubLFiCg/VHWbI09
GCLwyZ+bFiSgaPuyoekN/w/Dhju6
          "]]},
        Annotation[#, "Charting`Private`Tag$34885#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVx3k8lGsfgPEHcYqyb89YSqIdBylR9y3qiERpmVLWdLRYipgSDU2aHG+W
Y6sIIUvxkpBO/B5kV8eQkTUKFY21Qox5vX9cn+vz1XD1PuwuTBCE51L/v8tv
0U18TsjutcJbOHeC9CHdjB5L0Z1Rg3rct+TiNAjJPTWRRPdBQRFCWuclckDP
8D/xnSwGctSsS7F/mg8TfY7qf9GZqCT56ua/iguhXjPgUo4XC/mWtkXkNBdB
ikfk6zoWG2XbGsX5FhTD+jmnbaH0KKTKvn33skQZxKh8c4x2i0Ejem57XKNe
wuIuBjvVKxa1bRu8j4lXwA2N6q5gJaK1WjlijKcVYB7WTwXRU5H/Vt2ep8WV
wEh4fFTUMQ1dz9b+td2sCvKzL45EuD1C/O5DVqX1VUBrmpVL8spAN8L59j3N
1TAlJfPnS1Y2Knb9kygrqAFOc2pYIL0AVdS4pg5INMDFdpFDqLsAXTHufmXn
3QBifWdVRBwLUdiTJ8ZmnAYwHd9SEO72DFEdTgZfohohW6as857Xc5QvHFDU
RzQD8xhnywvWCxT6oE/OKu8tKE8wz12jU0gjLiraroQDzgyPbadSKLS/5FFo
TA8Hcgg7od3DFPrdVt7upnAr7JRZfU/IrxJ9tj/qeNWmFRz0y+vZkVVI7EiM
xsiHVnjoN7c+ofY16h0NZKPZNtCcuzRcZNiA5KYu61gK2uFiyIlncYENaKDm
ipmWOheerzALDqhqQBoDmfc6TLlgQZNWNLFrRB/F5t9VXOXCWZP8vVUXmlDy
oueDnEkuZAeNZLQ8eoM2GYyf9OvqAKWQwkL/5Rxkx0SNh//uhKjqGvrdjRwU
vCNbZ93TThAX6xJkWnEQFfiO6n3dCQvhwgfbIziIYcQMFv/ZCR9j7UcMZFpR
SYJd+KHjXZCX/WPtJNmGnPUSQpoUusG8xTj2wuZ2xJNUcf1yswe8V1f5Ox/s
RBfGMnlqOh9gILPihFNxP5LZrgy6owPwIvD6pwiVIST2iavxa90gGKlaRccY
fUVq3qq9vqLD4LoQkBufw0PjRnYeGoOfoTa6/MaIyCSS3dlYFp/4FfLF/3h1
ZdU0Gg/zOuaqNAqe6UwdwvwHKi7i3bJP/QY3NKqe/Tw8g1qjmdIX+DyQNh87
Ek6fQ5eTVwXv3jsODFbjFrXweeTwKybX3WYCDJ7kK6rG89FD46TvPcMTUDO5
x4j2VoCmpHNLmLcnYZTXX9bFJ/CUx/yIyJopSD6a4dInJIxHjaNrpHKnwOQN
yhhQEcHlqtdq0kymIXT7h3Ga5jLMvPsgewymobjwGNcei+KdK8H5hfV3yAqq
tnagi2EFk/u26ZzvYG5q2Jh4+jes/c8B7zbrH9AoHvSpnbEcy26Ycbr95gfM
NzWI7g9ZgRfawwQGFj9htE+iNJwljr2+qB/yLPkJdULaIs3JEnjbhsm+1Xoz
cEDJgm6esRLn64cQFSkzUG660/IltQrHWL8cLFOcBV6RVp2gQxL/bliyKuvO
LNSpKdgG9khhcZ/KLIvpWai1HtsRGCiN2T8t53XPzAFf6N1be4E0LnT1S9zc
PAfyLoZP/2bKYMhIiezU+wVr6onjbStl8cFB79rapF8QssFWLD9SFndlbnO0
JebhfdSKm2w1OWzVp9IvemEeWFN7ly2myeH/7nfal/pmHqT4C81dmvLY0z33
ouvWBYiSWuNWWiCP3TG3yyZ2Ac6q1PB1DBWws5ttIXt6AfR1ue6PqxTwpdD6
k59P8KF31EXh1kFFfM9wbVFG+ZLTvBsWWxRxLzadkaYtQpvTVyuGoxI2jO3M
ywtaBHWloZaIj0rYosP06tauRbAMcHi4/Iwy7nfgZvgZCsDjwy5j1oQy5p5q
SxOLF0AvfvT+vi+Jy7dkuTZOCKBPLkln8AqJn2/Q2+Q0teThONZWBon7VVt4
09MC6I+4o0ddJ3Gwj/c5tRkBDL73YQ/dInFK6ZC+D18A33zQDr1EEvuJmoeL
ixLUQmpPQs0rEjd7vV2TL0NQfF8uTxJIbJwefIAhS1CL+1rM6ZUkXiX52H+P
HEERvOrxkRoSp5p41HLlCWqZ8ZM/pP8l8Ywq7YhAiaAkOFdnTg6QePzYjs12
6gS1MsPXJuMTiQPV5hBt9ZIDPNN5QyS+ftrDfnDJkmoutswREkvscvZnaBCU
7DnLrMxpEu87oZSXuo6g5Ez38Md+kNimOq/0vBZByUuZ2u+YJfG1LMlKQ22C
UizWFTQukFgwuaulfj1BKbE3HpUXkPj1GTluzAaCUnbQfHJaiIZjzld2ndpI
UKSOmlCWCA1vj7Du095EUDQhpeMTojQcaV/cP7Hk/wH0znI6
          "]]},
        Annotation[#, "Charting`Private`Tag$34885#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt031MU1cYBvALQqmIWKDWwnCWGJABw6RzCTDnbSBQYoYTp0aUuMqARLZs
EzBCcANnaBZnQMYyqUuXZo1lyZY64A+sX9yNzaXRyRhxpSLLrcM6aVEoLaVS
ynifWxJCfjzn/TinaVrVR/tqIhmGqV79pb+rP4oLBo6VmtVzP/48MkT/aK37
k421GfNuKMbJbdb9o+Sesng72TBy/wHb7io//3E3T+be2OMgu1O3PML5w2NO
cs7VxsfwMaUL57+67kT/+03P4WnrE7KiX+8hx/3RNU1WHb3mRf5Zrwvz1A7Y
XTkMM/6TfuTfpMyQ+YGKADx68BnqdVlBdtiXmXExa5as6RsKkWvNDtjQZmJU
lN/8ZA55sCeCLLLdg3nOEkk2bSvwYN5DG5yx8z/UqxYLo1RC/3mcL82NJmsn
b8Fc9JcisrPf5IVjbsag/2AQ1gyPicklLWYf8pByLbm2dNonvMfmWMyv716A
f9GuQ//2dj/ec/1IHOanyhax3yVxPOoPfg8b0uI3wNlpAeQhqQTz1HrY8N1W
uLa8EefbvBNC/vDEi/D7JmBeXsQS9pXIE7GPphXme7Ww86wVNlTuSsL9SluC
wud7Fc6YfBvzOPc/sFYWtYz3M52Tol+uDubrsjfC+pQQ9sn7Gi4pPA4r7uyV
of70Eqy5OwnXvqtcQf8hN3w7cgfMPD21CefFJYKNiXKc7y4Szu/9AXYWpcOG
iJ3J4fsI/ZMfwaIzHPbj+nJvsQuZlTEpl0dZ2mcicJvceyg4zgrz/2JbpObX
vDIeeYPtAblBueIga/bvc5DfqTf+S+a7Kp3k+VcLnOQ2y/su8kDOzBPk2TXP
0c/a+RT9q1o94X4u9DvS5yWPvX5qBvZPLcCdE8/IqmK1n5w0kO5GveT3APtm
rK1i/r1Z7Hd+d5Bs9y0LPlwdIut0H85hn45qRrXq5uw7sKHm8whyoKDYA2+1
wBX191DPlEWtIVtSouaxT+fq94PyI1qYbzoejfqOTC9yn0VEzi9O9SG3DseQ
k+1GmGvxiMP5AuYlpK9F//EdsGJm/TrkrkHB3x4VfNIGc1fOxsEflPkxLyiP
x31C8kW8T5VkA3LxGZh5JVWCfaseC+7aJbgwKYD3mOqXhO8Dc50nEtDv0lsv
kFuliWSd6DeY01+B8zt2L+F+m7clYX/9r7AhpwgONJwT3n/7JJy/eDGIfnWn
pWS7P3MZ+/fEbcT7DJpg/oYRblZmhVD/k1KGftsvwJrGKVjX8NIK7ntgVnD5
yzDT9MUm1CceEvIcqRzz5XVCftcs+NNjsMKsTkb9ljyYH7DDzca/Q+z/di5+
fQ==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk8lAkfAHBPypVcM4PHUbnKGa8UVvx+knq3KBFFQlKteEUr5EjHhKSs
yLHLfPDakH2Ru9xSsY5mHFHZsDTue4xjaN73/eP7+ap4Xre/vEVAQOBf//P/
M4JQsyvqroX8TFCZ6IQB+GS5m7VTPMDuXLKujWEmTNpV6+VT/OEtlZ/eOfYc
drHemfsqh8CHM3UarB1/wAvNiecplDtAYbrEPzAshubx2X235OlgqZIlI61U
AoN5nAoX5RgI7f3LoehjKcRS74w8ofwCkrRi+/zxCkjh3Mvl055C5l0e96lN
FeT0PPDxl08CLnPUyizjFdQnPVo6rZwKYozLgUGSNRAa23Y3lpIJXY/7nT7s
b4A76+0jTdQssBybaU4sbYDoa53WPFo2zJX8KPFcvxGSjrNEfeVz4J5SX8Ww
chMUifUl2CrnAb1+tyTt0xu4Yb1gF0Mphjnf3HT36Xdwc3PhrnpSMSwf3k55
cOw9hJQvljRQX8L65/EA26z3EKnBoa7RSmBfjr2i4OkWiNu20u8tXwa2HSZq
/tmtkPt2w+OEchXcVA8IcZBth1lVukk0pQE2xbJ0dpoyIYno32rh3AD/MfGN
OuLKBNMhHRaH0QAhL0pFVCKZQM/o9vbUbgRbZ/1SwWYmKMir/WZu2QRpoVRJ
xnEWHN3RtLnk1wzMyZogb5suyFjhN3n82QKxJzTfaGv3wOGPDvFyUq1g/Mko
NPVoD4yX5Z7vdGyFNKVl70HPHjC8cYpjNtwKmZODAbxfe6BlmqEht/onaEdc
eBku2gucYfOYDo0O6OxxPqs01At72LV7MhqYYKV4fZ4b1Af5B80Pag0z4XB6
jcnfj/tAN7rGupxggeVJ36XKnD7Yr1nt1XGYBZVfJKvUuvoAr1VlbzazoDFR
R0RQtx9cZkt2urV2QdqL6HzpgX54ws2V3dXVAwzW76rv932GZaGnQlkj/VDj
ZVAnlzsABb9UnRz1G4LOxTi+yu0hIP/pcfZ+0yj4XXzhIpH4N6RolMUat49D
f2BVHcdpFOz1kBekOwP8TMvJFkU2TPXnqanXzIM0PWjMonoMDhQKu8vVLoJP
3fhPw1oTwEjdYmo3wYHWiFSf/JxJkEh2yEuc58JaZArXf2UKRk5f3ZY5swpD
o0Y/lRvPQJ+qHLFI40FmQpvp2+hZ6BJSfnqS3AR+1MJW4ao5mObXNc4f48M/
CsX3RobPQ/mXhDm9CgFsT+G1q8ouwCrOtYyXE3ghL+Cqa/YCtBX/GnC0bQs2
UbefpRsvgor2gpdWpyA6JYm2nWpYBOHCZ3uL2Fvxwcw5rR/sl2BXguJFcn0b
KoRec78xuATVETbfRHhC+GVl97f0ixxgB7aZ/CYtgqLBabpWMxx4dnP5YwlN
FOWoLpohfssQ1CswXUgVQ/my7S3G08swBi5MW63teFEhvLv9Zy4MlLrxA3TE
MeLEYfHKBS54GL7cNLHagQ6XUlLLb62ArNS3G6OOEuillTw/830F7FbeGNKc
JHG9RzNSLmwVHgeuenAOSKH5s9kPTGINjG6MdmRWSuFxG6NWZuQaBO6yDKo/
KI3JlK2MCt4abLCORBU1SKP7y3CnpnvrYC3KMPO0lMHguInySIIHH60Z59jt
Mhgr7EhnP+KBljBHQe8UBalW1VLHJDaAFvJant1JwYWuh9qu8Rvw4+ze2/7O
VMwMe+UsqLwJMDEZU/uZipOOYWa87E0InzjD+3KFhuxDmq3OB7+DQ5p+vu88
DW0GLIPjWr/DdIf7Rr2/LLb9xXP2cuRDu7Bx5ShPFhVfsY13z/PB790lufYI
OfT5epkxZSmA+UZEqcamHHbym48Kxwmgbp51hV20PLpJrYQ9+SqAAZmDbhYi
JO48pJvRqkfgcWqj5G0xEo/9rvNvA30C1WOyG2rFSay2GOxPMSCw//plVXNp
EiWKaruv7CcQYeqbmQKJE409osKmBEp95fqa6pK4XhD2yO4IgYWKEmFGdiTy
fFOjRc4TGBM/pxNoT2J3I7v4piuBnoKsgdIzJFbo9IqPXCBQdirRYr8ziQUT
i651HgTefk1uMfQkMT/sk0fwFQJtnTUe6geSmMWvFF8KIHBPh9AP14NIPD96
0+fSzwQKWI5PFoaQqGbj+r07kMAyzQKbfREklt8XaiwPJlBp1UBKL4rEmdgn
NWERBHJ9ZBp9Y0gcVD9ZP3ObQObgUsAfsSR6O/G57ncIpL+v6NaJJ1FQOH2b
9X0C3cxS6T4JJK5eez1QSSfQpOjWgYJEEq8aGExoRxEoo3aePfmMxDtTsjqM
aAKnkw+laKeSuGweky39kMD/AkAFN48=
          "]]},
        Annotation[#, "Charting`Private`Tag$35033#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk81HkfAHC/lKPkmhn8HB2knPFIYcX3q1LPFiVKkZBUKx5hGSJRCemw
RY5d5jU8bah9kLscnx+pzDqacWQqGzZN7nOMY9I8z/PH+/Xe7HfJ9dwqKSmp
f/3P/89lYoPOxGv2GhPMCvkRcwjM87Fto/kil5MZJk4WbBh1qTUtooWgV3RJ
TsfXx7CR99ouSCcKvT3WoM9b/wc8MRh5nEmLRzSuZ+pNi1JoHp7cflkjATls
zlNV0S6D/kJhladOMoru+cut5F05pNDjP9+j/YKUGKWuRcNVkCm8XiBhPEDs
a2LRA6caeNR9MzBEIx2JuEN7bXOfA6Tfnjuqk4XWss6FM5XqIDql9VoKjY06
7/Ld3+6gIH657XMTPQ85fJ1oTiunIOlih6OYkY+myn5UfGzWCOkHefJBGo/Q
de3eqkGdJihZ23vfWacQJcAmJcb7lxDmOOOSTCtFU0EFOT7jryFiZebalvRS
NL9nHe3mgTcQVTlbRtGfoeUPw6HOeW8gTl9IX2KUoe2PXLWkj7bAnTUL/ACN
CuTcbq0Xks+BglfffA/p1KCILaFRbmptMKmbYJ1Eo9DK2jzjDTZcSCf4q+09
KPQf66DEfV5csBkw5glZFIp6Ui63OY4LCbldAX5GjcjZw6xcupkLmhp6v9k5
NKHsaLoS6yAP9q9vWpkLbkbc0TpmgFMn5C5Imnz/bEEphwxeGhl1w553bqnq
yhxk9d4yOmt/NwxXFJzqOM5B2drzAf1+3WARdkRoO8hB7NH+UPGv3dAyztJX
X/wTGcWefnZFvgeEg3bJ7frtqKPb44T2QA9sFdRvzaW4aK/WpWkRsxeKdtnt
Mhzkoj05ddZ/3+0Fk6Q6x0qChxwOB81VP+qFHQa1/u17eKj6o1KNXmcv4Is1
+SvNPNSYZiwnbcIHz8myDd6cTpT9JKlIpY8P90QFahs7uxGL97vum+0fYF7m
gUzeZz6q8zdvUC/og6e/1BweCh5AHbN3JJuvDgD5T98TN5qGUPCZJ56KaX9D
pn5FilXbMOKH1zQI3YfA1RSLmSYTSMJ2GG3REsAYv1BvS900UklgfrWv/Qo7
i2V91OtnUWDD8E+DhiPAylpl4zIiRJzYrMCiR6OgmOFWmDYtQktxmaKQhTH4
fPTCGvbEIhoYsvyp0moCenXViVmGGLHvt9q8SpqEThmdB4fJFSRJnFktWzMF
45KGxukDEvSPYoVtcVemofLj/SnTKinclilu01WbgUU81TJcSeDThaEXvPJn
oLX019D9ratwE33diQSrWdhsNONv2CGN3dPlW49QsyBb/HBbiWA1vjlx0vAH
1znYeF/rDLm8BmtGX/QJ65+D2linL3JiGfxxYdOXnDNCEIS3Wv+mIoflI7NN
9k4I4WHE/LsyhjxWp3saRAXPA7NHaryYvhZrVKxrsRqfh6/Ik+tsuA6f0bzS
1fazCPrKvSWhxgo49tAeheoZEfhaPFux3rseu53NzKq8vABqyl/Cho4rYn/D
jOmJ7wvgsvDSguGuhJe7DeLUYxbhbviir3CnMrZ7OPmWSyyBZdhQO7taGR90
suRw45YgfKMDE3ap4AzaalaVeAm+8fYlllAq2OfZFfem68vgKM+y9XNQxZF3
RirjCDG8c2SdFLSp4hTZ4wmC22IwlBVqmh6hYfreWuUDit+AEfVCQ9BBwzOd
t4y8Ur/Bj5PbroZ40DE75rmHtM4KoJHR5PoPdDx6PMZWnL8CV0aOiT+eZ2DB
bgOOx67v4JZtVhQ0zcBOfQ6RdzjfYbzd5xuEqOHWv8Qe/scl0CZrVT0kVsNa
zwVWm6YlEPz6rHpbrDoO/HSONeYgRRVZEuX6K+q4Q9K8X/aOFGVS6FjlkqSB
vZUXYu59kqJC2f3e9nIk3rDbJJdjSlAH6Y1KV9eS+MDvxv82NyOoLcn5VL0C
iWvt+/mZ5gTFv3RO106FxIol9V3ndxAURmNfbDVJPNLYLS9rQ1DKn0RBNiYk
Xn4ac9tlH0EVaynGWLqQWByUlSR3iqCSU6eMw11J3NUoKI3wIig/aV5f+TES
Vxn3KHw+TVBqY2n2OzxI/HRk1qvBl6CuviBXWfiRuCjmvW/keYJy9tC/ZRZO
4jxJtcJcKEFtbZf54RKTxKeGIgLP/kxQUg7Do8VRJNZz8vreFU5QFQZPnbbH
krjyhkxjZSRBaS+aK5smkngi5V5dTCxBiQJVG4OSSdy/5TBMXCUobv9c6B8p
JA5wl4h84gkq4U1Vl3EqiaVlc9Y43iAob9ushMD7JF68+KKvOoGgrEsu73ya
RuIL5uYjRokEpap3SjD6kMTxY2rGrCSCGs/YnWmUReJ5u+R8lVsE9V9xTW4P

          "]]},
        Annotation[#, "Charting`Private`Tag$35033#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0w1Q03UYB/C/YzEYjBc3GCs8hnEi5kERFuTV/29Zw3w5JiZGpqSMmWQC
1d3Qu5q8KnFRp3C062UXiVYXaV3X4jRWnFfgtc4Y8qLICHDEiMmAvTG2eL5z
d7vd557f832e3/9/Sz50fLeKxzBM8cqXflc+2gsFnWza/qYKXeEvXSsuOsX/
k5V0KHJaXjF1Bes3WeFAm++m0UyWr+kZgVsSh+BA8jg5MSl2hMzc4VnJn7S3
jKL+s8/G1tqUHROGf5A34bCTo7YnTaKukjnIH6zNtKL/67l5smlV1RTOR6Q4
cf5y/DTOFxa7yekdohnsm6X1kneFVfxHNr591oe8K0/NkvWq0354jLOTuTJT
APlNLtji8TNc9+L6+rbie/BryTzYZIOL9i7Divwjc5i/Yx2fbH02xoH8TTsf
IP/u7YItGZtDyRcS1PPY/w21AD4jXkA9Nz0M+c3tMBPeEE5Wt9QsYl6pTng/
3wlbl4Leutl5f34k8t4xw3rtOhHyXmVdqA/tikK99ips3NYYjfzBfDfmN2fG
kAXHJ2DG9SOcqnnTg+fzhyIW9XY/bJztgVOTCryYV6lYDR+9BMuVw7AgZscS
7ntCJcb8W9dh7uNpuD53rQ/zrUcl6Jd8ATOLvXB9h2wZ52t2xuF5pt+AGdMQ
rM476IeP7Y3H+wi5FfTtAbi+tzmA+Y2VUm7sxLm2a2rGSPOOMAnk5zq7Yf3G
6qAfEqwiM9IwGTnkQBas5T8PH+azsFGm7GRnlIbQvPy/WMoz5lxnnev398Xd
6SNzkbwBcsg8b5gsd2wZZU9KOpJrFBay/kDaOPnUqHuMXPToBiv5sffE42RG
EzFDVvLMk8iv/sxOvmH+/i6suztH/ujc51b0b319gXw5hZuG5Vuc6LdusmGe
8AU3fL5kBvuYdV64UDSL879e9MG29+3Yf8NXfvZp4cDpb168B6cHAuTcun5Y
e3iE4VY8OLRtDvtei+aREx62wnpVWAh53+QxB9nYXsmH/+2GmaY+OLuuH7a0
lYUib8E6j/1ERQJy66eNC5g/WBZGNkTlLCJ/8GA42W3/AbZEnBUi/4lcJ+5T
+mAE9umpguUfyiORVzULWyRrRJj31m4XG/y/RiF/uznoZwqikdfwiBv9qpdj
yJp3W2HupUtw9sW/YabkyVjkZezzIL+8F2790uYJPu/C1cjXVXvRLx6DE+z9
MJNZIkZeXNpS8H1MwYaSCtg4/bgE+5QbYPn5q3CrcBy2ZJyMQ168wIf3UzsM
GzR1MPfdnnj0X4ldxryUKTj70Lew/kyZFPdb0PhxvsIDZ0v3BDDvt7oELqm2
dGOWlOFoH5dYRr6dVx70cAOcmPoTw/0PocptIg==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjmk81fkCh0nCDSPrkb/KZBTaM4PC90eWEs6cGiGZOllvh4iWkdNFSirM
jcJkLVnGvpetBSM6shZlydIiVHIUjuNf133xfL4vnhffR+Oo7z73JSIiIj6L
/H9tD3UrkKowk7ji93VlohvRq/7TwG3GUTRIBHgYNCVi48wdryCGP1QcE6U0
MtJx3OXu0QzNIEx3bjML/SEbDiNuBZ6M8/ire3x3eFMu5pSO53JTwnHdSDD+
s1whEvacyb6meRWCkKahErFieL8w73BhxEBOr/nSg4xSGPk3M72cr2Nma0nj
XHcZpKXtWv1T4pBvZz6cP1uOPDjwLmkmIqOkZ1W53D2c7iobcWTchve13f/9
95Nq/L5mVuOVYTqmGAfyIjJqYOljyHZ1voNbL1eG/3q2FsoS9wd9UjKh1jSf
Pyj/ABU7Hvef18yFoaPxiVPijyBs9+YcYJTgsZ5+VmB2PfxmZZar/l0Ch28l
oSkz9XijXpjTZ1iKZSbZPfG7GtBybGrsiHMZdFjeCTt7G5C09LQXJ6UC9ld5
bqHCf2BkEOweolkNVrNK/EOlJtxva9psz6iD1/34ZP1OHlI8g5SeetThx5tr
Hc/ItiD4+0aheXkdZmiGnYF1C8jm2Ea9ffWIqbYk1g9b8CjaxUUxsgESKrJj
dOZTNNjyr3R9b8S5ftmGp0fawOOpvWON8vDJ1detek8H8lxbec0/t+CbhYqq
8tEORApDik0vtKAqWiyUebYDNrrvuFs1nuLvPtvoIzkdaL1SpLDCuRUK4eWd
UlKdGLtze42XZztCZR1YQw878cFV325dXydG8np3s9SfwfRiWnbz9054O4yn
T215hrhMKTFvzS484mScDTZf9GN9d4t8uuBUt8TPjbPoj4do7BB5hi1Z4cpO
954Bgc1fbH56juMR96xUmM8RE+2c6O/bAzel5bGyJ7phUBn8vlasHwGzV3UN
ol+g1ZjjoBs8gvKggXN8s354jlUwhl1GwYy48LK/YxCppjTPdWwCTtf5Vu3H
hrGKX/xpHeczNjmt19f6OILSV17nV3XzERa0lWnJfIMEDfU/g1S+YpcG2yD4
0lsUXR62jro8i22m+hF1ze/A2J0eLN4pwCXLzx3lY6NovOWFb7ILKLS2fJ8j
eI+sNSYFudxvGNwaafRQeRwTZyV5h4+IkJa7ZR5xjAmozwUqN9wUJb4rzfz2
rv8AvplPllfbEtLzenXU6g0fMWkweJJMipHW4AA/UdVPuGj68i//deLEx0T6
nyLFSez6yhL2WC8jC+bR9yGcRGL1vrL4cAlyPJYdeOKPz4hjPi+Jr5Ekt4K0
6PWTn1EZ3f3xyYAUuZG82j7g0BRODR0OcVRZTtZxBDbRHVNwGvBkqhpJk0zL
Q/X1xnwMZU25rnSWIfNvqiemMvkQvSjWfipGlhg73AzbzpjGHpnrfywt/4Hc
YH65YRw6DaXfDtTMnJEjVXpWdhH8aThGrD18VX4FWcH+M/kg+ws2yW9Jq7y9
gqRt37gzuOkLWBkiMkqQJ/1Rr4+aGnyFZLQc418d8iRT3+diWtpXXHMZtlh9
RIHYTWUkqkvMwOOX06lsoQIRMOy5Oadn0OZmHW8cqUh41bSZ3uAMLiaNVFlq
KxHDkwUy21izaNOu4o5VK5HWeYshTs0sJpL3sfP2KhNrT+UwX6057FcrPJE0
qkw+W0xLJ92cA/OT9RqtQBVyJsOocb+kAAlPcub7lRnk7bHGK70hApRG8WZL
ixlkITy5XV4gADtTN1bTTJV8NZ37vpYzj0NNzIN1r1TJuKH/k21j85hA6QOB
30qy/NLpQne2EDYpPVYsETVSp1pdO/RSiHnxh8LniWrklmi+2fjhBeysH7X9
soEioule+UFDCygojNjD3UwRQ+1RybqRBaxJ0rZYuo0iA5V9hZJvF7DsFMdI
UZ8ikb21Q3FjC+jUmtTRM6VIYdSVzgr+Ao5dmZE4aU+R5mc5KuLiNBJY4nXT
5yji8cJJv1+bxnKTzNqgEIro5uvYbNhA4z86VpViYRThmjCLuZtouIldLlKI
oEhPo57Pqu00tpRLp26PoYgB91WhuxGNxwxFbkAmRdTSDl0QY9LYIV5+RphN
kUeSZ4sdWTTypuwDwnIpcqc3cGvBfhoxT+KPxRZRpNr3sc5BRxq/c9WcSqsW
e/dukqhg0+jwqvltZy1FMm35bTJuNMztXX6tf0CR8ID3H9w9aOhsSrXqalj8
q1HUVOHQSF5Jdjk/pojFcKqJnw8NOYlhk9fNFHHfLFHQ7EsjbDp0B6eFIlPs
U/5r/WnMDP74y3QrRXh7lSLPnaTxP0LiQzI=
          "]]},
        Annotation[#, "Charting`Private`Tag$35181#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk81fkeh0nCDSPrwU9lMhVKkRkUvl+ylOTMqRHC5NivY4swcrpIloS5
UZisJcvY97L1EUY4slWUJUuLrcKxHsevbveP5/X+4/nj/Sg6+pxz2cbDw+P1
nf/vWbtBCVwfoZ9cMdNSzXsYhhV+GntAcURtAv6u2h1pcHjtoXsIxQ/JWKcJ
KebmgLf9I8dcpRC0PKBhGP5DAVhNOZe6Ua6jvwbnTkV1FMGGlHcRMzMK3dHl
zP0sVgapp4MKbivdQpywjolKvgrwfG3Ub09JRGKandGQWwW6fp1Ud9s7aE29
sn1jsBqEhS16/DKTUYmF0WTJeg0UIytWtFIayq0c2l0j9hgCX1RPWVMeIM/b
p/77764G+H3vuuJbnRy0RLlQHJPbCCZeOnQn24fo/hu5qF+vNoG0wJNxr8w8
JN+xWTIuDlB7/NnodaUipGOtdzmA/ylw+zwZFyiV6JmmVn5wQSv4rovslP27
Ell9rQzPXGuF9wplhSM6VWiHfsFQysk26PZYmnWwrUYqNM/UE8NtkL490J2R
WYssb7Gcw7n/gK52qEuYUgOidcqkNEt1wJPejiOWlBbk/iQlQ2uABZluIVLP
XVvQj/f2WQeJdkPot8Nco5oWtEZSLLTNugEfSWrXPNeKEhtMsFlzNzxNsLeX
jGtDAjKis2Tec2g7y4598a0dXRsVbXvu0AsslvxH2jQLfXHycW443Q/FTj2s
zp+70VdjGVlpx36I44ZVGNzoRvUJfOHUq/1grvqRqa74HP09cjbBobAfemLL
JXbZ9iCJqJoBIaEBmH34YK+7Wx8KF7WiTTQPwCcnLYsDIwNoqnj4FE3hJRhE
Zhd0fhtAnlZzOUtHX0JynhCfp9IL9JSRezXU6LufHXlU7vUC2bRs83VmfPfe
YYrHeV6io/lR0jaPXwIK7lwx/+kV8o55bCpDfQWJCbZpfj5DyFlqZ5Lo5UHQ
rgudaeIbRf7rt1S1E15Djx7DSjV0CtWEjF1jG46C22wtZdJ+GlFjbrwZ7R+H
LAOS5TQ7j2zusE37PCZhN7viywHGIlKzOai1//MUVL11v757kI0iQtSpJtT3
kKqo8GeIzCo6qUjXDo3+AOU3J83ib64jDQOtmJbOj0A5lRPKP8BB0SaL/TWz
09B+3x19Fd1CZWYmM4WcGcjfq19axPyKxtXjdJul52D+qiDrkgMP7n5U7ZpM
mQeFjWDptnu82EfO0PfMwU/ANvTKd+/dhofe7Ynfc+gzLGiPX8ELfLgn1N+X
V/YLRBq8+cvvAD/20hf+p1xyAU6u0rhDZjvwllHCE8RdgLSGc9UpUQLYO4ke
fPmPRUimvqpMaRTE90P2kwcXFqEuYfBz15gQvpuxx9LfbgkCJi6FWcvsxAcY
HPOE/iWwGXOjyuoK4zwTu9ZWPTZM5C85ydmK4M33DfNLeWzgjeTrC0gUxXpW
9yKOUZbhtMidP7bX/IDvUlfu6oUvg9RvFxrXgsRwvaapRQx7Gaxj9l26Jb4L
76L/mXGRvgJq4kez6x7swtnHDp8I7VgBWi6PiBQSx6Px7xwNtFdBMEGM8q9+
cZyn5RWZnb0Kt+0njfc4SGCLpdw0BYE1cP0lMIvOlcAciiWzMHANep3NUvTi
JDGrgTTUHF+DyPSpehNlKaxzpVREg7YOvcr1zNkGKdyzaTzBaFyH+Yxz9OIz
0tjMTTrCZ/8GnJcvu5w+LY0XjZeF0+9tAPWL2d79wTI4KFe3/bwgB1K7CjdH
pSn4g0d77HAYB6riWetVFRS8FZXRJ87hAD1PNUnJUBavGmx828fYBLsO6sWW
t7J4TsevS2N2E+ZRFXB85fDO6MAyFzoXzDOHTGk88rhFtqFp4g0XNvmbua/S
5PF93hLDuUtbcKJ1+uzKIQLz5riXhExsQWlZzGnmEQLrKE8Ltkxtwd50ZePt
GgQeqxspE/ywBTsCGLqSWgSOG26aSJ7dgoH9CyqaBgQui48dqGVvgUfsmsAV
SwJ3viyU4ecnIZXG37J8jcCur220RpVJ2Kmf1xQSRmDVEhXzQ4dI+I+KaR1f
BIGZ+tQKphoJznw3yyViCDzUrum1+xgJR2uEs44lElib+bbMRZeEZxRJpn8e
geWz7W7wUUk4zl8TxC0g8FPBqxXWNBKKlyz9I4oI/HA4WL30PAmJXSkeSeUE
bvB5pnLRmoTfmfI2VfXfe8+oCdTSSeh3b/ztRBOB886ye0WcSTCytP+1FQgc
5T/zycWVBBW1LNMXbd//GiWVZBgkZMjhk7bPCGw8maXv60WCmMCk/rtOArsc
ESjt9CEhYjn8OKObwEv0AL99fiSsjf/4y3IPgVlnpOKuXSHhf3QqebI=
          "]]},
        Annotation[#, "Charting`Private`Tag$35181#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0QtMU2cUB/BraW1ZC5SHbUGpJSaOSjY2NdqZkHuRCKK4YN0WNpirxA2z
bBmRichiVqdClrmUDKzMsdgEAzEyJrAZBB0dGW2XsBHQzQa62dYHSgvlUQrl
Mcb5X0ka8ss5//Od734pxZ/o3xcwDHN09Uf/V/8sWV/dZjvV5x/mNHX3rNrw
cZ+NLTL1Zk6IeuEzwr/IaxLG/iBbus0utjXH80qDdYjsdktHyfknTMNkzSGR
j3xD2uYicw7xJHu/sbTeIXKTGUHaNFk3V+ZBvkAZRH1ntRf9h7tCqH8w+xD9
lyVhsjPV9wjnx1QukgsE2ifot7mWyBWZAdhQ2LYC76p5iv66xwxHtlQ/w7yG
jjVk1T3tGPqVOyPIzl0rPriNFZILMr71I58lFaE/QjyOfeOOryV37rgGG66k
SZD/sCuAfUr/lHD+gzrZ7tcn4eOnIsktF3thY3adlJx3L3EK841NMnL/wBuw
ZigQRf5ojw3m6kLRqEsuT/fwTyZH3iKZQf5UNeyXZ/OuiYnF+W+bYWv5L7wH
yoOo79kRh/mD8lnMD3TCeb4jsHWQi4dPtsDM52OwbKoshP75LxLg/U6Y6YtZ
h/t5s+eQ//US3J/UCrsrtAr0O5TzOF8lVGL+SAXsttfDMvXmMLw9XUW+kHYC
1ozcgvP+aeTrgtxEnJf5ALZeGYZlrrcWUD97OAn5o10wVyxf//y+i5inK4H7
H2TATLlmA+z8l7fgOu9NuiX0R7nvsFdLM9TT5gGW3i9ZZ2f1nWpT/ctDZPf9
MyPkdJFimMy05XvIP2b4R8icp9KL/oh3XMi7G3ystshk73nXg/qWawGyeOCY
F3lt0TS8lPQIfqk9iP5t8Y/Jmt6qEHm00QNbnO/Nw6/VPcH8V08ukEuu5o9i
v+TmZXLzvkLYejqZ4ajOnXuGerMNrv7vpzHkW6QCsn0qy4/6kZQI8otCO+/J
IFxyeuM45uXKROj/5jqsSdm4lix2RE5g3qUJMTnny3aY++yshNz8e18AeUd5
JJfQai8LpE6SDbnfS8mHFrthLvamjHxXIp1CXe6MIndM7OOd6I2GW5tg5rZI
jnxw9Tvi/WvgbVW3YKteEUuOb1fP4Pv9ZoFnbuph98WtcbC+CjbWOuGyO7uD
mHfuQDycZ4YtW5y8x5dha6EhAfnhylnss3XzOnJtMRPC96lxwzM/OHgPpSuw
f3gFNkaZFM/zc8i7lErcX/gzbDCnqODlN+dx/gs2uCM5NYz6/r2J2Ed1HjYe
G4Tv3hgM8+/3aRK8YlzAff4WrUe+/8Ai8tuNcG3u17xNgg3YJ/oCbJF8x/up
bon9H+0ieHU=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzXk81PkDx3FHrORKGddXRTUr2laiUNP7k3Ik5yyi+UVrHdVEB4ra6pFj
k0X0y1XZtogStYkRSa5yDY0mEZKoB6F1jmPyZXf/eD2ef750fY6y/aQkJCQC
/+0/Rf1xVna9kdvHtBY/c6g0ROrD+OD9LB8MBF69djD5Gs6umX1gyjqBbgmj
OHP+bWw4bphVxjmDTjHjcL9MDka7H/B1WRHweJlU/ik5F7tlbG38+L/B1Xtb
bnBJPm4bfqy8y/kdC4E//7xg8xcMyi51qrOu4I3v2iD1pgK4O71NK4m6iiNG
Z923jD1GZK+eO4efgtjwY1djZYrQJVcm+INzHX1i8YrL3xWj1mC6V5V1G8Q6
d+3ptFJ4hWRU9h3IREukruH2w08x+Wznn4VRWVCzffl0zLQMq1wS97vzs9G6
49pPjGfPEHZqXXs65z6+Fb9I8bOrgFpvvr8KqwCl5+iGJkEVemQl3840F6DG
PtDpjnY18gxdrT4eeIyP715EePlVwzJUvLogqhAPKjz25YiqESRn8/EnPg8h
4dtXPpd/gZcbejipnKcI2ar4C1epFmWsS/rKrCq8l/mBychswCbzYBdmXBUK
nO2727oakGuy/zSrswqjgwYXVzEakWa4kc8Nr8arneah7IuNCNZ8d7SuqAZM
m+/Ho3z5MBDpF1/YUAtd57UPTRWakZZXZzW5kg9L7lBkY4IAyncLgpYc5UOq
eMsRg2wBfsu8kapXzkd4o1TSoWcChFw79sX5f01Q6Mm6HjskgFOMRnx+WjOu
xBrv9rNugbSxyeHHMQKYSn+o/TDVglLFqEdHJIWo33xNdM5KiJnADH9PphCK
VrSPp4cQm5t52tZ7hHDau229HleIgoQv0SuThbgsqs84nyjEPWWnfa/13yA+
iO95tEOItKVa0mbOrdjXsdHJjvsGoWp/uUrfbEOkw/AJuYhWGOl0Tadv68IN
CfuxW7Ft6GO+kuNl9WKC/ehQDtWJnQLeOsf4fvi7aIkZcd0YqTfwltcbxiGP
mNf+T3vgkct+czpuFIdV7MVyxr2QDBvM95wbx/BLkRSJ7UNLYF2SnaUIHb9f
f3G89BMM8+4tsEumYR996d0Pos/IU205FSgrRrbhSI2Wcj9CJIVrxmzmkHDu
lbys1gBqzdo5caXzaGldthBn/AWr+EnNNy5IEJuASbNxo0HorTI3OV8uSQqL
uPdrWEOwfeJgkvLvujQxeVUqhnHBN9qcp76IaHp//9bF8CsWCsulfdgyRKqK
/T6a+TcSNbWFjDBZgvluDw/FEQTohQfs5X1H/h8wuFlGahQ+R3el8P+WI9oH
IrLuhI/imMC4wU5VnnyeSurXGxhFdatetavjErK2ccbiq9cY1o2YVgaEKpAY
xq6Ny5rG8Nie5/kwRZHwduhxL5iNI9LRrDhCoER0cs3H0/PG4e/7XtNbpEy2
Kkm75WlMwEa56s9f0lVIMnVc40H8BAKV+JLGpktJvXKZX5rEJDJSAz5HvVxK
QlTmxqe5kxgZj7yv46tKBmhOdm3PJPa0b5y0mFYl2nKX/dmOIpR4M2JPXFxG
9hSXbmWXimBXckZqdPVyYmi5VtPLaAqfbpygx4qWk3MJdVrhN6dwiz3YYe6q
Rh7umy9epzmNgCsTFrIDaoTr0bSSGTcNhGwaGA5jkMsaO6vc5qdhoT95SpOh
Ts5MKU0v/nUG8LeObbirTqT3+HU4TczA/6Tm+UobDeIytBiik7O4qb+68nWf
BlmcfFBjSDyLXt/y6IOhmkQ9p+ftkzAxbIM71u9apkVGGDVPuIu+oXhJjHtW
thap+Kyw1zr2G8ysjzSt2KJNIvbucF+6dA5d7BbmB6E2cbaTTnyeM4dLX2ql
1vhT5MegkvFZMxqOMsm6jw5SRNVnwDF+K43luj5kO5ci8m1aSrrbafzhMXfW
4xhFVIItebt30iisNZqNO00Ra5n7BTcdaHTfSR8RJVDElZkd5eVDY5MPt6u2
mCKNrefb9eNozJw1++ZaSpEDKczRugQa5ekyWr1lFNmfWnnsUBIN25abe+cq
KTKil55/P4WGF3nz2ohPkbZMU23TWzRiVrDq03so4jtTNMbh0XCwkB9g9lHk
V07/Q6kSGqrubbKFnylyj7W+495TGhnxx3c1D1JkflFZ8GwFjYK5O8+lRBQ5
7BZbkdFII0wjuPvyNEUkcr5+smmmwTIhNCWmyHK3+ZPjAhp13A6LLQsUUaqf
+mT7lkb8xRzPGkkdwne3rpxsp8HODAlzWaRDBgWqCrc6aWg835HaLatD3HwS
Xzh003jfocTjLtYhN9gTX8U9NP4B40BEGw==
          "]]},
        Annotation[#, "Charting`Private`Tag$35329#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzXk81PkfwHFGLHJX4/oqlFnRthKFmj6fyJGcs4jmF611lAkVitrqkWOT
dfbLGWuLKEc2aUR4u8+h0eQISeRB0jrHMfmyu3+8Hs8/XxqegQxvipCQkP+/
/Sd/ItbcejTiyJyKRLVtnS6klsQFnaZ7okn/exlnkzPg+q7Vp4b0S2hYSC/W
mPMQ9l7Uza1iXkODAqrfhGg+zA4/5WjQw5Frc1LNp+QCOC5qZenN+Q05eRwu
CKoohoe6H+seM39HG/4//7xh+RfoVN0ZVKTfRW+9tAIUO0vBxb43rSLyHjqv
d93l4NxziBjVdGFyUlBM2IV7MaIvYEi8ivsH8z4aEwi2J3xXDi06y6MK9IcI
WxRoXU2rBPfgrLqxMzmoO0JD94jfK1isNvuzLDIXbbNqfjVnWAXqjomnXTh5
qOdoxk/U6moIvbK7P51ZiL6VN6V4W9fCttFiHzl6Kaq8QbZ3cuthREy4d6Wr
FDXa+Ns/Um2AIl0n849nnqOP75rC3b0bwDREsLM0sgw9rXU9lc9vgABxy48/
cdgoOOzIDpBsgua9I8xU5isUfEj6F5ZMC1TR72jL0uvRe9EfaNScdthvHORI
i61HpQ42w31D7VBgcPoqfbAezU7p3FandkCa7j4OK6wBvTYzDmHc7oAg5XeB
rS8aEc3y+/lILw7o8LXLb+1tQRoOWiWGUl2QVtRqvriDg0xZXyI64rkg+7g0
YHMgB1HKD57XyePCbzmZqZo1HBTWQUk6V82F4IwLnx3+14mkRnLvx3zhgn20
UlxxWhe6G6N/3NuiG0T0DfyeR3ORociHlg9L3VApHfnsvDAPtR3I4N8w58GK
f5aPG42HpM1JTzdXHhzoYqtanOAh+5OH92iyeFAa/zlqRzIPJfDbsm4m8uCJ
rP2pN9pvUVwAxy1wgAdp8ioiRg496NTAPntr1lsI2faXk0h2H4qwnb4kHt4D
empDy+mHh1CmkM3cg5g+GKO9FmfnjqIFxrNz+cQgmHHZu+3iJpCPo4qAGjsM
M206HpKa0+ica/Qbn1cj4FrAeHs1dhb5ydkIxPVHQTh0qthtbR5NN/MpOGYM
uv1bk6xN+Wjg9/tNFys/gW7Rkw1GxTKyibrz7gf+OBQpdF/xFxOgPN2ZRhXZ
CQgW5u2as1xD8TdeS4qpTEKLUT8ztnIddfds2YjV/wzqnKSuzFtC2NJ30Whe
bwo01Y0NbtYI47IXrMJG+hewemlrkPLvujIxWT0VTcMtryhjtuImrOzxfa+j
7lfYKKsR8WSIYko9430U7W9IVFblUUPFMFofdnWVngFfzTDfk+zv8P99pw6I
UmbBM/BYCudvcax6Jjz3UdgsXODqt1srSOLxpaQJzclZaOjRbHCy24y1OlZM
vrrPwe4ZwzrfECkcTT22b0vnHDy3YbuVpEhj9lFN1i2jeYiwMyoP58pgtQLj
+fSiefDxeq/swZfFh2REnIuUFsBStv7PX9LlcDJxUelp3AL4y3CE9Q3lcZts
lXea0CJkpfqORzbL42C5tfll1iLMzEcUqnkp4EmSmdcysggn+vctmiwrYFXx
BB+GHR8qPKgxl25vwSfKKw8xKvlgXXGNMrtzK9Y11VJ211uCT5mXyLkXW/GN
+FaVsOwleMCYGjB22oZLTq2X71ZeBt+7CyZik9swy7VzBy12GVDw/snpUCpO
UDKrd15fBhPtxSvKVEV8bUlmWeLXFUA+FjHtjxWxyAnvAfuFFfC5rHyzzlIJ
O36RQPzLq5CtvbPuzZgSlkg+q/RFsAqjXjVRZ0OUsWL+SO/LUAFYBQ3sObZF
Bc9QG1+yNn2D8s3RLrl5Krh2XOqkRcw3MLI437n9oCoOP3nURV5+DYYY3bQP
PFXsYC2SCPlrcOdzC2WXD4F/DKiYXzUiwU40WePZWQIreE7axR0iYauGJz7C
IrBkn4qMxhES/nBdu+56gcByQabs42YklLXorcZeJbCFaGFpti0Jw4/SZ/jx
BHai5UW6e5Kw35M11FJO4I6em/3asSSsXDf65lRJ4DMptNnWeBJq0kVVRqsI
fDq17sK5JBKsurNPrtUReEYzvbgwhQR3/PaNHofAfTmGqoYPSIjeTm9LHyGw
18qLOSabBFsTyUnaGIF/ZU6UUCpIUHDpEysbJ/AT+p6BJ69IyIq7eKxrisDr
m6qCVmtJKF17BBQ+gf2cY2qzOkgIVQoaTlgmsFD+10+WXSTQDTBJCAi81Xn9
8jyXhFbWgMnBDQLLtC19suolIe52vlujsBrmuFjULfaTwMgJDnXcpIanuApS
DwZJUIKjqcNiatjZM7HJdpiE9wMybJaEGs5kLHwVjJDwDxSXeps=
          "]]},
        Annotation[#, "Charting`Private`Tag$35329#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt03tMU2cYBvADAkFAKCBQKELnQgdhG8IYMwF2ChN0G1VTDEsZmycEENyI
iNuiGB38IU4SrsYtuEQ76mo2B9NdsGzAGpaVuIpgE2CIkAPj1nIplEsplTHe
pzZpml/f93u+7/3a80LuKXm+M8Mwedtv+tx+cSqndra2azWyMU/zB30RldPL
HhorW5l3f0AWZ+cNs7dKkp+8bTCQuYXscXLZvsV+cvlw4QQ55N3wQfTff2yC
c08Mk5WHpWasbzKOoL87ysLKNWHFcRoe9ff+Xib33LwwhvwnojXyrj+7x8n8
qeM2crVL5ATy75baUf+oBuZfqdsky5RzcHnCnS1y82HVJPrXgpyk1J91ehr7
ZQQ4k3uKUmYwb7JoB7k6O8GI/paDLuTmpFoT8gsZN/J8xcAc+uv/g3fJpufh
s57uZNnI5QX09+3difyHMWay1prpIY3KqZ0qkSwin9V5kiWpGof3T3uRC7Y8
ljB/PONNruw9Ams/8fdBfVYP87K9AnK6rNjiuK+vYXV/H8wsRPuif+LjZcw7
/wxOFxhgfv8lP7gzeOX5ef3Jbr53Ya7/NqwWpKziPo2S3aibf4LFKffg9Cwr
zCefCyDr2o6toa7vgwuG7sPaxJpAzH/0mBXnqwoPQn79ACzOUMO6ay+vo7/y
JSH2+67a4eUOWHJ+E5aeOBCM+kymDevrxCHIV4zC3IUW2O2X1A2c/3aQCPk3
WmGmrBVWX+fsyHeVh2J9k9cz5H3aBetiOZhJLOlkNWGXomf/esTSvDG/97I5
tV1pvx4ZICvzvxgkR3z5/hDqVZtj5MkrilFyuWF0im05OOZsL+RRP11lIvtd
jBojM2KDmVz6zuVxWGBcIjdEVPxLFm+uLZMtHvIJ1H8ItZLj3pBMkrmCAhtZ
XhU9hf7Ii3bUjzbC0qSOTbJhMGwa6ysCGCn5kH6Gdfy/nciWt74y4rxXhc5k
v5gyE/IyJDvIpQ+WHE5IciE3vH5yFut/VriiXxg3h/tQrrshf8+BBbL23qvu
ZPnDDXj7eYUb0jLN2K+l1UM6qCppy/dehMe7PcnGp4mw2GXAi7yzqBJW+kZ4
o9/tsyXkywN9yLZv9DA3KRCQg612mPntOtx25zUL9m9/0Re+kQkzHzTDivAy
WFsc70ce0j2Gy/mnsO3zR8uO82T5kxtPpq7gfmeG4LbIMzDfl7sbebE1Dlec
CUCeegtmOhfhc6aqVeQJrwWi/0PpGvq/FQXBPvWwsknlcFoPzN2MFmI+k8jq
+P20sKLjH1i850owzne8eh3rb3mHYP83R2DOVQXb2otsOM/3saLn88J8/I+w
ok6yAav2haJ+/iys1Olhm8jZzv4PCIJ9lA==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVj3k41PkDx4dSw2gwM4rYx5GnpVaHo7Jp35+l5CcP6VA6FNUmlSkUylo5
QjRdijbKzaxIEiO5KXLkZpFBpFxhHF/9GD+/P97P63n993prOHL3nZGk0WgX
F/d/qruEutmaX/st6rLwdNU6HTysf540pXIYRjJnuqtWR8JncEGxWMUJgVUf
P7gwYqGcfeB5KccVB6+FGet2J0B0lV+TpOIJObmKYWmVFFRvFY+GaPrgaZ2z
yT3RP9jvrROczfFD81YTE3IzDbo7fPiPVYIhH+3sMcZ4ib+jtX9lqIWi5qDt
TBEnE8vEDR+8NXmoPGbbZSz3CpeE7OkXnPvYs6A1oNOTBYsYp1UPVCJBy0sc
eaQqgG9dvnBP9GNE7Y5dndkuQA6NnbJU7QlMwtZUWz7IhZZD/rarmk9xbM7J
v3jqDRbkpdOec+LQaDzbqxWSj3/rj9feWex+Zx9tsoFZjMlzwXoXOlPA84Pa
rE0x5CVfPTKP5oOxy5xTFF4MMz36CQm1VFRXveZwV5Ug837md1fNdHwxW9bu
wCrFO74/PXXxxxArTtG6vwwxzm06PBUBHP/bwaStqQDHitmkFCCAkuWwpOmh
CgRt3ukTPyxAgLHlxKrQCrhQLxoE+bnQG3C+4jdeAeObQdc/n8gDv2lU91lu
Jdpit9RsSyhA99tvCa3bqhB8wUJw+VEJvhO9jn5xDUzsz6zI+VAC1s38eC2d
WsxZ+zrOiUtwMbQoSmd/Lbj62bJBZ0vRdI7XEpJUC9sfGg5R28ogs9ZM7q3F
R2gFz0q/by+HUpa+S83OOhTFpxxVVatEsGqj/6xrPVzEyaOD1pWwm1YNEPvX
4ye75Bu5vpU425x7SRRej2vMpGTb3kowpJLfp2XXw8ArXnQ38QOaPbwszs3W
I8XqaajUL9XI8ZtgqHs34N7sg7zRbR/xe4tKaZhHI14mF94+yW+ABDey/I1l
M44byQ7fSWjD6ZlIAwX/Njj97lh9U0OI34od9Q9HdkAqKy6rIaIX/lG/Hqsw
6EKgpHJZubAfxmE93HanbohGC/edVfoGEpEmYfakB2nOaYVRysOwOh2xx4Lf
i0exz0ZeH/2OrBUeBo2Fn/FFf9h7s/441rmNHb0l6APVH2MizJiAJMtdyzy+
H7FTrV/FVpP4Lnw8r/P4C8Ys9Xyc6qdQkH5y6KjHAFol5CZN3Wcg5dr8t4XD
V7yWCuBflZsFM7izpZR8g5GNqpWI9wNXUqsCzGUHceDHlsaeDXMYDp/PNO0b
xMoh992rX82jpcE9uZM/BK6RYVTZoQWcsok+stJ7GCeGzJROXaORNo4/bdZs
BB2flrbTt0uQlef3plyWGIXmwpKwAYYkuTOAmb6KURiXhRsO1S56YuvPLb7f
0ZAx7rOat4SoeyrR45XHYFB9R+B3fCkpKVCb/tNrDOdCC7/JqUmR6CKlu7oN
i+61idEyJkVK/gq9Eb55HP28i9XvC5YRhuXdTzG8cRiYGwd2+SwnGfdP3pjp
G4f1JssNG6zphKUuc8jQZAI73o7UxilIE+W93ITZyAkkcY/KmdZJkxmmYULn
yAQ6bGSI6jMZUjz/T4nwPyJ8brVwWn2SQS4kdr7JeSZCTli1r81mWZIQ9Ci7
a04E+37h3bRJWWKsTdtOPzAJ3zOFxDBrBQk/Ypmez5+EC6e7e8qfScLP65kr
LZ/CxrP3PTt2yZGPwtbT6fZTsJ80oc0z5InubpquYcEUeis0OZpu8qS8Q21t
nuo0rLlV8XaN8oSZkTjw/Mo0NNPCU9O2KxDVdamJiq3TEL5du5ETrUAefo1K
ZurPwK77qd/dOQVSvitQbM2bgdGTrVY6p1mE/meAQcbEDJZoP37YVMYigQvT
PRU2FGSva28PeMci62lHet33U1hZm9OtX8EiNe8vSWgcpKDj3rL+QRWL3Mof
f+J1mIJ1EbvEpoFFrD9+MP3lBIUnh3mjtUIW+aS45XzEBQr6If67K3+wyE5e
h3dgEAXjTtaI5xyLhETu4BqGUDDbGHdfW8wiY54/+fXfomDXXPQpSIJNrh64
J23Go/CXhtjNjM4mfe/6YugPKVTlesaUKrJJu9da8YM4Ck2ydDO3VWyS9MJq
YVcCha4TEUOaymxyz79Hg0qkMC6VvcVPlU3+EPlVHeNTWLVPVE3WsIlsgl3m
zxkU1BP9XMe02ERw8HpR+0sK6ygFpZi1bNLL9B27/YrCjqebTi3osEmmATd7
Mnuxd7yQ/mI9m+TNe1imCCjs3Wmdbq/LJsuDYpYee0PhSETXfuZGNsmQpbrk
3lI4NXhxNn8TmzjU3e4ozafwP20RUKs=
          "]]},
        Annotation[#, "Charting`Private`Tag$35477#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk41PkfwIdSw2gwM3Lu48hjqdXhKDbt57OU/OQhHUpEpE0qUyiUtXKE
aBJyrCM3syJJjBxvZ7nva5FBpNyM46sf49fvj9fzel7/vZQcmGeuCZJIpNs/
+L8VXULdLI0f/JZwl+vYtFcdXnS8ylyRu4j0RK6NNMnGgs/UlmSVnBMKbGpr
dKGkgEzRuVc1DFd0/kGYvsZIOvDus1sy5TyRmFj9jLBcNjQf4c+FKPugpHZn
g+e8f+Cst3pwEcMP9RwxMMCPc0HjmA87Ti4YiSc6eyxQ3sDfiWq/UhRCUct5
y7VKRgHs4Hc2eiuzUION5bC+2Fu4w6WvvmZEoFNbKpPqo4VgkuwkFSkXi0il
GbPR8hzwbS/nnkqMQwknU2QLBjhQTKJnb1eIRwZhe5pNI0tAxb5c975yErLZ
cPKvWnkPW+LCua8YqahLf31MJaQc/u243PpMLht9sE002E+tguUbwZq3hrIR
yw8prFtUgbjg22jjRDainDBmVEZVgZEm2U5AIQc1N71jMKWqoSCiYN5VOQ99
MdoxYE+rgQ9sf3IOowBN01IlzSdqIdm5X50lx0EO/x2kkvbUA8OM2i0dwEHS
pjOChhfqIejQcZ+0GQ4K0DddkgqtBxfidSenvARpTjrf81usB/3HQQ8/25Ui
dvecxsuSBuhPOdyim16BRsq+pffpNkHwLRPO3ehqNI81Byf4LWBge21XcWM1
oj0uT1NRb4UNc1+HDX41uh1amaB+thWYWkWiQddrUPcNVm9IZitYfleyT9Ct
RSKqRmJlJm2gErwu/HGgDkkXarm0HG+HyrRsa3mFBhQs3+W/7toBLvysuSnz
BmS1Kh/A9++An6yyHpX4NqDrPSV3eFEd8ICamWU51oAoQlkfc4s6QNsrjRee
0Yh6PLxMbqx3QLZZUqjQL82o2G+JoujdCc/XI0vndNvQ771yNWEeXfAmC55e
YXciAWZs3XvTHrisJzrzLL0fOa7Fakv494PT7w7Nj5W46LcqB62LsYMgVJha
2BkzhvwTfrWp1x6GQEGZ2jruBNIPG2UOOI0Abw7OXJf+hnBMroBR/CjkOudC
gswMMnOMOWXCHoPolJez76znUeEuD+0u+AxftGa8D2ktor1uC9ZPOONATCQb
cPOXkCDNXcU4bQJSVvq+8s2W0Tw3blM97gssmGr6OHWsoIq8K9PWHpPQJyC2
bOi+hoRce/42sf8K74QC2PfF1hE1eKi3Bn8DPQt5Mx7rO7qX0xRgLDoF574f
7hrdv4FmojYLDMenYPe0+0nZt5uot9M9a4g9DUw9nYTaC1voqkXipd3eM2A3
bSR99QEJ9zP8SetGszD4afsA+agA3n3zdPZdgTlQ3toWNkkRxM8m0dp4/Rzo
10bpTLf+6Iy+n3t956Ezf9FHlrUNK3pKk9NkFkC7+RnH7/J2XF2hsPqn1wLc
CIVvYgpCOLFSOlyj80d7HaT0Lgjh6r9CH0UdWoQJ1u3mjxU7MMU0/FMyaxG0
jfUDh3124vyIK4/WxhfB/KDp/v3mZExTFLmgY7AEx8pmW1MlhLHMaWb6euwS
ZDKtxQzbhfEaVSd9aHYJBi1EsPxLEVy1+U819z88+Nxn4iR7hYJvZQy9L37J
g+KwZl+LQ6I4PSi6aHiDB7YT3PDcZVGsr0Y6Sj63DL7XAOsU7sJRl0zzytnL
4MIYGVnxp+Kom5rG0jtX4MD1CM/BE2K4jdvnmGe7ArbLBqRNijjWOEnS0KlY
gbF6ZYaymziuG1RQLZVfBXNmU5pVlzim5mdMvrq3Csq5UTm5RyWw/N6cDMm+
VeCWqR5gJErgF18Tsqhaa2A1kuQXviGB604E8s1Za6AXf8RM3ZGGyX8GaOcv
rcE2tbgX3bU0HLi1OlpvQYDoQ7WjAR9oeB/p0pj7WQJ2txaPaNXTcMvHOwJK
5wlQd+/dF9lEw0/KF+O9LhJgXkmvtuikYfO2RsNf7AiIv8iaa+XS8CfJwzdj
bhGgFeJ/suE7DR9nDXoHBhGgP0Sb9dyg4ZDYY0ydEAKMDqRGqPFpeMHzJ7+J
JwRY9VR+ChKg4/vnngsbsQj4S4nvZkSm4/EP48nkFwQ0lXgm10jS8YCXKj8y
lYBuUbKRmxQdZ7422zqRTsCwXcy0sgwdP/cfVSIyCFgUKjrsJ0/Hf/D8mmzY
BEid4TXjPXQsmm5V8HM+AYoZfq4LKnTMOf+wcuANAXsJCelkVToeo/ouPH1L
wLGkg1e31Om4QJtZtFz043cRyK/30XHppodpNoeA08fN82w16HhnUPJ2m/cE
XIoZPks9QMf5osSwWBkBV6dur5cfpGP79qeDNeUE/A+eWYcr
          "]]},
        Annotation[#, "Charting`Private`Tag$35477#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0wlIU3EcB/DndGqpaWah61qUFtiJsyipPao1Cis6sBKTaZaWglFiahHr
pMjowCK0chJdZha2xFnWrNhmrix1Fiv1aXMzz3msY5bl7/scjB8ffv/3v977
zohP3bxbwDBMwsifKv1s2WXSkeIpya99OVIVw6tekbeXFZnIbOLqj+RrPo1f
yOKqtjpy4N30RrK2sKaRHPM2kyNzTVwz2TvVAGsLZBZy5IoFrZhvQpyNnGI3
fsN6S9UdsF9+G1k5+KWbbCyrt2K8a4adXDT2vA3zLZ3ZDz+c3o7xtU0DcNh3
WDvbdxDrZ2yGmeF6B3lurEsH+kGbfpK7QjJgLivgN9ZL6OP7CYVO7Nd7bSfm
v7vtD/oeJ2FOMGaYnH2qABbry/9h/Y5yWCUrZVia/5MB1govu5Ajk1v4+TTJ
AvJczaoujD80xRU+ewZmbyjhFAfTDcvkbmRjZWwP5jvvLiR7h77nbWoQjo7v
xXlfPHbH+vYIWOHQeJAbYt3ssP8JT7JujgEWZ68bg77avw/n0weOJadXzIPZ
zM9wVLQUZiLssO4vC6vC33mRf5h3w+JivTd5kquF7yvv+JD3KC/3o98ZP458
J7UaZsPCfNHfwvH9LUI/9Ce38335ATjkcC/f9+H4vtc/WJFmgSNzln/HevK4
8ej3hA+gb3sGrzlYAiurAvzJ1rx8WFX9EnY/vmEQ5+e8JsCyJ7xDFiEf2vSK
IqrsuRQ9VZU0pYIqc+loNdUPmheVGPd6pQkOCq+S8vdvpuq3v6RGivuRt1A1
OHKRI+0Oxzeqc8JuN2D81RntVO81L8RzTNS4Tqrt6kDkTLxvPfKR9NzahH3I
W5APiTwU87LNG5GPrZVxrXje2IN8pOlb0Re7H0M+6hfXYV3txCHkQ6K4iZyy
e1ORj7TQR23od91EPuojPJBb7vr4IYy/b4RVNSbkI6ehG/tmM7cjH2lRi5Fr
8SYz8iHJ48+hqqhEPtR952AuKwf5kATP74Jt+wRw4l+YeRqCPAS8kvLrXbwA
qx/s6RndL/IhsSb24v5uuSAP0et8cS+sSAuba/bCXJET+VhWMMT7Sgny4Szc
1Yf9ao4gH9G9RpgrDkY+cmeF4l4V6wfg8jgdPPI9Iw/OaUG4Zy7gBvIgEhpg
5voTOHdlLawKtiAfotM78R4UX3XIR/lBM6wq5fNhbpyN98Ja5yMfoq/JsNLS
z/vwPZgxZeD7z1oy9Qec1ArnesTDyiGn3+jzMKuLQR7Mno9g8Yc38LIIN7x3
5SkR8pCljuFdXApHv5H9wvxNAuTDHHn/l/Q/UzL6Rg==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk81HkDxxGDHM2PeoR2pUI5cpTpqaf1+ZKKUI4UE7ro2E2lUOlgVkIj
YSWLpoa2A1m77rWbqwaLjQ4MciVXDIbML6Ht+eP9+vzz/rxeb91Dp1z9ZKSk
pPy/8v895MOvFsafs2pvPhskDDdA/09XM/p57qhadmBKEJGEDNmm0CKeH8Rr
F2WbtN1FZtdY8xzrNISxFqVRnAzIfCcZvcsLwpTIppV17QHYKfOyNoyLaDHy
iJQ3fQzhZxlVMSsMx42e5CQnZcHcc6FeIi8CdvGeicXtv6JTPtbMzzUKr+wK
Vvi8z8X1Qmozi8HFjst1ey+/+A0T0TFrRlhxOKgxpywdngf7gZ9ILO8WyCDn
FSeqEPeeuguC6SS421Hp320qwvQtDcf9rsnYpH/dqrm/COm2qXvNGKmw5+pp
W1uUYM7ZZcMQ6x6UuVrKbSmlcM/x2Mnl/YKSGldXp94ySKVsjA91eICejmVx
8WblyI7Qen2WfoD2T9UfFE+VQ8a7w9PL9RHUYi2FjkPlyFE64GfCyILEOvOT
5usKhOevezrAyoWv8vGwxdFVaKf+9yaaV4AS+7TQ9/ECSF0L0toxWwD7XdI9
LZUC6M/8un8huxDGim1FhycFONO7avj6kiK0nfy50sWtGgp5ql+4McVw4JPm
atUarN/duzo2pBSFxVscO4Jqsb3O1so+qxwLe+wyOIvqwZbrPbCmrRzWi9Ni
dTbU4wRCwxUVK6DR8ntWpE89EvJKamqPVMD3PyvFJdn16Exd67ZjRSW49UO5
f21rQOCJpcccfq5C/sMLtkMB/4CvMhLvFCkAx96/Pnl3I66kSoeo5QmwX9ZD
PtG3EV5rNA61dAqQo+3jEhbYiKVbbSwOsqpR06FeZpzYiLhLyS8D31dDfU8p
V/jy6/+DrXrallpM/HK1+75TE7xq7yQOf6mDg+HKaxMbXyKm8mHdlj8bIczb
ZeU0+Qpdp8neo5rN0MsrU7CbacZ62Qs6o8PtYGxeum9BnxDBCj51EdndkDxJ
Y2/y7oArZ5ee4M47sMdsMm63diLkbH6VPacfO93YfIO4bril80o01w3Baf2a
xYoJPXhS1dqgpTOCN2PUuZq0XhTrJm88JhTB7tlF5n3uO0Reeh84WzkOTmnW
6Vz/Ppzp0ffyZolx9FbmtRX73qOwz/BUX9wk0v1X8V0t+rGpZw91VeEj2FGa
c9FLBuCb8qf71gvTOCI5d9t6bAD9E33PjZskEJxebP5N4SAe21g+N972CVPp
4lFB9BCemduNu6bPQDf/pZSM4zCWa4VnxmvP4t1QpKGd9gesKJMwxDfmsFzP
KWvy3QdckjG9eX5gHu1uys/FaSPg6mx/pWQqRXotzzf7Hx6FnEproOitFNG5
IGWjpC1CU2vEwMFoaRJuMKT9W4MIVvxq/sEtMqRHN5VsiB1DS/FwwNS4DDGf
9X4QsHwczAZ+tPqTBWQ8IeRYS9g40sqCzlT5yRKFxPw9q7vGsVvaKIChJkcM
DSr8x1gTyEZg0Zt6OTL1prluQdIEzBt46v+9yCAtDjnsCtEEFDf2EyN9eXL0
hu1s41YxOPyKgswueaK/1sIs8L4Yep5XyF8xCuS8QxR3flaM4yov1LzsFEnX
4x+c93hPoo0p/fmGRJH84Tmv/EfRJO6Id+U7ZywkoUsZ3q+ZU5Busii4661E
3PqCvb89M4X4+ek6jpIyKQxYlpnWMIWK1bsMx6uVCVNezvuu+UfYmj/zHAtT
IXUJD2PqEj9iMkrrLsdEldxPdGfvEH+EzVtZ43uDqmRyt3p/u8c0noY1/uNy
exHJXRuXJiyZxnaOl+4OXSbR9b9HrdeSILRcK9T8CpPcFMbVOlyVwOlh7dHe
10zim7w3p3dQgmZRQqhfM5NUq3VFPhyW4ADL6/ZgC5N4Of/944kRCc48FwlE
bUxivXmuY3pMgqR36vqfu5nkZK7JKhWJBJ06Pn3qo0wSncxVIHI0TiaLD2yV
o0iAW2xYmS4NSVfp+RoGRQ7v5POiVtIIM4iIc1CgyB3TR10uejQSCjXKXZQo
cp7/7O++1TQKX2/W8aEocvnLnW3KZjTmmZFvg7+hyHY1le6DVjQiPZw/fvqW
IlfG968zITSY9zRVLi+niOhQYCZtTWOFafbm8JVffckS2bitNLY5NaXeXEOR
H70eHSl3pPEiMSVPzYgiDBIojNlJw6PjcN0t4699C74/7elM4/sfpmdSTSkS
kiKvNOlGY/L3MjUdc4pE59aqlrvTuDQTZZhuQREDo2HWjb005GxcbfTWf+23
DA5ne9KIjdZmP7KkyP35kCmDfTT+BSlhQJE=
          "]]},
        Annotation[#, "Charting`Private`Tag$35625#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk41WkfhxEHWTo/6hWaEYVsWeL01ms8D1HWbAknRNEyk0JIWjgjoSNh
JGM/mBQyZuxjpq+lDgYTJRxk37Mecn4JjfeP+/r8c3+u61Y8d83BR4CPj893
i//vOQ9WIyfhhlFf1/UgToQqTPx0L3ci0wk17PFcYUcmQ65gR1hlpg/iHtxR
pNWbBQWDC10bND/EidOriWbkgsB3vLmszCC0Mm/SQ7v/FOipm4ImlFuoW8Ml
Slj7OXC+CEhyaeHossaL4pTkQtB13a6clBmJzBNck6r6foUB4TgdH4do9M68
XMljvAQeVBCGNAoTWd5pcb7z5jdYiolVm6XFIy+ZDXH+iFKwmPwJx2U+RniK
8Y4RXQHZL53YwWQycjIncr47Wgmrj2WszzqkoKMqD4y6JiohxzTNWYeShiyY
yvLGetWwYWd/eJqWjcSZcuK9qTXgVOxykpn5C6pucnCwGQHgSz2SEGb1FA33
74lP0KmFoki5zuvkU9T3ufGj6LVaEHDvd3VzeIak4gw41tO1UCzm6aNFKUQ8
44LPsp11EFF26OUkrQR5i18O3xnTAH3E/97HZJajaov0sPEENvDdD5KzXC9H
Frb8w931bFBZ+/XsdnoF0hTtrTy/zIaAkf0zD3ZVot6rP9fbOzaCSKnkV2Zs
FbJi4a5GySbQPzVyIC60BlVUHbPuD2qGEy2mRhaFtWj7sHkuY0cr0IVGPNV6
a5HxzvQ4hcOtcAWFRYiK1iGZ7t8LozxaIbG0uqn5Qh3y/s8+bnVRKwykHXS0
VKpHzNbpkr+Ot0Hgld2XrH5uQGX5N02n/f8BlsRsgk0UGzEsfFtTTrXD3TT+
UKlSNjor6CKc5N0Obmoy57oH2KhY3sM+PLAddpuZ6HnRGlFTvzRoJrVD/O2U
t4HjjUj6dA2T83br/9FUOv1YM1r65d5Qnk0HuDVnJM18bUFW6vvuLx15C7H1
+S3H/mxHnFJbI5vldzDoh50vynYh5VIQMV/rAn3BmwpzM32IYrj7zLYxDgSL
eLREFg0h3ot0+lH3fnBg2CqzM0YRfcEk90nPAIReL2uwYEygk450lmr8EDjm
ZFbLHppGNvpqO0UTh+FFQ0+bnMIser9A3GhKH4EqxZQjlzjzyPzVLWoecxSi
bo8HrtcvIkZNoV+J7xgEDKu4udO46OLjgvtKZ8ahYkz92lj8Msrx3c9y0JuA
o8OniXsinxA9WnYjZtckeKf+6WR2cxVd4N14YrwwCRNLY681O3iI7bdT95uK
KXhuYvBa8/hntJLDnWPHTMMrXfNFh5w1pFj2lk/Aegb2ykUUJMivo9HpKHVz
+Y+gBDwK9+EG2qtsU7g8+hFuC2g/CpncRH2O4q+56bPAVDjxTkybD48YhHT5
np8DIYmewPkPfFjhJp+JmPw8dPRETnrF8OMI1Wn539rmwYjVyPI6JoCHFdPw
4bgF6K6a8V9ZFMC66+5P/fcuArWNFSP9YhteTAy91B2+COkQFNDgI4hFkspO
HxhchFP8Gv4UKSGsrlrnu0BbgiIUWPm+VQivvO9q2Za8BLptmdL/vUXB3VbF
9Lr5JRA9MoE1VITxxYem6+1mXGCw6soLBoWxykE9ncA8Lii73sV/xYrgEKto
5uY6Fy5LvJFyMxfFg89/sDvtvgy9VP4vD3mi+A/XTfE/Kpchg2tbZpe7HYft
prh3UleAv0OvPMtdDDuOBbt/G7ACCZurLQwxcVzhv6cgvW0F6g7Yqi82imOq
sJB7lu4nMNV95boQLoFbEvNjW5I+wXK0XBZDSxLnJTnRLbmfwOSDoGb2lCRe
PiU90eeyCi/D2/+xf7IDlxyMT+dUr8IJhpuipSIVK/pmE/pyPAirlQvTvUvF
jzjxzVb3eGCT33xxpJOKvVOci0emeNA1nxjm00XFjVKDUfkzPPCkuT2Z6qZi
N7u/f7wyy4OA1/Ps+V4qNjbc6F9d4EHyqLTKlyEqvlqitV+Cx4MBBY8x6Tkq
jklhimAhEq6mcD3NhAjs7xgXDook8AZrQpooBD5/kpUZvY+EcNXIeCsRAmdo
Pxu0VyYhsUKm1l6MwCGsV3+PHSChotNQwYMg8J2vGcfFdUjYpEZ9CP6GwCek
JIa8jEiIcrH79PlbAt9dPHtIC5NAzZaVuLOXwPPnAgtIYxKUtIsMI/Zt+bxd
gvFmJBy36Uh7pEbgH92eXai1JuFNUmqplAaBKTiQE3uSBJf+8y2PNbf6tn3v
52pHwvc/rK6laRM4NFVYbNmRhOXfQUpBl8AxJc2StU4k3F6LVs/RI7Cqxgzt
oTMJQiYOJsr6W/0GwRF0VxLiYuTpzwwInLcZuqJ6hoR/AVqpdxE=
          "]]},
        Annotation[#, "Charting`Private`Tag$35625#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJw11HtMU2cYBvDDraVQBKVuMOPsmJcx2NgqIbI/PGcDxa3MRCpkGrI2Q0yI
buhENJBtNbsYEAcoEkzIYBDYKsJ0TGeyGTCMbWi4rhQcAodLsYUCvXcMUtf3
Oa5J0/zyPN/7fd9p2hc+yM/I9WcY5ojvTZ++F/dcZwvblja1vTzqXofP9dne
LvLRPdJ+cqdH9YAdaTxx6pRtkMx0HRki71zr0iOX3zCQHeOtBrLmrd08WRUR
MIZ5o+ppcmTO1Udk7dDELPLoixNk3nzFxFoO3CmR9/HwyLkFyi8bJtGXv5e8
RHnst85p7O85bYXFlhnY9Y6NnGc6Oov9n/3ZTn77jS1GzHulwknWfXN4rkO4
shvr5eopnKcpHjZ/lfgY64cfe3CeCS/M73t1BetPfm9C/vemVeT3O8y4X+TA
GrnHcG/+6f29ZMnkhwvYL+483JN9AeYTfnmC8+l3WMjcxysMR3lF7SKep/dH
P7KusmgJ93+43x++HrWM/tWXA8h5mXcF7z8Ax9b1CJ4PDCSbT9wXPPVvIOd+
6VFBeIkV531fFwTro2zIz7SKyLJ/BmH+1xwxObE52o7zN24IRn+X0SqcTwEf
jCkWcsUcLIufgeUJ4xLkWWUO9P9qCSH/1Cdyol+oCYXzP4I1lgQp5h93w9qH
d2FZSpwL8xbDwjCPTYXrb0/DTkex4J0N68hVk71CP6U2HH1rlRvzkuIi0Jcu
w/wGBVy1zQEz6hpYlsl6cJ5y//XIuUqYbz90i82483xyaU8/S3lNejcbm11+
vJ01kBlJaT/ZEvPaKFmbkD6EPKJ1DP1ur4Gc3iCZIHN/isdZWVva3tqNPPv/
78PnauW1KcwrSjKSk9RF07BYbYJvKmawPl4/j7532yyZt29Zgg8mGuGBmGWy
O+MsrCnYaiMX9m6eI8vTm+3k2+8Ow8y5K07k66NMWN/ngd1SFcyUqzyY/0Oh
GefNrIMLG6rhzoLLK8ijf5vH+q2iVZzXmLKA55HUsgbXdMDytjQv+kFfWjC/
8dITsqHk0iJyXSTDUf/sIswZumHDmU+X0L/V7EfOyhmA5V+f9kffFb+M/be/
HkCuLs6FuVFrAOf7/nTf+f2B/vlnAil3bxxH3nlRFMSFjLyorKi04n4aPXxh
eBTW8rUi+HO5Dc9TkSmGUw/D2k1hweRjN28I+Q45HOrthutzgyXkB1VZdlb4
/4OVDU0ws7cpBPmgDeby8kPJC55UB/qbd0mx30kprPnsENxSb3Y8/X7DyHH7
3nTifk4LrMzWwr7/w3Xol12DmZhPwjH/+oLQH1uBlX67XdivLDkC55d+ATOl
dfCx33sFt6/CSpXbxf4H0zKHnw==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk81PkDh4eIIueXTVopWbdIrJ/95f0pJUvbRoeIhqxcr8ZVlDsqSRMt
HbuRo1DjaC3RuGKdzeQMqXaVKGca4/pSads/ntfzev571h/1d/AUZTAYx7/y
nxkyB7LWIsIyJGxp0+ooXcR+6rmsPeoEJ7PxHi7zN/Rx0+QEIz5YimyHzlQW
HloMT+SwghEgJzcTvZCDuNUxnU9HTsNgVOvBM+Y9aIVLv4wxjsE2M3UdzpEC
rBo71HqdFQfDgqI7M4r30dc8Vdw4kgD5usCU6Kli1JhZ3vlbk43kzAP7TCVL
0OWwk3/aOBkfOpQvdMuW4mHdlepkVgp2ebfkGiw+QFyGbnbNyG9IvWvrPe7G
xVzvXlXb+JtIly2JmNeugLdMaGqPZjpe1T13MR+vQF6Nu1WIcSYCGnbTRm5V
YBsUmbJZt5GXtD18UekRDkntWlM5cg9BHLsc+ek6KGi96GU85IB6JCx3t/gL
/O3HU6zj83FSW5SRGfMXLMNSpLs0C+Gv95OL8sp6/DrjH33C+A9cVTFUXaHQ
gFMeVYGJrBJcEys3Uf7cCKttBw5yR7g4kjii4Of5GLmjJb2KThVYK/xj2Dnt
MSR/VXBkPa5AhnpQbW/XY7S9aXfU4FQicl1TXaQlD4fO2jqx/arhcZHf0SnH
R9nguiKj0Fp8w2ENJd5+Av53SsVii/Xw2sQ/Fc9ux6ewHVPGmxvgM+OpMMxt
h2F7sDHTtwFBUZsLVrxrR3JoVzH3RQNmv5QPtap14GBL0p+sykao7T3fsfxk
B177rCzti2hG/K7Le4LWdmKm4EtZwRce+i++jb/r1AXqVtOU+hY+zKXX+p7z
64JpElv/qjcfn+sv29tHdiEkUDU7spOP6/mNwrLMLiyYfs/e8/XT7vP+jJp3
XViqYXkIrNugIT3w8a3/U5wdmZRY09yBnKiFuuzQbiQtupa6ynRjw1Yt5ziP
XjCVfl6cD3+Bio/6qbm1z2E90WJ0vuI13I61pbQv/I2na4dWxXwchCN//R3/
kldIWn/3o1nsMBrTXXZomw3gXtYsM5Qeg2PTmE/DiTd4KKg6rmUyCU4GdfDT
pUF8TFC25j0XoF5NKyikcAhKcVIc8wghDpi27o8reov+/+187Kc8A8eB/tq0
zHeocX4aEPl0FrxH5Wey0oeh4qH2viloHky52K1VZ0Zwqad6anLLAtpC+Bl2
gaMoEs8ufjm5CNn1Rs4JB8Zg+62VNSPxEwz32mzp2ziOpVvmHstsl2DZupv6
P2MCBpLj+y3Hv0Cv3NTStWUC3PenhvOfMYhbor5tVtp7mJSpid58IEJi3UhV
m/ckfIUbJHLPipLqCW5Kn8YHFHrY71X3XEYSlcS3m45/bZv+uDIzMdIa/9Pr
zfYCnLu0SmmTmDgJi8/2r7gngI+415jyoDiRqTqtfUpyCiuFapw1JctJ4XKO
bj1zCuWKIkXsVAmizRPMb6uewg+p52QHAyUJQ/FYodhqISIveB/eT1aQBzvW
nej1E4JXfHJ8i/pKYhfaLzraKETPngFP46mVhKu95G6rMo1y2w9b5WqkyKTp
Oo0A32nkhGs5H0mTJnrR9vHv6qaxV73GrcVvFbFIUb22THEGEotR+Vm7ZUhw
TPc34b4ziNh16/U1NVkyrexAN1fOoGWaGcyakCXW00Y9xlKzSB7TzHnhKUcc
PDZ2yrvPQlWJLy7dJkc2jyp+Xl48Cz3nc5KzlvLkvP5wzAWJOeS1yVm0F8qT
AVmRqqMucxCN5Lt9r6RAKix42fH5cxjceVPH8ZwCSWhXrj8mMo9sm9+HxSYV
SNDJBJ379vNoDfPtvr1fkUidKatgZ84jqvlnj8V6RbJxTqSfOTcPmT2/DPfr
UcS9fPZVnTUNbqRuW5EBRfRdXJN0bGj8UigojdpEkdzG1zuv/EijQjoyVs2E
IvcF9i1uu2l48a9+e8SCImYbozUYDjRqbZr3/WNDkXwdypy40gi20q196UmR
lNJe0aZgGmrBgtx8L4oIs4WZhidp8LLL2OE+FHFKHrK+HkJDXdTqsOpxiuTN
uHO8T9N4Unt4zvkERaxmvTqkoml8Z8nWfxFLEcHok/R9F2l0Ht+nyDlLEa2g
VVVViTQi0lUWT5+niEle7BtNNo2uTznNKhcp8sPoBhs6iUZ0Zc1RpysUGWgY
CEm/SkN3/OyPOikUmbjNerb8Oo3eNXZGC6kUYX1gkoAbNPTDnn2+cYMiLbXx
elY3aTy7lz7k/TtFxqx4hQVpNGKfe/DN0yiiYphgrnyLhsEK3T8lb1GkOYbH
j86g0WcuuNGXQZFky1Sv0Uwa/wK4X1D4
          "]]},
        Annotation[#, "Charting`Private`Tag$35773#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVx3k4lWkfwPFDtuzLwyRGSsYuEuM1b+67lAxNg0hEyMh2ObaQXZYknWho
mcku5FgaQ3RsP8buZF/TvCLKmo5jeyxp5v3je32u7+FrPpaunBQKxfvf/i9F
2DpHFoUbBoXuHTsQqQoxu8P3ledtka3e4jDD8TcYY6SLsuY80F5EL1JZyYFX
BrNL+dQA5Csquha1lQ+xB6L7B+dCkMa80stRxyJQChN8G60djU7pyavQr5aA
0MLl7sfUWKRZUvZsTeIFjLWvlLfOJSKxJr/UqJVyaNAzfPa3Ig2lZFtf1OWr
gAHLs8wQ7RT0uU/qzpBIJbxqelCfQk1F59w7CjS2X0Jslmpuw9xvKO25qfui
EwM2RsxlTBOeogyRivBN5RpwFw5OG1bMQO+a3tjrL9ZAYYOzUZB2NvJtOU9q
OdUBTaNMl0bNQ4XJp8O2JQEuC5w7WDtXhPzpZvliq00grjQ+QnlFRwSwq50N
/gLmae9U44RiFKjMScmO/gsMQ1MFBxRLkY/aT/ZS/M3w65pP1A3tP9BDaU2Z
/eItcNOlzi+JWoEecVXrSH1pBaNT1pcYcwx0NWlO3Mu1EwrmK0YkbGuQLPuP
Wbv0TuD7VdyG2lmDsuT9G0cGOqHnfa+NAr0WRRxqa4ow7ILLcaa2NK965HKX
2dcvyoSq6UNlWsGN6Bs6dSYp7zUwv5Ms59puRm7HmDcTaL2wG3pmRft4C/JY
cxWfZfSCZm+AtqNnC/KPPF6y/2MvpAQPlDPGW9D61+qZbrk+uNSR/Ce1thXJ
md/u4wnsg0kP/sqx8HaUcO7+BX/Zflgr+VpV8rULTdz9kPDcdgCIzLYV+RNM
pC8o6xnvNQC6yTT1h+5M9KX5voVFxAAE+cnkRvQz0ePiVnZV9gBs6X5Pu5D3
Gpl9scpq+DgAew1UF5ZxD1IQnNr54DMIcXPLvAfb+1B+5FZTbvAQJG87VDoI
D6EjJ5XsYl1GwFHy5+3NsHFUs6OeVtD4BoyXOrRu10wip+s9qb1bf8Og7IxQ
9M40smEefuZT8Q6SDz/f0YuZRa0Z9meU9aagKGfdMZhcQDZtCx4tN97DK1ad
t5LOMqJnEZd2703DTqKUcdcbFmqWU/IPKp0ByVgBun44G1nrdlvFln2Aif+c
7fSSWkM2UxON6dkfocFu0DdicB11QfWtnIxZkHaR+9Tmv4kcRWNO1t2ag3vD
9SvLJ7ZQTxAzy8xvHsq4c8vfLm8jkcNadonWC2D6rZExJWkXaZqbnBg7ugh7
mfou+0z3kGH3eeK/lCXQ4Fu0Mlz8itSqdQ0dOpaA8enmbPEoBTslqZvmpH8C
nSo5zqcvOXCME67rcV8GT/YR3oI4Tly/xEgdU/gMpS4W5vKu+3CSJPdp3cV/
32QitkqPC3cn/DR53IIF8feEJI9xcePQhFyfmiIWeHC7LUhNc2PhuhDlm3wr
wM+Wox+s4MGlPHTVZscVqJbgKKOl8WLlLtbmqfoV+CEtXmTajw9TJK6Xch1g
Q8Qd9ytWeD9+eebQjREvNnSVBy6ekOfHZsETnPOtbBi+MOWqvcKPGcp7zqbS
q1Bt+vmkaIMAXtY9pODruQr5YUp2V9MFsVqURcLHplUwl29w6vASwgapMo/2
SawB73Zkcc55YRwQPfRNmOcahJ/LnHwkJ4JXpSzJ9to16Fh1DKAuiWDjVa1h
bYF1SFlQzB93FcWWLkf7xZzXQUaSyS3YI4qPz0t84SlfBzW7eL51QzF8W302
+g7vBhT2iBr0lorhKRGOumv2G8AZwXT6XlIc1xh05SYUb8D02acqNvHiOLFX
qvk6xybkmvw+y7Usjv0DE1VeWGxCd6jnUJ6VBBa4VVVDy96EyPafXbabJfDR
DY4Jx41NEL7wy+yEGoGdq9ffNRmTwIhQ7SnTILC6vUOyigkJv5SyKiOPEbig
dfLsgx9JqBGMiJHTIfALlkWH03kS3JgPv71qQGC9o1EKFEsSGk3aL/7PhMDF
KoQ+diAhwEi18a0rgVMrRzjbAkiQC2AVFLsRmJ3LztYMJKErt4oW5kFg25QZ
48dBJMhzGl2R8SZw4Zoz3T2EhNeNVzbsbhDYaN2tTyCKhO8MaerjMQRmzb/O
uHiXhH7vixL0OAIr+QvV1SWREJ4hvR1ym8A6hTHvFWkkDOzmt0vfJfAP80dM
yGQSomobrtk+IPBUy1RQxkMSVBfjflRJJfBSHnWU5zEJIwfNtLbSCEz97Ih9
n5CgHjr65ckTAnc0JqgZPSVhtChjxv13Ai8YdZWWpJMQ88aFqZ9OYGnNRH2p
TBI09qv+yZdJ4PboLmZUFglj+qwnY1kETjFMc5vPJuEf6aeHeA==
          "]]},
        Annotation[#, "Charting`Private`Tag$35773#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJw10w1Q02UcB/D/eAkcAhsjFexi5QmJct5xnXrYtUlxFhyYK+eiXW2oeOeJ
EueiOLR114TWLUhmdmbnTlrFrjA4PBFfWqdwyE2uhsbGm38YQze24cZepNWR
v+9qd7vd534v3+d57vZc1VHJgTiGYfY/+dLvkw+7+eplUefOaW2+9uav5ILW
QfKhtR8Pkw2296yi0fba0yqTlSzUzNvJe7avGUV/IIcl31u6bIevOWbIocnt
E2QFT+Ykq46UTZHVP+x1izy7e4tkOhY+cwSulDtiduUuwHztDJmJ2+gnj1Xo
HWTxdEOAfLbt8CzZbLEEyX2/J80hv702DB/iPcB5jdcj5Gz9OKwIXVlC/q54
13/7oshbdQMWfqH6B/UEkxv379m6DE9J5+FTRYyY8q8NwoouEYdcdPSeB+d/
f20cuU950ovzNwfhIkuxD/MV5njymLVwAeePjMQ8cB79wtyRBHH4BXnq1KZH
2Gf8KZF8x/YZbM5reYpcfmscZkKlSai/vsUPr34tmaw7Z4EVns0ryAXj6wLI
X+ZxyTWWJliRNAynetwxlw2mYN+AahH9fONKeKwHZhv0qZjvcsFMdX0a8i6J
gphvKU6Hn/8KZsoTeDjvhSnY/GljzJMVsPhPDVwzJA9h/sO/YN2LJtjw0mE+
+rmcMN5nchbWKeUw69qTAVe3wgbuAPzzVTOsvp0pwP2GvDHvMMDeB/pI7P0F
mbjft1mPkS85CBdsqYbZlLYrIknvs5e4d4dF//8/NshbhtL23SUrpMet5Hy5
dBT2VY6Rtek7xtFfXsWS3edsk2TDHZODXHps/j76a/rnRJmdOw+UVE2TzftN
D8nOrYIZslig9JLXr97nwHxrug/9v+hgNtrhJ5c0NjrRf6EngPqZ7Dky0/VG
kJx4PwqrNZVhcr9d9hD71LmP4TU5LszPdS6RNcdvw8wGeRTzyTI3WZgT/Bt5
dhesaOcso16yOI95Wy0jJtfbPXC2mEPW/HbTi3xtWhzZqCz3of6RDdZcvAir
zUPx8PrWBbyHexE2Sr+OudmaIOaOtndn5T2C+3oTyYV5H8DCplVJ5Lp8H8xu
K4lZmezHfV/em4z+UAssfOWZFfD3LMxI07jYP8IJ4H5nI7CkcCNs+OZWCvZ1
yGDmk9Mr0W8yxup8Yyrqb5Yuot58LA31ic9h8XVJOvL0lpgr+DzyqXeXYUXx
CVjyqiiI92hwwt3NP8KMyQ9n1MfDwm0H+cjbnRPCfb+cgDNm34aF0bIMcuC7
NtggvwHXnfgDZt5aJ0D+pqww6uGTcF3TOzDbX5CJfR0umImo4G7n0xHRv4iy
iA8=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVkns01HkDxsmljTD9vNtO6aKWktRBkhTPt9wmSq5Za0U22inVersstaIL
gyST1lRCRO73ySBiGfdbySbMS1uUlsY041e51HntH895zuev53zOedb4nXTx
XyAnJ3d8Pv+2yuW5WvWsEMt8rx7P0SBddL6xXq4Y5QGcFl7Xi7mJ3oD1HU84
R3BCnmFtsTgZ2psSG7szg7C3ukChvzUNfQ+YugLOb1gl3NN1JiYDcdpJV1LY
oTBJVZXt+fQAazvVpfWZF1H8zbKsJL0c9NtynXM5HITvfmTqo1YA/mUX+ZTg
GLwOyRFWPylEfJ1mCZd9DXlaC3P7LIrx/UqHqOpMLrLVh/Mm20owkNj59j6H
h1X77+dtiOWDtbWwdqXcbeyTPbXfsvkhyp/F8XjBd+BWl7LqWvtDcBlOdlfZ
ySj/FFRXNF0OHRu2a2VmGrbscFjRtLESA4/HS+9xsnCHUXjYhqrBEnVRyv+s
shG6UfbPUEQNWN4dMcvlcjDQPd1c86kG5bP5fjeDc7HeUkPEe/4YXLMTVBS7
AKWBi9psd9VBx/NzhSCzBNu+OCud7f4TAz3nmKkcAX79i9+0PkGIRK9rJPu9
AH8PJe2vqRXCZST1lxLXCpyV8zalx4VopYUVDasrIfGZ3O5u1YgKpobnmKAK
e1XyZhjiRvxx8P5to7EaxLPSjjG2NkOP9lfz06nHS0lq+dKEVkRuP5kW4FEP
xvuum+sErRgJDd56LKYegYOTdkqDrUhVvup9WlKP83zvA8Zr27CUWVwQWd2A
5PUBS3wL26C0Y2ZfnlsjXuhO56Y/bser8Li4qSstqAlMNWuo74RTxkwaj9+C
n7vXnX8+3Ima5oCH5iMt2NaXze6a68QtdYjCrVrhF74p4rhpFxzvTm5QW9CG
wK875YKyu1ApcGrUDWtHeFqwYjunG/Fiau5ASBdK5dlPau88werCdr7ItAfn
olJeDW7sgdbPJ7V/UHsBkd2NgLDxXmjpVxZc8BvCa/qdUu71PnDYRQlVuq/g
oHbqiHxnPxTs3A9d9RwF38Tf8ayqCOtaVAp/uTAGFapJ8+jyIew2F0s2HR+H
oSlzq/P4MHwfZghZSWIkX1I/XTX6EtXx1s2ZrRKwLAelntV/I+nW42ObLKVo
GjIv0+G8wpxO+gufHhma+oxvdHq9Rn/OXRLpQEMw01RitGIEZmVyQR4jH5GT
6Jk6/WYE7LiJl4VnPkOelVc+lj0Kpt+kw8z4NFIuhe8u93wDuyqvMMnFWYhs
HylFf/sWUyrDBQNzc6hYmm5z9c+3WPOyPeMk7yvcZ83UKoPHwLW6d9zmWzly
6JMOP3/DOzhpBijveypHtCjZhVMd77A/01dBP1mesEpTmGXn/sG1sjdfwr0W
kDdzC25EaI2Dn2vI1FqqQHy5ly6mC8ax4nBRYsxLBWLgMtZ01mcC9bcrqdPJ
ioQ5EWD5bGYCOdzPUuOjSmSnpsqehenvce6/s1KTLcqk/Xp7h76NGNHd0ZJi
sTLpOaobflMkRr94r8uCqoWE45lusTp8Ekdikko6f/uGlIR6PFq/WIJh9UJD
kdEiwl89nMU7IAHPndasm11ETE4Jh3ZlSRDHbJlaWaFCBHl7H52XStCY3L3d
+YoqubUrYIBh/QE7Uv1+/7p7MTmk0VLiEf8Bd6Irh8RfFpMjU1EDtoMfYG5q
k8lvUSPZPP6eDgMpmD4/saci1En5Zu8fDUKk2GafzV3kqkGy7Nxj3Tqk0NYQ
TRiqM0iGf70saJUM1oIcjeWBDHIoNJoffUyGqDruyPunDJK2+eDq2loZxjmo
+Gq4hHitfM1T1JhCg1W3llHcEnIntmfgqPcUqn1DjBxlS8hAi/gPt7Ip9O54
Z5PtTBHTNSuV/BRpPJ8U3NjnShF3PRv5LiUaL+5HDkvdKPJsSJ9hvpCGSFUn
xOIHiixL2xdAqdAYGTyY33OQIg+6hFMNGjRk53upL8co0qG3Nk1fiwZVXTvs
HEkR+2yz48rGNP7za5zBJw5FojxfdZ/eQmOpjnfI3eh5doXtaxMay2NnqLex
FKEcjU/UbaOx9qettr8nUGTb7PO88xY0jOZy8x/cowh318cRmkXDuDhk2iGd
It/FhEX629MwOcyy/XCfIsqZ23f+Nf97s47R4R1ZFAn76DPCd6RB7mprPi2g
SNcHF70zbjR2O036nC2iyPe5JHDUnYa14uN8rRKKXChKEbp70GAFetkG8Cli
cLm91PRHGvba+gmq5fM+drmsLC8ae3s/DxcL5vesl8m+86bhGNVscKCSIjoh
2qVRB2k47UwMma2iiPdYc8S0D43/A04jUSg=
          "]]},
        Annotation[#, "Charting`Private`Tag$35921#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVj3k41Wkfh+1NhOPnHXMiUUMkdSFbiefJerJlzRhjyUQj1HiTISNaOEhy
0lCEbNn3k4PwNRz7VjIJ58XY0hCH45csdb3NH5/rvu6/7utzwPuKg48AHx9f
4Nf9S9HbOyBREGZU6jbkOhekDP3zprJCsS4IBbPvq8Y/hGFflb6X9IvoMj/F
1HBPBigeTWkfzA9C1o1lgqPd2TDyjKrMov+G9rPPDFyLz4NExfQ7mX4RSDtL
jHdm4xkc7JdYa82/iSq/2VuQrloEo+YM+2I6HUUZv9D1FC8D5m0H/szQeDQT
VsRufFkOSS3SVQy/e6hEblfxiGElfC9vFduYz0CFEpMlKz1VMJbS/y6Xnor2
n80tOZzABJpOOcjzPUY2vFeWx489h9rXiampoWnIqSVz/73e58Cg2Fnc9ctA
tRtBLRWbtaBk5udYn5+NjhtY7es4Ug9jzYvVT+kFKI1SfsGMaAIpCU7m/0wK
UcQR3j8T0U1Ac++Ll+UrQmODm51NG01Qu13q/TC0GKkYSXJS3zQDQ/8yEetX
hqoDdveYn24BJddPdaz8KqT32V44ZPBPGBu6Ts2is9CvfzE7VJLZkOJ2Dxd+
YKG/J9LPNgEbHGazfqlyrEMhfO665CIbukl2XZtCPeJ6rpxwNmmHOqqk6wKr
AVmLlmxRltvhD4/cx5oLTSiJlu1P0ekEVdJH3FupFU1xs2plkrsh5sSVbF+X
VkT5MPDwEKsbZiNCdfzjW1HA+IqF8Hg3ZIncdQ/mtqJwpvs5rYM9IEOtLItp
bEMZKr5SXuU9IGywZVPi1I7eKm8W5zT3wnRUYuL6nS7UFJCl39baD3Z5W9mp
zC708+Ch8DeT/dDU6fv85GwX0hsp9BvY6YdHEogTZdKNvKOORgfqDoDtk5XD
4gI9KODLKb6gwgGoZ9m1K0f2oqjsUKFe+iAkLRM758IGUDW/30tIewkK5b1M
ju4Quh6bOT1+ZAjkfr6i+IP4W8SxeOAbuTgMcmr1ZTe8J9AM+V64+P4I0P0q
khuUp5GV+NWL/P2jIGjhfP6u6xxiavvYhohx4FCXaPkvNxaQKNEhfUl2AoxP
LnOPBi4iDV2qjv3iJHg9z2PT0pdRxi2J4Ia5KWhMMu3M7+YimtH4mmvj35D+
qNn/qNEa6pg4WaNEn4YdpZy3nkM81DGi9aDfbQZGi57gGCsSsbY6qjT3zYJ+
DV+Qy+xHVJTimrU5Pwt+iUtT5dc+IX5aSe1C4RxQvVesthY3UeatKONa13mw
aHCL5N7cRhzzF8Jx376DddHJsrGdHVQnk2N29893cGCqN+9K6hfkvK0vXh+6
AAyTp4Fm3/Lh8xtKzNLD78FO2lfE5hUfliN4N672vYez+V6Cahn8mFadSa25
/g/cq5n/HOUmgOd3BB5Eyy0Cs1iDKicjiL0Yt27msBZh34WKlPgpQazusNAR
4rkErY/rieAMIUxd8jV6vbUERYxPa1qXhPEpadEzu3I+wPX/bq9pHxfBvfd7
+9TMliFuMI5buSyChy4pRz3kLMPosrWDQMMuTHfNMVSIWoGL8elV/b99g6si
XF6o7OHCpES5BkdzN2YqTBaknuNCqjMp3bK9G2tfZU+cLuBCIrVrXb5OFLNK
rF+Er3GhPWPwhP0dMfzotO8YxXQVDLK8f/9ivAefl+yqcklahbS4+onlz3vw
xfXYMfPxVTipa5bP7BLHhanMM33qa0D1/MlvPVoC1x5z/1E9bA30LAsZux0l
cYGFc4JT3xooSnKWNCQoOM+nlRe0nwemrCJJ2QAKPh8Rx4zz50FsC2P2wysK
zj7moQDAg0U6qvuiIYXd5GdShSTXoc1kUE4zUQqnJQyNXXJfh0avME1bnhQe
61r+w6lmHYYN3psV2hNY94C8sLcQCW9WWA9sHAnsrGrGPyBMwtvcmMk1JwK/
nlCjnNxFAkdMKczwBwLvzbbxJURJmB33KB3yIPCzAfZ6myQJvPBh4rM/gftU
D2aryZFANMKkfQyBLQv1A0W0SPjPr4nqG3QCx7pODwYfJ0FGyT3sSdxXd0Tm
M9okyCZsEe8SCEzYal1u0SPh4E865r8nE1hv+01JuCEJmjvFpc+eEphx+uMs
SSNBqzJs0yqHwN/FR8b4WJKgfYFmvppLYJH8E6f+siJBv29u0qCAwJEfPWeZ
tiTgJ4rSr8oIPLDqoHrNiQRjuxXPkAoCf1+MA+acSTAVai6VqyLwjYpMtrML
CbQAN3NfJoHVb/dW6/5IgqWiWrJY7dc/FsW0AjcSrIc/TVayvvZM9/K+cyfB
NrZT/Vw9gZXCFKtjPUiwO5UStt1AYPeFzuhNTxL+D39rh6g=
          "]]},
        Annotation[#, "Charting`Private`Tag$35921#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt039Qk3UcB/BHfshgwoAgwIjNSwvhjiPxx7zM5+mKW/hHMyvjPL09t+AP
vCsIK9KdMlDCikJDM/7o9nCnR3edjTKC7jo3fpT9GGEZYIBuE2wgcxsbYzpE
2uf93e52u9e9P7929zzr9NV7KmM4jquIfOk38hF787r5prm03XnaUUvEqq5a
K9nY4h8jc5eLf4PVinGyYDh+jSwVdU6QpR/0E2RVfs8k2brtngN+POYm5j0t
m+YHgrLiA885UL+42kV2nNnuxPyH/8yQTx3oglWVOW6y7/OKW/CN9T6ydV/n
FNw0N08Wj4nT6J/t8ZNVJ3+FJY0zQOaSdtxGPvJ+kCw1XGcubA4hX7vBhXlb
d9yHhyTmXYYw7jOPwda+rCWyUXC5ovctY//fz8+QxW8tD1H/vXw2uo8TaN+l
y3eQ712GhZa8OczzlK2CL2lh49WSGLLq93OweLQolsxlh5k3c3Hw61Y39mdY
YGuB+y7mFefEI1fUePD/Y13Miw9g8b3h1Zg/oPai/7g1gWyMr4PFlIsyuNfP
3NovE5xH4ji93If6/a2JZGHdh7Bx7LMksnTwyXns/7JaTj6lexuWLpavIe+u
OwcL7QXJQsY3mvOZ9p9Qn2lIptz38xhyxwvlKahfW+DH/B5BQb56tNnPnkc/
c+4gy1sOp6K+Rh1A/75GuPjsTuaGkjTU7+yDuZxDcGriArPWC9d0CAu4z/xq
Ou7vrofFqUq4Zs9plr/0Vwe/mD9Z/8W4jWfP4y+8IcNj8r41Shbu9dvIuk25
12FN7QjZUrRlAtanTpL5Y6/cQH/zo05yfd0bN8mSt3OavKJst5PFd9a7+GeT
QhapzUE2vlw2S1aGc5xkTt7tRn7hCizqEnxk3fLpWzy7d55c/8mmKewr3x5A
XvIn7NjsXUB/tmmaZ89DkGzPDcKR9zFEXmm13cY8u/Y+mf+36j/0p/vDuKeo
0IW8VLOE/m1tqDe2ZS/DQ6UzqD9YuIJ5bw7DYsdeTqB5z8hno/kqsv1EFuZJ
4f2w7o+vkRuvbIwhr/R9dwf9H6hjycqNoTnsD6TEkU3VH7uj98G6oVFYes0U
j/mKzLvo94zDStdTzF9tSUBeddiDff1B2DTS6EXuNssEZdNSqz7Th7zlR3h4
LAtWVbYnkhWDGpYfuZAEKz+CHQ2H5GTt5CQsjJauQf/ZF+fJ1hMPmLd2wcZP
K5Kj9Sz3lKWQvcZCP+7py1fgHksj7FDHp2Jfmg3mQu/C1c2PBdBfZoPN6Sdh
qVKWhnn2AZYbapkHNyzgvkeczIp62DoVeT+oP+Eay6vMzL1PBPn/AR8ZgmQ=

       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVlGk41XkDhm1Zsxz+RczEQYqQeqciy/OrSNkm4soyLZa0WIoitLwVyRCj
hSSntFBEEypLnWwnHEuhpum1jTXZDuecP5Kl6f3wXPd1f7s/PUyfoy4HxERE
RIJ+7P/klhhf9nh12mqvUsG3A5e0oZ5i6Cj7myd+f5L4yaz8CtinIz80ex1B
+NhMr8Wymwjfbbz5Lec4en5tVEtg30bShKbaM68oNA0nmWeX38V7Tty0Q+Q5
jOu8OLji033suyLaV86JhovAUsyCnYWTBsLSLK94xKQlu+Sr50BsOiBL7WEi
9ui2W3Ezc1HrHVpnE5mM8uvKw02MPOwyHikq4VzDP153Im0qniCgtiP+tlc6
lNo38t5UFuCp0U0Rd9EMiA7Xbe1wLMTUNbdwxkMWnPwMbnz+qxCbTQZNtkRm
YmOIZQyzvQhNc/t+es65j9S+oZ7Vlc8xkOIsTPfKhf9Gm6RqrVJIc9c8OWn8
GNeKIqSrY0phMCd/2FU0D5OpnhesB0txzKe+S/5hPv7XvdJX8VEZzt5gHiCR
T7Gw1LvUTf0VZP3SdxZximDbGpl7oeE1tOcTVt70KsOgFMs/rL4ShT/90TTQ
VAbd8bTlyvxKbLa4enwdeQnJ1Ic6e1WrsP9UWnmD7itExHcI5HyrcGfmwe6F
MTYGA9NO8aeqoDDbVb22ogJhI6keNsocxE9PC1NdOLjqdtKapVkDl0sz29gJ
HPDG+nt6rWqgrjp7s4/DwbLYtWsW9tQgZ8MCTDa+gY+J8FrJrRrUhUlc5mrU
INH8y32nJbWQpJV05/pr0XowIjNatA4XJvRdvU82QNzfviy6kgvxNiet13kN
EAuQq69q4yKm+vioem8D4ovf7x0WcnExlR3zwaERJlrDevSKesRZOD+31W6C
Y8xK95m4evwRF7HUuOktbPZ9efndrgFOyb6BZxgt+HXQWDysohGeqwqN7Q5+
gEiuZYpL1DusYok+8OO3YdZBwAzUbsVIyfaWAokeeEjbfXMN+YBWq5peNdd+
FKvJBNcf/Igcus80dHgQBtHLdxTu/4T2Rk+pxcdGEHn3TIXd2jawiNQh+VIe
6ra6LgttbMcqQU7sOV0+iiVuFR4N7wSXEaBt/FaAWv5odALdhbQq92+njtJY
3xQp67emG/sSUuktv0zh9SZuzvxYN3jM8WJ22zTykr1ZCrd6ENZ8g1XwYAaT
tR8DDFx6oa8UVG7jP4u1Fqs/fRftQ/bPe3ITZeYhZyQcEtzrg8ZWVrFT8wKi
2d3ns536YagxV+NtIUICa5fmp4z2ozbTudpdW5Q46IhtT0gZwEwwu1NTQoxM
WNqxk8w+Q/HBi46Kj2IkWy9By6DlM5gDfwcufylOVM+wNWxPDEI1MbbHLVmC
dIU7ULflvuD+GfsTe7wXEfv5Kz72d77AMMo0jWktSWSWP4vjWw3hZmdhZrmq
FDEKt/1v2vshiDm6bVKflyLnNQWKSSeGIbpIQWDdJU2eZcTnZyqPoF/HNWnH
UxliF7CIa5c9gmqnqpey12XJtOlUUNe2UcR2s5uyDsmRukWcaq/OUXSXvZtX
MltMehaNtN4KGcOGuzLlphry5MEbrkKUCg/HeM1+m3jy5D/vrGruPOYh27bi
1tdWBSI9FuK74DyOCinL4uRHisS3uI3ZzxuHmfShiDkLJdIn8nuGkc0Ekq++
6Ux6okTmY6WXXkqfgEfz4fVJagwyOOG33HpkAlrUvb8CEn74wYIhhjUf604P
xKydY5CWs8mM0gw+Xtw4qud3QJnYF2h1d07wYVqaqBT2tzIRDy7a9tFRAMMk
wahgswoJeh1690i2AAGXfD6556qQ8ztCZJZ8F+BRrP9ilgZF3Jjmk9HeQuw2
K1jndJEifodDHR6VC6FWskNb7xJFWApbFpwrhWjb0MtYiKOIqKd192yVEL/9
osLPv0yRnSKr1++sEWL/mrA/5a9TREcQpzvbKMShFWaGTfcoQgt69T3bhIhi
VK5wqKDIU6PwXZaTQpgneyzRraKIYo68ydiUEHMKAom5aoqYSWwE66sQZxfr
9D+upQjHOnFyflaIaKmL9+TeUcRzSQCnUozG5fntmg2dFJHcqTnnokTD8XSP
wv1/KPKKIyknqUz/+J/Ihageilj6vHQsVaGR/DW302CAInkSHcFaqjSuCxdn
xI9SpMXIUJv/Mw230KwEHx5FLkzlt2Rp0ljKtzy1aeJH/w3Wc08mjTResOew
kCK+nqoab3RpeARJ2VVNUqRbtj4jSo+G+ugds/RpihgUme8yWUWj44ipfugM
Rab/PGf1WZ8Ga6hZzW6WIv7++XszVtP4F+rsTnc=
          "]]},
        Annotation[#, "Charting`Private`Tag$36069#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVlGk41Xkfxu37dviHmLGnCNEzhSy/X0XKNhFXlmmxRGUpihwtT0UYYk6L
3YmyFNGEytbpazmWg1OoaTy2sSbb4SxIlsbz4r7u6/PufvO5NX0vuJ4R4OPj
C9nM/5tRbXTX8+0165Ny5d/PxGuBSqqBk8RvXuj3F8m95nAPaNfIn7q8z6PI
uZVRy62ZEHncaP97+iU08munchLtEaQsqCu/8o5GzOkUiyJ4DB/pCcuO5Jto
XvtN4LbefDh1j38M6DHIlWMlYEkrhCv63JpC70QUm0FxLVMpBoHloELlp8no
hE6/NSOvBFp9wttsyRQED+WnmaRSOGY0U1lNf4D+8c4l29a/gKDWgcRH3llI
rt+U1dxQDi8NM/k8+HMQ/3TbwQGnClh64B5JekpFzv766V/+qoD9xpPGB8h5
yDTMKlazvxKYa6d+ek3PR2ljUyM7G17DRKoLN8u7BAWY2qY0adSAGGPXiytG
z9GDyiixptga0F+TPufGX4oW07xu20zWwEXf9iHpp2Xof8Pb/WSf1cKNdM0z
mPwSbSj61LirvAUJ/6yjlfRKZNdDLrnd8Q601pO2Z3rXoklRakBEewNU/PQH
c4JZi3TmM9Tk2Q2w3/L+pd24DomkPdU+qdQIp69mQIfOWxSVOMCR9GuE3JWC
4xtzNDQZnHGVvdQIMqtDTSb19ShiJs3TVp4OicvL3DRXOrrvfsWGqt4CrvEr
h2hJdMSaGx8ZtW4BFaXVzDE6HW2NM9m1caIFivduIGPTZuRrzH1Qnd0CbRFC
dxmqLSjZ4mu+85ZWEOHJ6ayNt6KewKi8GP42uL2g5+ZzpQMJBjjUxjQwQLDP
WeNdaQcSCJJsb+xjQGzTpVmV0Q6UWPXx5DSXAXfSaLGfHDuRsca0Lm9bOyRY
ury202Iip9jtHisJ7fBHQpSiEfM9sj31te6HfQc4U/yCr5O60a+TRoIR9Z3g
taPCyD7wE+IrsUp1jf4AO6j8Bf7sPrTqyNEM1uqBmerD3eVCI8hTzP67W9gn
6LFuGVV2G0dVyuKh7YGfoZg3ZhY+PYn0Y9SOVJzuhf5OL1GpizOI/Ph6vb1J
H1Cx6FnpGhZqO+i2NbyzH3ZwiuNu6rBRlVB2xYXIQWCQgrSM3nNQK3s2Jok3
BBmNHt+vXuChPUyyhP+uYTiVlMY78MsSerePUbw+NwwszfkqWt8yKqX4UGWy
RyCiK51aXrCCFls/B+m7joKeXAjYBqwiE8udvT82VSj6+URJsvg6kjTkTnGe
jIHqQWqVc9cGiqEN3ypyHgcD1bUWH0s+HNyqWJY6Ow6teS5NHlr82FFb4HBS
6gSshNIG1YUE8IKVPS3F/AvIFrwZqP8sgIt0kzT0u7+A5sTfwWp1gljpOk3V
7vIkKCXHjbhThPBQpCPxSPIr5F93uHzCRxg7rN/zdcj9CgbRZhmaNiJYXO1V
Att6CjIHK/JASRQbRtr9N+PjFAg4ue9TWRfFt9Q5simXp4FfWIZjMySGX+Uk
luXJz8C4tlvKkZfi2D5ImGFfNANNzo11Eg8l8LLZUsjQoVmIG6YxC89K4jZh
epP34CwM135YlzOXwiPCMz3ZYXOw97E4mKlK44Jmhky0Agsusrr897Gk8X8+
WLfkPmdBkV199rceGSw2F+a34TIP9aJWVZRnstivqk9znDUP5mJno9Ys5fAY
3+85hrYLQLnfPJjyQg6vx4kpxmctgGfXuT0pyiQ8ueCvZjOzABrEk7+CkjY5
sHyKZMOG3dcmYk3WSLj7BoVUk8OGN+kXdP3PyGOHco3hwQU2mNUky0X8LY8F
QysPfXbigEEKZ5azXwGHvAt/fL6IA0Hxvr0eJQr41pEw8S0/OPAsLkCKqkpg
d02LxRgfLhw3L9/tfIfA/ufCHZ8BF5Srj2jpxhOYKnNgw6WBC317R0kbCQTm
97IZXm3kwm+/KLDL7hL4KN/OPUdbuHB6V8Sf0g8JrM1J0Fnt5MLZbeYGzCcE
5nFG9bz6uBBNatjmWE/gl4aRx6wWuWBB8dyi00hg2WJp47klLqzJcITWmghs
LmSKqN+4cENKe/x5K4HpNsmL66tciBG980TyA4G9tgTRGwR4cHf9sHrHIIFF
jqqvucrxwOnaiEz+PwR+SxeRFJHnbf4PeSN6hMBWvnVONQo8oHwrGdSfIHCp
0ECohhIPHnKlchJnCdxtaKDF/pkH7uGFSb4sAt9eKusuVOeBItvq6r6Fzf3p
1NdemjzIYIV6TXMJ7OelpNqswwPPEFH7xkUCD0u050Tr8kBlNtc8a5nA+pUW
x4x38GDgvJle+AqBl/+8af1FjwfUqS5l+1UCBwSUnczZyYN/ARxDhPc=
          "]]},
        Annotation[#, "Charting`Private`Tag$36069#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0w1MU2cUBuALtIBFfi0mmwp1LhFLnCTK5rLIvWiikU0z0JpsAmsUhHVG
XFidqIvdGE5xyGZKxhSwmRY3JI4YuslGRiMylm5OkPGjFrkFqrWl9s9SHVDW
8941aZon7znnO99tu3xPWV5xOMMwRaE3fYZexhOXL7Or8mvPTtuvdIXMr3MZ
WcnwxY9SG3rIxriGAbbKkdsiDf8Huf78CNn0rXMQ/jtwnyw52zZE1oV1WmDX
shGycmqNFf1e0V349XYb8ks3Yd2BJAdZNXr4HvIMuQt51i0zWdZU6EG/MeUB
9ona4CPLj1SPkbn3y56y3f40f/haHvXrS6bJydbTFuzXkPiMbMgMwMwh/jm5
bqZonKz5smOGrLBFTKB//+E5svpkDazc2hjEvO/dsMaRy3CUb1tm/X/fME6o
hzWbpeFkxe+RDzFvhziCbIi/BDNJWtjPRD9Cfq1RhPrmdTbcz14uJicf18KM
LC8SucYC69pfi8J5sxsfw2tfisa8ffMw7zDCgwVqO/ZRdS7AvJ4OB85z1kiQ
b311Cv3a4hhypkgDcwe3L8S8k7OwcWd2LM6XDzjhhF64jn3vCerHbschLyp2
4XlM6OPhA7cEBzclcJYj2hz7C27h9/Iz3GIrgDWpKxLJ1d9UCo6tFew+Byt3
zcEq8XXBuz9MIpu6wjw4X/sTbFdxsLInaxFZ7ggI+UgbnHNqlxf3/UIsRf8f
p2FNZRncUmH2Cr+XfljiTvfheRl3t7FTudenb3h/Zam+d5WJnU7LX6L//AYr
PL8+cvqOv/4kcymL75Edpb23YUUGzx6VXq062tRHVsqyJ8ji0b5+Mv/uxkmy
ekvNHTITY7DDXfVDrPB/cpIVk03D6G9RuskGET+CfdKccF1/612yrHzYS/Yf
32smG80GP3nw2soH6N+ZF0D+ywAsWzP6DK4fGoOf7n/ObpAM55zbxmOfN9+Z
IatE5y04L+blIPKvu8dxv+jWebi0ZAL1rUsZLuTqikbB7sVh5JwMxor+M5Ow
6lgzrKvYEkG2ywsewl/VwpK3jsHMp3UizGvseYT95g6JyaZsvQ33uZAeCV/c
/Bj39X0Shfn3s+zYr+QmbFq9D9b9a47mhPs40D9bvwDnf1c6hXrPXgnO+2yl
E99Peuj/EbI8ec8T5C9yC7HffADmK1NiUX/qhAvzugdg+xUvzF/Vx3GpVR9Y
12e4sV9zRTy52H0QZsqyE8h+V5gHz6fyRzjTsx1WFixNJKt/q4Z17R/DiqgO
mO8bhwdbrUK99e0kcl2h1It8SSesVufDmtXLF2F+oV7I3e2wIviKD/mdFCn2
GToD60rKYcUbJli2yQwn/xD0sf8BCsCK8Q==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk81AkfgMcYzC82YV1p8tt1lGKXDrG2/X4pOUovuZNKcuQYKbuyhVZC
Kh2EqYxUzGZZR27JlWNRzZBBooYkRKNGayayvX88n+fP5/nuUNgePyqFQgn9
yv/NK+CZvRlO+EVFWGijPmsGiqIOp3rJYej3Pyw8P8qBkLgvqVckEbDgmVFw
8HUxcJPVY5sjY2HDNfMer+IyuG6nUf67JB5qT/HofaOV0PX4br6KeTIIbHds
flleA1+cTG4VRF6ClYOtoiKrOjAxyrUOk6SBvtTor6LXDWAfFtxQy8oABrux
OWiqEQ6XmFjQza9Deu/jrMLRJkjf/NA4JzIbWphz96NKHsEie+riEcld0H+a
szFjrA2WNezuVLTPg9M+6yJlbreDmqCEXsHigCWfqkLx/AeMdU6coZrng1ir
VtG9qgMOcWhRNyKLwG5p/+AH68cw2re81F9SBieNNqmdHOdCUGAD1/x2ORhJ
Qo4XreOBcD78vYJ9BbhWKTmNhPBgQbPX8D6rEpLnZD6GzfBAbd8NzpJZDSjU
+7eYjXeD7as1WZmR9bBz9+tyvYpn4BZBbveTPIK0Y8lJvHd90GGkVeft2gJP
eG1ed8l+gHFVU7fiFth4JdRsmUs/rN0rv9bGvxU4MUc4rOp+EMMneYPuNtAZ
PDkof3oAbsp39by71wF2ed6/aS48h3BerUmNIRdaKmjMAw+GwPAHc6bpXi7k
h+ivsnkzBG+SK/JLE7nQH3QnZU5xGPZuL9H5a4QLHeluzPxDw2BVmad6M5MH
6ZLC+AsyL+HbrCviaFoPqNXs65slX0FlYECj5YteqD+4Va5plwBOtat41sjy
IaAyLSjXWwBWaxuEG0z4cDHOYuwEUwBPxjVI3QQ+uAuj+4SXBPDavyNG1rgP
uL5n4gy6BaDsZ/Rz55l+iPr9Km3EeQSYPh8rXNYPwkRv4K1Qh1FQKQT+xq2v
YF9i2eIW7TFgTDdMZ4WPwVnlmkXC8S1YoE/2J7UpMGyIZmYfnAJ/yVGvaSMh
NNJcdtwRT4PZMJbx6R+hR3+sdshOCPf95NnB/DnIOOWssfPkLLxltP7Uenwe
JB7pzeVJHyDvwGXdTLvP4H51U9oM+yMwuu0bf3y/CIUKbbx7GSLQFsVGVm+j
oChag1UWNweibSNlagVSaGBc220R9Qn0Ch50ui1QMfNGTrerx7+gNbD6XHcg
DQOykprSt83DG/cvy+8+kUHL6R9jK3TFsPy9K9NjlRxe93SgaH4Qg8R+c4Rt
Ah2pkVteRHVJYFv9BWetfgJjNur8UZj2GZzmgwcMdshjAjcjRi9oATadaV+T
UqiAk83mz/LNFuG4ftb/ehe+wY5H+63nPi1CZIqY4RGoiPf1zk3KN3+BELnx
kWHvFbgQUqvGi12CRKHijZ9pSug39vaHh1oUlHlwSr+qSgkdXXhGD2IoWJKa
u1rPRxkHm0Nd855TsN5BebJIXQVNNYVN41ulsKq4jjXWoYLf+04XamdL4Utt
vQqFY9+icpNPZ7VYCgPDublOa1Rx/2x6LH0fFcmnW6hJXFW0XOFUIqmkYlPv
kNWR39SQ39vZ468sja0P29wC16ljUaJ+qSRCGsX3Q/s8utWRrWG9+ixPGlPO
u68PSNLAowblblmmNHQKW5zy36CJk2rXdMau0XDps+Cy0oAmFjC/W7AV0VAx
eBnx/OJKvLfCqGrWSwYd3sxMp5pqoTW/31bpoQzObFPPC57Wwp0azpu018li
lH2M1cytVThx23TAOF0WN3jn7Dxky8D81yJH6qIs7t5DXytaZKC84+GH/zLl
MNN5fXgkZzUe6AwwnR+Uw67FC+xcB21kGph/n2pHRxNr1tN5ColPijiXhc10
TFOyT1B3JTEvfe+9BnMCA5et1LnkRuL+TqZznwWBFtKT9bIeJHo+pe+a2Urg
iOiceG4viTaDoQYMKwKN+/8JeXaQRN8lb1aMPYFdbDvnKyEkdlsYhzt6ESht
aEfKx5PoU7maNIkmkK+rWRd3lsRalfEJp1gC8xkTnpIEEgPueMsd/4NAR8Vz
qRPnSLxznfJLxVkC2R/aZdsvkUgT89iYQuBP1bbT8TdI9MY0F79sApeXaiQv
3CTR0io+9HwOgYL8t/oRbBIH/n7+ouQOgUk3kw765pA4YRtSv8T52o9t77Hk
kNjHobKyi7/2T2Qerf6TRNUImaD2UgKjwwO/McknMWTXs6uzZQTq+tJtyEIS
VQTJ77ZXEzjv1T+a8TeJGvCYEVZLYKfLn6cVi0lseneZw6r7+utwgpFYQqJ2
tHTyo3oCj+2wrflSSuJQ1p6W940E/geL4TVP
          "]]},
        Annotation[#, "Charting`Private`Tag$36217#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk81OkDgAeD+cYmrCsN311HKXbpEGvb90VylH7kJkVy5Bgpu7KFVnJV
OsiRkMRslnXf8b7IsahmyCBR7hCNGq2ZHNvvj+fz/Pk8350KPuYtTKFQgr7y
f7OL2AbTo7G/yHKLzRWWDJAUr8sWCU6DQZ/T3GsTTBQYvZ58WxAKVl3Sijwm
SxErUSGqNSwK7L5r2OdWWonuWSpW/S6IAQ2X2LSBiRrU8+xRoaxhIhizOLTv
TVU9WrfVe1AUdhNsHW7nlZg0Ij2dfLNgQQrQFJr4lTeJkVVwAG7ISAP07OZW
//lmdLpMz4hmeA+k9j/LKp5oQan7mnRzw3JAG2O5IrzsKVrLnr9xRvAIaL7I
3ZM21YE24aPdUlYF4LLnzjDRh51IfqyMVp3BBMYcYVmKyz9IV+3CFWHDQsBX
bpByqu1Cp5jU8MywEmC5cWL4o9kzNDGwudxHUAku6uyVvzjDQv5+mGX4sAro
CALPl+xkI+5KyAdJq2rgUCttOx7IRqtK/doVGTUgcVn0U/AiG8kfz2RuGNQD
SeTTZjDTiyzebs9KD0Pg8NHJKo3ql8gxlDzoLXgKUs4lxrPfD6AuHeVGd4c2
8Jzd4faIHERgRk7fsbQN7LkdZLDJfhDtcJXYYe7TDpiRZ5gZdYOIDz5LaPV2
ALXhi8MSl4fQfYmevvePu4BlgftvSquvUAi7Qa9emwXaqqmMk09GkPYPhgx9
VxYoDNTcZj49gqYTqwvL41hg0D8vaVlqFLkeLFP7a5wFulIdGYWnRpFJTYHc
/XQ2SBUUx1wXfYO+zbrNj6D2Afn64wNL5FtU4+fbbPy6HyCPA+ItR8bQpU5Z
l3oxDvCtSfHPdx9DJjswd7ceB9yINpq6wBhDz2cUSfVYDnDiRgxwb46hSZ+u
SDHdAcDyuhKt1TuGZLx1fu6+MgjCf79DHbcbRwzPT9X2u4bBbL/fgyDrCSRb
DDh7DrwFx+Mq1/arTiH6Al7ICpkCV2Xq1wibd8gIeuZ8lp8H2jiCkeMxj3wE
Z90WdLigmWp/KI+/gAxGYSWH9gn0aU41jFhyUYW3RHYAZxmkXbJTPHxxCb2j
t//Ufn4FCJxTW6viP6KCk7fU0y2/AKc7e1MWsz8heq9V848f1kCxZAf7cRoP
qfKiwupMKZAXoZhRGb2MeKbjlfJFQlBLt6HXKPwz0ih60u24KgzTM3N7HZz/
RcpDKgm9flTomxXfkmq6gqad1jc/ei4KjRd+jKpW56PNHxwYztvE4T0Xa4rS
Rz4SWO0LtYilQeGw/a/DewTIFF23Ux4kYOQetT+KU74g25WAIa1DEjCWlRap
4b+K9l7p3J5ULAnnWg1fFhqsofOaWf/rX/0Gdj09Ybb8eQ2FJfHpzn5SsEIj
YU6idR0Fis+Mj7pvgauBDfLsqA0Ux5XK/JkqDb2n3v3QpEzBok8uadbWSkMb
e7bOk0gKLkvOV9HwlIHDrUEOBa8oGFnLzJUoyEJ9JW7LzAEhXFvamDHVJQu/
91ooVs0Rwm9UNaolz30LZVo8u+v4QtgvhJVvu10OnlhKjaIdF8bki/3C8Sw5
aLzFtkxQI4xb+kdMzvwmDzn93X0+MiK4vanD0W+nAiyJ0ywXhIpgfkXQgHOv
AsxWNFO5yhbBSdecdvnGK8KzWlWOWfpUbBu8Nu+zWwnOyd9Vm7pLxRtfxm5J
DynBIsZ3qxY8KpYK2ES8urEVPt6iU7vkJoqtpxcXkvWVoRln0EK6SRQvmioU
BCwow8OKdntVd4rhcKtIk8UH2+DsQ/0h3VQxvNs99/ApCzosnOTZCK+J4aPH
aDt4a3QoYXO66V+GOE632xUSxlSBJ7t99VeGxXHP2vXsfGtVyNAy/D7Zkob1
zDJerFBI+LyEeYvbSsMp0laxCg4kLEh1fYwNCey3aavaTUcSnuhm2A0YEdhI
ZA6JOZPQ5QXtyOIBAo/zEvjLriQ0Hw7SopsQWHfwn8CXHiT02nDPiLQicE+2
pd3tQBL2GumG2LgRWETbkpSIIaFnjQqpF0FgjrpSY/RVEjbIzszaRhG4kD7r
IogloW+eu/j5PwhsI5WQPJtAwrx7lF+qrxI4+2OnWOdNElL57GyYROCf6iwW
YjJJ6A5T7L1zCLy5XDFx9T4JjU1igq7lEnis8J1maDYJh/5+9bosj8Dx9+M9
vHJJOGsRiDaYX/tRnX3GTBIOMIUzckq/9i+kn637k4RyoaL+neUEjgjx+0av
kISBR17eWaoksLoXzZwsJqHsWOL7g3UEXnEbnEj7m4SK4Bk9uIHA3fZ/XpYq
JWHL+1vMjMavv9YX6HFlJFSNEEl8igh87pBF/Xo5CUeyjrV9aCbwf70pa88=

          "]]},
        Annotation[#, "Charting`Private`Tag$36217#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1H1Q03UcB/DfBmM/B7jxIM8PE7qiyMCI8PRwO1AaFRAdp0k7/cmJcZ7K
VlfU9HRRcJTyZF0Wg5weFBl3cHmnHlgM8i4yE26eiMHhNilmgJtsOAeOtc97
7W63e93n831/399/tr6i+s1KPsMw+3xf+vV99D/UDsmS6+aGqnbcHPTZMDhv
JJvH3VPwC4cnZc3DS/L5cjOZK3JYyPpTlffIptBfrGTt78f/hje0PMDckXYf
++mPHpK51pg5zG+4nNjP+vMBWfu+2iVTmDVjE8/b4cW+ZbIkYPwhzu8Resj2
PM0imckb9ZL7MmIdmOdt5clpP4RzkvWHw/nkN2qWYU465LdSuYTzbqmA3NIf
5UKf9MogeFXyGM51w5kfV8DSUI6Fq2yw4ex2Ee7TXVjGfG9+MObBtStkuaMp
BHnbXn6C+/jpa8l9mnc9eJ9iUEy2f1q4ivl5tQR2XIP1LeIwskql82LeMxUm
71TlWq9uZQx0f2N9OFmxpQk2ledFkEcMVr+LLHB3poIHv9QbSU4buQgz/eXr
yOwdj39e0ginnYjnI7+jN4pc9eo3MNOjjMb+VRPMufbBVtHM//vVMTj/46EA
srZrHm44chaWZ38bC++egJnZ1+OQVx4RiLzWBbghqzTQ39cWj/eELsD6d95L
QL75WQHyalMS0e9SNcwJb8Bs/h+wtuDLJMzHKoLQL2dTMvqqJmHuwgFY8WKg
kCzdqJBirrPApu+/g9mNOSzyDs7+KjNrIo/tlxhllNdgNJJ3Fx+5I0MfyyTm
t1qn4c67MzJ1ruh4w6Z7ZKY9ywqr7TPwoR02suyjDVaydOCZRbK3S/Uv2dT2
j5N8pjRpAXkJcy7yHlGPjaw/tuKWXU6qGz34mZ3MdWd7yCXOtYvod/26l9zc
keKAu5/iyX0WT6Q6ydqVftg22AQz6cIAcq+rfgn38YoE2B/Z7EI/ow1uDumE
uf5CITmju+ox+ryyl0WeyApzhR1ryNWVA27kq3uCyaPrM1dwf/u5EJwvHINN
KZOhMHPuCfKKDWLkLV3zIK/slAT91uhW0efpiDDMM7d4kd/GhsuVzcM5zlxG
Tv131cM7n9PAvv+HCMzTRv2+NQvXlKXyyKaCTyLJl1I/h/Un3l5HdnXN+/3T
Sfj2aywfHvgqCvu2D2Hu5hW/eY2woWwomnz6yvYAsvS3zTGYj9fB2rescPT5
YZiZOh2Lfl8sw4Zd2XHof3FbIN5zVxyPPiXTsEH4M7wzO0OAvPv7EzA/cFTg
f09+IvIS44KQ/4EJrjlzFDbIa5PwnsvTsL5GmYy+lq+FyOvjSXG+4BFsai+F
bzuKWbz3Lx0cXd/Gyv8Dub1WdA==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk8lAkfAPBxPqgdkSj0TLF2yxtLS2odv59yvIbI1brPHK9cReklKnJ0
qIheWYaSdeTO1cW4lnXlGMntdTQ5CjvOaOz7/vH9fA+6BVh48FIoFL//+f96
uevEuFG0Drv6dm7qSXWw5QuhacS6A7s41OujwzPw5lTe2RkbBIqZzceN2gtA
3qMsNpweDvlaWtpVT0shYO697lpMFNj7b183cywHk2es2mLvOGhS7y8eaKwE
RccebW96PGxoXDPwXKqGIPbHtPmYhyCjcvTGy443MNEwPdSylgwUyve3/xlf
A2cyp6SzvVMg9m1ct7k0E5RtJ1Ic6eng4WAxvedZHVya9qezY7JAZuLSuYvO
jVBg+eVf1rXPgBqVQVegNMFUnd+thrVsEOI8Uvo5rQksGL4tGd65YDh7dmGw
+Q9Q+dXHwIZeCEVM5SuOKy1weerok6mYF1B5ylJxuLcdEn/7q0RGvhwa3jEi
7hh0QJFFGdOithzeXbxjerOqA6aZquPMtQogD3uIMJI6wSpdhZbuXQ11dZbb
DLILVM8qp1vT34JfUK1NXV43rE4mmUzGNEA5x/KGhjcLrkXN1zwYaoBTl16y
Q5NYICSvp6qj0gjRVT9lujJZIO3G2fN4oBG6MtqpclJ9oDNuPmZ65A/QP6mo
lcfsg5hh6sVX3S0QSYKyp0A/SPXF/SdBthMWhrnS550HIDN4XBgudMKBoWQu
RA2AosTxq/NNnfDkJxm9qd8HQMuS7WIY8A4ShcckGZ8HoOSTXDLXpQvmahJz
5q4MAsvzhlP5i25YsZJ8FR07BLLuOks0WxbkiAUKP48bAaH4Mc/c6yzYpbnF
TcoegeXK68MquSywTR1dda8fgXaRhmbdNRY0cUwVyjZHIKzMkOGe3Ae1XoYv
pPxGYZDH3Din+z34Wsxz9YzHICXTPVuZPgC+DamWvmHjIDEaZ6utOQqPrlY9
aROZABH96KfDK5PQ9qezvFHLFLyxq4cTGjOQfzmr/vl5NthX5J/vIL9AuOuF
sti8GejPiaUxq5aAsana3DIzB7p1hGKp5TKwI+xsSzY/g1z4yObb+lX4x53C
QteuBRi2uXDQznMDRCuXF8YHF2Fnvx1VfGQTmH1f1cLKlyDioHiaqyEXeqpz
FCsi/4LppgadA0EUVLt/dLLYngMGJocf7i/gQbWzh74VH1iGpAm/BLdtXrzK
4nyhLS0Dn/M+lyATflT/RVL/zMsVKCwIEBePEsDNx3kBaYGrcEok23+9VxAT
jqtztdXWQOJEdJEvVQizdryJMvm0Bj0heimH3IUxkRNSKZG3DqVpPhYlpSIo
JiSw1+fcBrQlai42zezAMxyZ0D/FvkJPypyGvNZ36Ldc8OhR+1eQCDRwp16h
os+MNfPn0E0IURJybioUxeAhqyML8lvgHm7FOxGxC3Ntyg6/H9qCXJOvBrky
YrjV1+AfGfsNprLuuyQ2ieH83WjVRV0uqPjbuLn5iiNj6oRJ9gYX9j1Ztd4g
dqMVg3psInsbNuxvkuUluzHFemtwQ4WCl6+xP6ibSuD5Y3XUyFsU5JeMCEv/
JIFypxxfK/yXgnFq/JxDD/Zgq+6vV5x0eTD/tbND2BFJnE/Lr3ZK48H61vzU
pT5JnMk0PXGfwoshJ9talYOl8MdPq+x6Z17UVqJNmovuRbcwVtyHGl7cyHDr
Sqnai8daXzBUDvGhZVhY8e9W+9CoGkP77vJh1miU+wfuPtz+0ltYu8WH/BW1
2wvZ0niGT65i2I8feZe74jt1ZXDggZdDxiA/rr7qXuyalcEyn/LT0VYCGDeb
o58aJ4sh+sTctVYBVIwvjTSS349Gglayd08KYkNVfpJs2368EKjBNGsVxA36
v1MqvUjMzFeo6zUlkNrjO3jBh8R7u/qsVM0JlLN1kVXyI/FghpnXfUsC6V6G
mVkXSSzbXSV82obA1Kg9uQ/CSfQ2fmfc6UrgL29Kq3wekpjs9YpnJpjAUKXZ
92QtibPr1XI3fiPwXvnI3sE6Ej1uu0otpBP4VLPbLrmRxLP7Kh46ZhLYalQ9
uqOVxITe6O+1sgmU9oz5uM4isVh7pWi7iMDXDLnVnlkSwXkhN7OewC4FyeP3
PpMoejpYU6qJwKkC4VCjRRJVlhzt7jUTuPP14rfaFRIVZpJ0ItoJdOivESik
0PAHGYm8c+8JDHQqM/Tmo2FEB+SMfSDw5nT2LXlBGr6oRTX7IQILOHe/S91B
Q+/n3E3LcQKZodfNrKk0TDK30+ieIJDFE5ywS4yGzgktvGbTBH6K8+pt203D
Dvpjpw42gVui9ntiJWlomyxrbDJL4N8K2D/k
          "]]},
        Annotation[#, "Charting`Private`Tag$36365#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk8lekCAOBj/VBzRJYsfacYM+XG0JAay/sqy3WIbI19zXJljdIlKrK0
qIiuDIeSsWTf27yvbRhbloPsrqVjK8yxRsfc+8fze466BVh4cFMoFL//+f96
eVvEpFGMDqv2Xl7aWXVkyxNK04hzB6ySMK9PDi+RN7v6/v64YKCY1XLaqKMQ
yXuUx0XQI0CBlpZ2zYsyFLA4oLsZGw3s/fdumTlWIpOXTFTiHQ+a1QdLhpqq
kaJjr7Y3PQFsa9w08FytRcGsT+lLsU+AjMrJ268736GpxtmR1s0UQKF8f++f
CXXoQtaMdI53Koh7H99jLo2Rsu1UqiM9A3g4WMyKv6xHV2f96azYbCAzdfXS
FecmVGj55V/W6CWgRmfSFSjNaKbe727jZg4QYD9V+jm9GVkwfFszvfOA4cLF
5eGWP5DKrz4GNvQiUIyVrzuut6JrMyefz8RWgOpzloqjfR0o6be/SmXkK0Hj
B0bkfYNOVGxRji1QJfhw5b7pnZpONItVJ/FmFSCPewgxkruQVYYKLcO7FtTX
W+4xyG6kelE5w5r+HvgFI5v6/B60MZ1sMh3bCCrZlrc1vJnoZvRS3eORRnDu
6mtWWDITCcjrqeqoNIGYmp+yXDETSbuxxZ8NNYHuzA6qnGQ/0pk0nzA98QfQ
P6uolY/7Uewo9cqbnlYQRQJlT75BJNkf/59E2S6wPMqRvuw8hLJCJgVBUBc4
MpLCAdFDSFHs9I2l5i7w/CcZvZnfh5CWJcvFMOADSBKckGB8HkKlc3IpHJdu
sFiXlLt4fRgxPW87VVb0gHUriTcxcSNI1l1nlWbLBLkigYKv4seQQMKEZ94t
JjiguctJzhlDa9W3RlXymMA2bXzDvWEMdQg1tuhuMkEz21ShfGcMhZcbMtxT
+gHyMqyQ9BtHw1zmxrk9A8DXYomjZzyBUrPcc5TpQ8C3Mc3SN3wSiY3H22pr
joOnN2qetwtNISH9mBej69Og/U9neaPWGfTOrgGc0ZgHBdeyG15dZiH7qoLL
neQXEOEaVB6XP48Gc+NouGYVMHZUW1rnF5FuPaFYZrkGWJF2tqU7n5FcxNjO
+4YN8I/7RUWu3cto1CboqJ3nNhCuXlueHF5B+wftqKJjOwD3f1ULr1xFkUdF
010NOaC3NlexKuovNNvcqHMkmALVHp2cLrFnIwOT408OF3JBtYvHvpUcWUPJ
U36Jbnvc8AaT/YW2uoZ4nKVcgk14ofovEvoXXq+josIAUdFoPrjzLD8gPXAD
nRPK8d/q44eJp9U52mqbSOxMTLEvVQBm73sXbTK3iXpD9VKPuQvCJHZotVj+
FipL97EoLROCIgJ8h3wubaP2JM2V5vl98AJbJuxPka+oN3VRQ17rO+i3Vvj0
acdXJBZo4E69ToU+89b457AdFKok4NxcJAxDRqxOLMvvIvcIK+6pyAMwz6b8
+MDILsoz+WqQJyMCd/sb/aPivqGZ7EcuSc0icOlBjOqKLgep+Nu4ufmKQsbM
GZOcbQ6Ser5hvU0chFYM6qmpnD20bX+HrCw9CFOtd4e3VSj42k3WR3VTMXj5
VD016i4F80pEhmfMiUG5c45vFf5LwfFqvOxjj8Vhm+6v1510uXDBW2eH8BMS
cCm9oNYpnQs3tBWkrfZLwPks0zOPKNw49Gx7m3KIJPxxboPV4MyNtZVo0+bC
h6BbODP+Yx033s50606tOQRPtVUwVI7xYMvw8JLfraSgUS0M63/Ag7PHo90/
cqTg3pe+IrTLg3mr0N5yjjS8wCNXNerHi7nXuhO6dGXg0GMvh8xhXrzxpmel
e0EGlvtUno+x4sPxC7n6afGyMFSfWLzZxocVE8qijOQPQyN+K9kHZ/lxY01B
smz7YRgUqIHN2vjxNv3fqdVeJMwqUKjvMyUwtdd3OMiHhA8P9FupmhNYztZF
VsmPhEczzbweWRKY7mWYlX2FhOUHawTP2xA4LVo873EECb2NPxh3uRL4l3dl
NT5PSJji9YZrPoTAYUoLAyQi4cJWrdzt3wj8sHLs0HA9CT3uuUouZxD4hWaP
XUoTCS9KVT1xzCJwm1Ht+L42Eib2xXyvlUNgac/YT1tMEpZorxfvFRP4LUNu
o3eBhMB5OS+rgcDdChKnH34mofD5EE3JZgLPFAqGGa2QUGXV0e5hC4H3v135
htZJqDCfrBPZQWCHwTq+IgoN/iAjln9pgMCBTuWG3jw0GNkJcic+EvjObM5d
eX4arEBQzX6EwIXsB9+l7aNB71ecHctJAuOwW2bWVBpMNrfT6JkiMJMrJPGA
CA06J7Zym80SeC7eq6/9IA120p85dbIIvCtsLx4nQYO2KbLGJgsE/hs8IHZk

          "]]},
        Annotation[#, "Charting`Private`Tag$36365#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwl1H1ME3cYB/CDvmEFCxS0pby0LLgRGTBhC1HhLvCHmUbLiIlzGXBus27J
Jjh82VgWYENJFnkZbpk1CxSHc7KxTjO3pk5stjmnQcA1M2MgngNbHA4oldpK
S9fne02a5pPneb7P7y7XM7xSU7EnmmGY1yJf+o189Me22NmCgoLhceXI5Ygb
F74bIbMuySiZS535mz1pNocPLApkh1Vyl5xhbfmHrN/ynptcHVfqIlsMbTPo
bz/uJvPupXkyG916H/Nf9XoxP3niASxL9JG7JxWz2LfrqJ/ckLptjiwYWwPs
jcFBo+/3eTKz/5slcsP6ox6ct/70MnluMLSA/dsdDBdxjfWKF/Wx6Sjy3Lnq
hzhPTa2EbNT8toj9+WYpebi3wYf5kp1yct7C248wn5SrIFufSvej/v2PMeT2
HkUA169aqUT/OhvMedvg4f4Vj+Ef6mKx75ZP9KZLcfDhqiXknY9VYf70LOwI
tsDtNYYg8o98HU9W9WWGcP6NGQlwZRcs5F0UnZm7DF9oTsS81Afz7+eqcT/s
9WHcv6FRNWcyudx7JYyD8p+JSYKfTRO9Vp0Md34EW+4MwHvLHsCO5fWryZsP
5UeRG9t64Zbg67DDtm0N+ru+hblTD+HNTffE/oFuDfKzCqPJwodVWrLizDXY
cZNJQX92jgT1+5+K3noWtrTIdMg/HIL5dT746stDUuxz7UtFXlSuDNdz1gk/
2bwPFuoOpmE+41fYkbwxHfnaMjnyY8bgM85joquyL9Lz2NTZ8TNL858n3KTn
jfvywh9kS9bUGKz8YJzMlA4LrMlk4hINApnrf2OarO85MIV65Vsz8PWRe6hf
qvCQ+e0T0+TGq9lesuNU/r/oP1fuIwvPa/+Dnz7vh7M8s7DRGsA865xDnnp3
iP6/5UM7PcjbrwuTO2R3YeGLeYaj+sc/LaD/ietR5NqWHV7kFesk5PjbXpgv
ZGTkjvINi+hP4eSYZ0p8uP6CTAVcfUv0jb4Y5Gmcj5Cn9a6ApZ/4yfrdZSvJ
I2xdgBXfP7GYt2se43yjOXHYp+6G9Rs6V5HzW01L8GcNKvQ3OUXnVcYjL+1Q
EPvNuxJQf64+hPNPeOAOP7OM/nBPInm+7BpsuVOihlW2MOy6reZOmrVFkdNx
1O/QJZFtXW/CjD0lmfxX7TjMXS6GNaWzMC+bhF88aIgiC8Xvrka/cg/MF3Jr
yO8050STLR0qDfJfDcL8qn74BLtDgn2FL2jJfqEPtkjcsCZ5kxTutKcgb6sb
5q+U6DA/UiHjxPcHXJRxHBYm+FS4SC5HfeoX0QNGWAgMpCF/8k/YkvpSOupH
lAr0r3XCNl+WgvsfEr1Sxg==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVz2s01AkYBvAxjX8uYxsrZOKPXA4p05Ypl473tahcW5dsybiMdJFLklih
lkwRIc1GKWEsqdS6VLTYXCanZCksyhIKlTSZNAxZ++E9z6f3Oc9PlxvuHkSl
UCihS/d/2vsv5jq/O23NpB0r0ojZDL6NjZ9TWYHQrD2qYptcDH7njckAViQ8
bmaV7gwvh8yHosZ5YRzssrlz+8eiCvAXv9rkzEqCDNW187HJ1SBRsCGY0jPw
j3J96fiKB5CpW9w7JkyDV5P/Ds7trQX/knv1NqxsKA33LDM/Ug+3KsZLjPh8
4NplcVP0/wJJHTNrhfQSuPCo+ia0R5DZlRA4IMyDCf2IawaCRhg6pXd6K6sI
ujjlaYO8FuDx/pSwuALw3Kp0O3eDENal7QrV4xeDqE3DI7hbCDGXzngpSEsg
xz64f1C5FRjl7416hbfg4fU1Ghd9n8D1yb63FqxKOKx0kwfH2iHyiGFBZWsl
qPSShc6T7bBt+uje9dwq6N++vixl39/wQaLYocOvhirZ4gaRYQeY06xrlkvv
w7V/PHd9Izqhg1l4rlv4J0yrTmgMljwHij47x5zVBHpePYmFad3wXKFt6FBi
EyjQKlKcHnaDQMQ1vtLdBBuSft59YaIbdjRk1i6caAbTAwN9VPseyPT+8Kqx
tQUOBEQZ3P7aAzpZRbou3FbY7reY/8KlF+Cb8s0A/jO4z6k2fvK4HxhvSqcv
jD+DjIxf6ImT/TD8FLY2W7UD5+MhD0LlJfByQ58ZDreD2byrbzTnJRy4PPo1
Sr0Dvj2tO6T86SXcYSPTal8n3Mi9sb+FPgAQ8tW3ZeEFpKepe3OMBsH64b7d
efpd4Hgqt+XRtkHYqvDcLdKpCzbGWcXLBw2CZektO93cLqj8o5ZpVzAIm0cD
1sabdUNU7Xu/LfQhMPVp+2J2uAei+Y7ek6eGQNO5IE3Q2wvPbqVHHA54DXMm
TrVJlQNAeAyM76GNwA+DO6shbwS8BuLaS4bfwIeE03Y04Th8yqipP1k0DkFZ
4ujsS5Pg86p8Y4LkHWyK3/KH2UERNPQNfbfoMgm+b6ukYZJpiHtWLB8fMQUT
cj/lnPeZgcDZO+nUsk9w3+tIpptYAkF21mVThSIY5ZT3z/pJ4cgVmyjbXz9D
Xe662IiGBYjMc79h6DENIZQcy23GFDzOU6UzWGIoyzQKEPrI4Lzzr9z+L2JI
vXeCvaqMiu10Na754y/QMBNW5SZahi83uu/fmTEDApWIV/FrZLFjxpV+1f4r
mAjZFSdCCVQ3TJdZv1wCAbvkfwgpXI4n4zZTfR5IwCI2n2MqksN1fkya9Ngs
HKjpNuu1UECmm1hT32QO7LqZ1cdCFLH6TtjRO8/noIm3ZmT4AR21L4sb5XhS
+LzSotZ2SgnlTl8255vMw/G6Kas07RX4lKE77d42D+3xVewXZgyctlNbt+mX
BTA/Jynoa2fg2Bm18x4a3yByROtNa5Qy5k1NDzxp+QZ9O7IXbmp8jz3H+fe3
hi3CJc3M4LMV32Nb2lx8gCwFDa3Cyl12q2CKdkaXnDcFlVpfbKNPq+BaB23L
z6UUJLkpVfWpK/Hqu/pAhxkKUrbrzO5hqaLKYnaxg6MMWl62vvCxVRWvRudv
7MqRQXtza2pIuBpmHY3q/PGjDJbatQiHFdRRAPujDlpTke2b5+9SpI7vOXrJ
YelUzG707Ly+YxX+bC+43TRCRQf+xd8mh1ehzrhFyXL2MuyoqN6ol6qB77Tz
1knTl2HigKHA2ZSJ75zA2PvtMkw7rh0c/piJJu2ybf0WNDzgPUucCF2NJnf1
Lz7g0zD3lrfkpJwmev7O0B79QMMZRXpDzHVNDNHZkPTCVhb1713z8bbXwrOC
CgOKQBbL2h+4sge1cOwNc/XdRVnsUfN0GX2theqqAg1XGQKpflNO2aNa+MRc
avOBSqD3lIGDaEIL960MZBgTBCoysm1vi7XQ8TuH3wV0AkPcQs0NFEjM11Bs
LdIg0LRLd40qm8TXHNbRxk1L/5p1Os1byKX99Z1BbAJ5+3ZrR1qSGOx6kyO/
hcB/xec1O4HE6p6puZ8sCcxQnVdLdyQx91y0yzAS+MmrR1HWn0SDSoMgJVcC
NfMjFKq4JCblxF2s3EngjjG6fGAQicRenmiPG4EF0bbEo2ASM+3l2SWeBLrn
3KXER5E4dcZ01HYvgQlDTosmMSSWjcUnvfchsMxobKE/lsTSx6Zu2b5L/hot
qfmppf7VSjEjAUsemZrZsUQS8yr2d54LXPI4eEp+SyYxgRG7xyxoyZM1NWN/
lsQr/hzGwH4CK/tSv4hTSfyr13Am+SCB/wGoMxu2
          "]]},
        Annotation[#, "Charting`Private`Tag$36513#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVz3k81PkfB/AxjW+OsY0VMjHI8SAyrUy5Hj4fi8rZOrIl4xhXyZEkVqgl
U0RINkoJY0mO1lFo+XxzDI/CjxyLWEI5omkiDeP42T/ej9df79fj9VRlhTr5
EQkEQvD2/ZdWXls5dvPXzaikS4UKUYeRR3Pz12S6D2hVnpaxSCxCnre1ad70
cNDeSi85EVqB0l/ym9e5MeCkeWX5z4VVyGt59JAdPQGkye5fj06sRQIJc4wq
vAH+kW4qmd1Vh9JVi4ZmuClgdPHf8bUzDcir+HmTOT0TlIS6lBpeaEJlVbPF
WllZgGWZwUpSx5GgkZqxS3gP2LOJ6jqkVyi9P85njJsL5tTDHmlwmtHENbXr
pvRC0M+sSBlntyE2+28BncUBLqZS5TkHuUg35WSwWlYR4HcqOAcOcFHUvRuu
EsJikG0VODIu3YEoFZ+0hrhl4OXjfQp3PV6jx4vDH43o1eC81FM2uNSNwi9o
5ld3VAOZIVqB3WI3Orp08cwBVg0YOXagNMn3f2hBINmjklULakSLEF+zBxmS
zOp3Cl+AR/+4nNzEelEPteDWAPdvsCQ7pzBe/BYR1BnZhvQWoOY6GF+QMoDe
SnROnItvARKkqiTblwOIw2dpPxhoAQcTfj11Z24AHUfpDRtXWoFewNgw0WoQ
pbstjDZ3tIEA7wiN8u+DSCWjUNWe1QGOeW7l9dkPIbAp/dQ7qwu8YNZqv24f
QZQPJUt3ZrtAWtpv5PjFETT5Bpi2mnQD5udzzpjMO8TOCe7SnOwGBusOHpHM
dyjg/vT3CPkesPmm8Zz0l3eokgGpJr694EnOE/828hgCQd892jb6QGqKvBtT
axyZvfQ9laveD2yu5bS9OjqOTCXeOobb9gP9GJNYcb9xZFxSZqma0w+q/2qg
WuaPo8PT3vtjDQZARMMnzyPkCaTn3vnN4PwgiMyycVu8NoEU7fJTOENDoKss
Ney893u0pmPbkFA9BjDnsdnTpCn00/iJWpA7BVzHYrqLJz+ghbjrliTuLPiS
Vt90tXAW+WUsR2beWwTuoxX6cYJ5dCj2yF8GZ/kADU/8sGW/iDw+1ghDBEsg
pqtIPDaMh+bEfsm+7b4CfFYrU4mlX9AL1wvpjssC4GdpVsor4KNpZsXIqqcQ
XHhgHmHx+1fUmKMbHYY2QHiu0xNN5yUURMg2PqpNgJfZsmQKfRmVpmt5c91F
4Lrd76yRb8so+fkVxp5SIuwmy7EM278htBJS48jfAd/pO/mfSFtBHJmw0dh9
orBnxYH80Oo70uEyqq4EY1BeM1XkwE4B8j4p/lNQwU54NeYw0b1OgIyi85h6
fDGo60klCS+tooD6AYMhIwlIdVxWVNdZQ5YD1NpLQZKwtjLkYuXbNdTC3jc1
WUeGyveXm8XYQvR1t1GDBU8Kil2/b5ils44uN/JMUpR3wTcU1SWnznXUHVvD
6DOgwCVLOd1Dv20gw1uC/OFuCpy5IXfbWWEThU8pfeiIkIa5vKWx122baPh4
5sZThR/h4OWsF6YhW+ieYnrgzaofYWfKWqy3KAHXNAmpsD8lA5OU0/rF3Ai4
VEffUfKSDNxvrWz8tYSA01hJNU3Ju+HD+SYf6xUCTjimsnqaLgtltjKLrG1E
cOP7Znc+d8jCh5F5+v3ZIriVoRkxKFQOZlyM6P35swheYtnGnZSQhxzgH3HW
jIgzPHK97Avl4SemWmJIKhHPbHbpfXx8D/zVilPeMkXErbPu/rE4uQeqzBoV
72TswHuqavXVkhXgvHKurjB1Bx4/psmx06PCeVug7fZxB55yWTkwtJ0KdbpF
O0eMSHiA2yp2JXgv1Hmmfrcui4TnlLkJroopQpc/KcrTCyR8RZKMoh4rwiCV
gwl9FqK4+vNH7m5WSvAmp0qDwBHFS7vrHBjjSnDmA3Xvsy1RfFDOxX76vRKU
l+UoOIhgONGTZ5s5rQRfGwrNF4gY7sbTsObPKUHf3T4UbQzDJSmZFuXLStDm
B+s/OWQMD3IMNtSQoME8BcmOQgUM1+tX3SfLoMH3TPrF5kPb/4qNKq1HaNv7
m3r9GBjO9j2lHG5Mg4EOT5niRzD83+Xbir2ABmsHeWu/GGN4muy6XKoNDebc
irSfhBj+xXVQUtSLBjWqNfykHDBcMS9MooZFgwnZMXerT2D48RmyuI8fDWJn
2PzTjhieH2mBvQqkwXQrcUaxC4Y7ZT8jxEbQIO+G3rTFGQyPm7Dd0omiwdKZ
2IRP7hheqjWzMRJNgyXteo6ZHtv+eiWh4bXt/r1SUVPe2x6R+tWZeBrMrfLv
veWz7bF2EfyRSINxlOjTBn7bngzeitVNGnzgxaSM+WN49XDyt+VkGsSHNFcS
z2L4/wHZe1I2
          "]]},
        Annotation[#, "Charting`Private`Tag$36513#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0HtMU2cYBvDTlrZQuVluRSoWWYK6JbDM6cKo5zDHdPyx4iS6CCMVJNvA
ik4hDBlUlIibM8uSbQbJLGsWF3EENoniNtdaC3UsXoCJsOIKVcABlluhlNt4
nwNJQ3553u/53u/EZBe8mytkGObA8o/+L/85+rfcYmVdxobqto4/lq0P724n
J2zO7SVr4wzdbOXwLoV7ykFWbVc6yY+OqZ/A5woHycXH7g6QTbaiEfJ5je0Z
+rbUjZGvD00Mkx3vRUzi/Keto+ivfQgrbpx6jvl1OR7W4t6Q+aNsfGUfL3m+
ZgA2eF5eICvjf55A3q1eItuNKZPok4sE3LJrroVNkbl/NXBp1Wu8t54RIpdY
Ycb9p4isjDrqRp6VKCb/9kHVNPpUZgl5nv1kBvf/bpbC92dgfUOfL9l+oNyD
992xyJDvvj6L/ppfVqHP/y0vbHnij/s7H8OGvamB2M/aMYfvl38mCLmrdB7z
z/ODkZ/0WcB8TOBq3Bd4BGY+uwiXXn51EflSmhz3a7KX0Jc2LOf6SkIDX5Iy
JnpPY3kIOdqcAXPen+CsOR1sulEcSv6usQ9mXhiCy2wbBTgvNoZhfvclWFWZ
H46+e5FCnP94iLd4D+/yqgjyzdY23lK1Av0bdSKc738El8XdghlhfiTmk4U+
ZH3qpjWYP38INs10wI+z2vi88EgU5r8NFqOPlSiRu97mrfgajt57DnbEv76W
vGhuhg0DvXDWr3d4D/lGk7c12WBTdrmZnd6QGV8d+4Cl8yeOtpNd6fYessne
ZGePh9a3+t10kFVnU/vhYtZJ1iZsGoTPlj0lc7cbR8inbxcNIddZx8iX/r7y
H863F0wib6kdxXyL3U2W5hlduH/fGx5WLeuKPWgcI+tLfvCSnYavxsmGTr85
smjwGqx986NFsiV9ZAL51a0Mt2xjT9Mk+t/ZJSCLdh6fQt9dXxE5R2h1432q
BB9yrOTK9Eq/GPPVr8yg/+l9CXm7V+HB/gEOKforSmHuiwg/5CP7ZjFfpJEh
v+DiXXB4FflkQIkX/UFef7j5mzn4sDqQ7KxPmyczXcYg5F8mLuB77DwUjH00
PbAqM2g19o0tXMT+uquwZb1kCfuk7JDjfPLnsFbslHPrKof3V8QzHL0/LymE
bB7I491cx7uhHlY1J4WSYx64YFOGKgzekyGAa63wib8uw4bMbeHkvouDsGP9
P3AtkyRE31JtBPo7H8Im3WYF+tITRDifa4MFvRUwl3I6Ejk3DusPxq1BHsL6
wAH34OS8apiZ1UZhn1M9sKFuFBbUKcVwSJoSbkmETX3P4P1t7/P59zlrV74H
zLwojUa/+kMx9z/LA1/W
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVyXk81AkfwPExrl/OHLkyfiSyu5Ftc6Xx/VZqaxVlnu1YlNEj8dTI8TiS
GLTZyG50oByVwcqGdaw7xlG5z4SGh9y9DDPkPnafPz6v9x8fHRdPe1cqhUK5
9k//l6Ip3DhXedsqTOvhB+toc7ggfSFATngJSKnKd3NhGXBDNnt1WOADox7R
s7KpuXBk21dllVPBsPC0xiPDsQAi5Rj0ZkE47BsYbtkV/hewYhVolvxI4OlF
FVQcLwWGStta5tQ9iG/QrdjbVA7yv+pf4AriwDH+d7fQ1CqgtovbLns+gvWI
7Np3z6thXnGUbsyPB/n87BS1x1zoe/SCljyVBKp5/Y13nGrB3u43frngBfjz
3iv9EvEGTsyGXP5gzAHT15NBQvpbOHLfc2DOMx0aIlJm1gVvwbzTtuVrfibY
/swuybVpANpZ2VfxU3+AX1NwY31LE/juqTMtFeSDbkgRGfq8DQSb5cLv7xfA
kWnm3NORNmC1FbzqNi4El5+Hzcv12sHNK01f4FkEix0yzYacdvgpP1zFgF8M
qfLp3WMJHQBmhxYeTlXAvFXh5H5mF9xOGewrFtQAPXIj7dDdHijwP/nQ5Fgt
PDjU0m5W0QMjdmV2fybXgtfnHzjVMz1gTXlc+9KmDk4W5eQkMT4AlWn7KplT
D9KG3OpSlV64taOCHXH+HfTbs846RfeBHyfR4FR1C1xiGWQ9RR6kBxOfmlRb
ge07mdvozoPuH/2SjrNagX4w7QQ3lgcaol/98ky2DU7r7RveMsKDG/liG4ml
bXBnd+F9jYgBMFcuH7+n3AFnXj6bnC0dhILur8t83nZBzo6qLKrYEKwFaAd1
zXZB5JcS9wTlIbDWVLE0Ue+Gj6NB/tp6Q9DpIlK24N4N58PivqMcHQLhTE9p
oPR7eNM3MS11ZwiMpW6Xhtj2wL3vr8xelxiGbKvBkqiuXjja0m4auDoMaRlx
xS/+NwA3GTE6L2tHQO+b6bMKl0bAc5d1YevoOESzcxKNqifB7ofLL0LHpkBY
ccwkvoYPS2Fju+28pqHwZmhjjpoQIu9qe7qtzUCKQtf+ce48KJoud180EECk
utJ7a1iEioSEfPk9QlhLHfrXacEy9EjX+K/Q5+D6kyeb4f9dA7XY0+K9e+ZB
Qbb5itT0Bvh5GTmoKX8B2mZ9H9lMwYV3uVv0RRdg77e0x80yVPzw+YChQf8C
yOha1tm7iWKv5WzV/cpFCG570MEuE8OrXLXC9sdLwDIb+VKzJI71+1z0cpyW
YeeF1bu8U5IIAxJZeXtW4LwVYSoVS+BTxiSPN7MCjIGP9nL8LejMfHTRuXwV
RiymbcsPSyOn8suZdvYafLGdcw4Ok0Et7oPTTmbr0KhbPbLtoyxKawVWpi+v
g/afEbeqteTRxdXZTJi9ARIb1UFRhltxuXNDieKwCYNhegKd3q2o7ecwoSxN
Qf+RcMHBQAUsZV01rWJSUKhXn9Wsr4ianFfXVV9T0PxIOsOoXREXPmXzUUME
rQ6y76hdV8ImPJC7yBLBXTT0ZWkqYxMtYO5Jgwi2di9/PlmhjMcPUjtktKl4
+OppBtVhG3Zd5LNbfaiYMBzts0NCBZ90lk21tVAxx6RGq4mjgitpSUMCXVHM
vMILG7JXRa/+AmZ8qCgyA4ReofOqKMv2/jauRxRHXTmn5mPVMN1JP9nNUAxt
vjsw0Wmljh+jDUWto8TQi9csRR9Ux7j1xdDiT2J4w+3wmMI9DWxsCPo921oc
bVvP5JWZbcf04HMBuzjiOKzkKjnzfjtOVIUuBFEk8Jz5WZWYcE2sG1Oy3e0q
gTEW1rlFO2mYJvKwS1Argb+ptVoUcGnIPfcfy8KdkujbQ79JY2mhY7Ok4nKM
JKr5ZBzfKkfiNh/L0Wfzkph47sfgvq0knhpyrLm2IInbrUTz0pRIlB/L77FY
kkStLRfVLNRJZDG8X3SsSqJeiso4cyeJ40cPNkiIEri38XZE/n4Sd//afy1Q
gcATuv9+fcaNRB2frO5IIwJbCMU5bQ8SLWI5eQ7GBNrxX+t/vkpif5DnG6O9
BNqXbI8J8SYxsWMstduEwPN2nY6ZwSTWrmXK6dMJvBx0aGU5jsTVpb6ZdhsC
J5xnDWsfkUjp6/XLPEmgx9FkZkwCiVF2URYhdgReU1h5uyOFxBIdtrchg0Df
jLzHNlkkFutoFEX/ROBC9MXGbX/88+fktFwdCfT3lt0czCFRy/EVl36BwBt0
98u+hSQ6GXlwZ5gEru1QTbQqJvEes4727hKBt4i6ZqKMxLGKY0XPXQmk8L1F
OitIDOhQir7pRiC7U9skqYrEy3A05Yw7gX8DP+U5Ig==
          "]]},
        Annotation[#, "Charting`Private`Tag$36661#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVyXk81HkDwPFxxC9nbsr4OSK7G9k2Vxrfr5KtVYRnpUVMPYinRo4HJTFo
szl2o3KUoxisrGMdK9f3a1C574SGh9y9DDOO3O0+f3xe7z8+Gld87T0EKRTK
jX/6vxRV/q5T/T3zSLXH7y3jTNBl8cshUvyrgBSrb1mOzEO3JQu3JngBYMon
bkkyqwSdVviqpn4+DKw9a/TJcylHMVIOtA5eFDg2OtF5KOovxEiUoZpxYwBH
O7a87mw1clDs3s6fjwcprVp1R9trkfSvOpfZvCTgkvK7V0QWRoI9e2w2fJ+A
nejCppYXDWhFdopmwE0B0mWFmcrJbDT8JJuaMZ8OlEpH2u67NiF729+4tbxs
EMx5J/dL9Bt0binc870BCxihuVA+7S06/dB3dNk3F7RGZy7u8N4ikz6bzq+5
+cDmZ+arEutWRL0oWZQy/wcIag9re93ZjgKPNBtV88qAVnglGfGiG/G+1PK/
f1gOTi/Ql59NdiNGd3nRgEEFuPLzhEmtdg/y8svR4flWgs+9Eh16rB70U1mU
oi63CmRJ5w5Mp/YiYHxy7fF8HVgxr5g7Tu9H9zLHhqt4jYAWs5tz8sEgKg8+
/9jwTBN4dLKzx7huEE3a1tj+mdEE/D79wGpYHESWlOSml9bN4HxlcXG6w3sk
SLcpymC9BuJ67IZqxSF0V7OOGX2pBYzYMy66xg2jIFaa7oWGTnCVoVvwDHJQ
bhjxsV2pCzAD50ravDlo4Meg9LOMLkCzyDnHTuSg/UJf/fJcshvYaR+b2DvJ
QbfLhHfTqrvB/cMVD/dHjyIT+dqZePle4Pjy+dxS9RgqH/i6JuBtPyjWxAWC
wuNoO0Q9tH+pH8SsvvJOlR9HlqqKZoYqA+DDVGiwuvY46rsiULPmPQAuRSZ9
R7EaR/zFwepb4u/Am+HZBbH748hA7F51uM0giP/+2tJNkQlUaD72KrZ/CFh1
9hjd2ppAOXlJVdn/GwV3HBI0XjZNIu1vFi7KXJ0EvocsK7qmZlAcszhNv2EO
2P7gmR0xPY/4dWcMUxq5YD1y+rCt3wKquBPRVqzMBzEP1H29thdRpkz/8Rn2
CpA12hhw0+WhGBW5d5bgM6hLTS2TPsJH21nj/7LjbYBB8cbgTdoyuvn06Zeo
/24D5US7PUNHVpCMZMc1sYVdEOSn76wsv4qoX14Pkx0UuNZSsldHaA0d/Zaa
3CEhCN9/OqGnO7KGJLTMmu29hOCQ2RJ+WP8ZhXU/6mXWCMPrbOWKnuR1xDCe
XG1c3wNfH7uiXey6gQ5e3nrAuSAKwahIQemRTXTJnDASSyTgM4c5DmdxEzmM
frCX4u6F7vQnbu61W2jSdMGm9pQ4ZNWvOvYwt9GqzbJ7WKQEVGM/snM13kFt
Wg2TCh8kobjarfrcjR2k/mf03QY1aXjFw92YX7iLRHYbQmP19sGNvl05ivMX
NBapzdMY2gfVg5xn5cUpOHgyimdxSwZWM64bYToF87VfF3ToyEJVVtFNJUTB
JqdzHfR7ZOHax0Iu3C+AzS2Y95VvysF2eKLkM0MAH6LCQIaqPGynhiw/bRXA
XQMbn87XycOzFoK9EuqC+NR1OwdBZwXY78ZldgUI4tSJuABNEUX4tK9mvrtT
EBcbNqq1sxThZk76OE9LCOdf40SO2ytBv5FyekqEEKaH8P0iVpSgJNP/26RB
ITzlwbqwkqgMc111Mrz0hLH1dydm+8xV4Ic4PSHLWGHsx+kQo42pwKSdzxFV
H4Xxba9T0zLx+2Fba+jvhZZ7sE2XY2mN8QGYG+YUcoi1B0/IeYguvjsAZ3HE
WihFBDuZXFRMiFKFzdNyNoc9RHCCqWVJ5UEqzBF43M9rEsG/KXeZlrOpkO30
H7OKg6I4cJB2h8pQgy4dorIbCaJYOSDv7D4pEioEmE09XxHFaU4/hg3vI+GF
cZfGG2ui+IC5UGmOHAmlp8sGTddFsdpeN2VTFRIyHPyze7dEsXam4gz9IAln
rCxaRYQIfLTtXnTZcRIe/nXkxi0ZAp/T+jdy9CKhRkDBQIw+gTsJ2WV1HxKa
JrJKnQ0IbMtFOp+uk3Ak1PeN/lEC2786kBDuT8K03umsAUMCX7Ltc8kPI2HT
dr6UDo3AnqEnNzeSSLi1PrzYY03gWfclvaYnJKQMDwXlnyewj1UGPSGVhLG2
sabhtgS+IbP5VjOThK80mP56DgQOzCtNti4gYZXG/sq4nwi8FufWpvDHP39Z
Ss3DhcDB/pJfxopJqOZSxKZdJvBtmrdnYAUJXfV92It0Am9rKqWZV5Ewnt5M
bblK4LtEcwdRQ8LpujOVLzwITOH6C/TVkTCkVy7ujheBmX3qhumYhJ7AKtPR
m8B/A3Etb6I=
          "]]},
        Annotation[#, "Charting`Private`Tag$36661#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0g9MVAUcB/B3HHcnf+Xk5P+fhySjJTT+rpL5XpNhqQRcc4Vge0B/pq1U
0IrF2iGF5pZoiqOJ7uQSxkzQLhs2opsYWYxGUB7gIScYnAMODs4LvMMXv+/z
ttvts+/v37u7uNL92ne8GIZ5e/VNn6sv4cnWm9yzxXUjfx00/7Jq/blb/eSX
qgbuktnEzyycpm3bB726cbIw2DlBzrUXTZKtbRtt5ADZazbUazg7eXaTcZrM
1L3uIF8x7p5F/e/di+S+/vg55MdjXZyv2ZBgN8yTddEvLJN7khMWcE9ak5uc
o3xxEfMLRjzk2upOmNlRKKK+r9RJ5tvPMPyqm+vdsBBe6kVOCLrown7vH+Tk
nIq6/+C8AAXyS4eXUH9sAs5Jm4b1l6+oyJPNKY9R3xXoQ67NjnOTTfnTcM/e
s7D1twY/9A/XenBPvsefrNySsoJ7L04F4D79Vcl+19ei38aIeP6kkiD0P1//
1HFq/ovpgq1jzzEmmv9JKyy/fQhmLG+sI5edt8BCug7uPjQHsyuZwaj/KVMG
9+ZrkPe0wHyTU/I51suE3z97PeaV74KFf6Zg+WCrlB85FUI2iDNSXp0divts
GXLMH2iHu78qhYXU+jDUN4kwv0kTjvm3y7zJuhMP4ImkGZivbIiA929WwM3b
I8nxB4/B7GwfXLOnA7ZWHI7CfffuwfrJ6GjkfowSHuuCux3JMGsqisG9R8th
U20LXPPwCMwLG2Oxr80g1VeV3OTMhgOKq7JBjvKftQPwzoxRsqD6c5SbKehY
2JE5QdaLJ8fJA+99/wD5q+dtyHNLbOgfy5sll2+Zeoi86JqD/PWeuzPIY0Kc
ZG1a6hyZSVc/4lyJxcMpyfNw6CvL5PAsxQInfX9ucmVUE8z/uOgh39gQv0g2
jRwXUd+sdeK+v31kPHmnHdZt3+dFLvxu8BHZaiyUwzUfu7Bvyl9BXo5SL2F+
sgjfcDtga9cJFebdCXjMSf/vNeRvhlpgIXWXL7nyw91u+KM8P8x/cx5my+z+
6F/yXXm6PxD14hCsUx5Yi337Kp7geRTaIPJwgFJE/+gzajhiUpSe36jmP9W0
RfWmMzzt63hrHblxqAZmNSKc1d4huSUxmFxccgfWb7sPW9y5MjJz7aQG+elO
WDeuWg8bA72QX5+UbLgEs62nQ+B/nbCpYXMo2bMmWQ7/cR9uPPMlzEReCMO+
sFBv7A/LDidXvfw5zJzqgi3D/TB79GwE5n1bokC9KycSecUwbEq9BXvSMpRk
q7k6Cvck/QrzwXHRmJ+oVmG+xQw3Xi6ABZ/KGHJn0Puwqc4BZ9W9K9Uvs7Ho
996r4v8HAHJUBQ==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk41AkfAPBxDOa3SJpxZPBrN1RriZJxfr9l5dXh7Em0GMcoWTKxyBs5
IpI8RTF6CRHJCiVnJmJd677VEppa2iRyRbzv+8fn+exwP2/HEaZQKL7/8//t
q7VmPgfGmg4eDhBOe2oAjGrmSiLPE5xUCpf+yCyASgFL2o0XCGudQ931Z0uB
4+dBrgnC4fR3+e8v2pVD/Nph3hHeFeDoR2ZT71XCG/glJ5UfD50y3yfuuFoD
B65wH70V3ICyruyidxp1cEGs0wV4KcBsXLI0966HjIJTUxzNVDie4H6ZH9wA
LUemzlzn88C6UDznTvBLUE1a8R8RZML+NCHjUPsmeJdws96AlwtgFhWTltUC
668HRTom8yCa/c6i0b0VtmoxD7M18yHV1cbXVrUNjLsftMXyH0L/lxsHneLb
IZle29cnKIaSTu3cwT2dkGW1MH+A9xR09ZuUrvv0wI/LjBSKaTlUFOqstpb0
wLN7LL22yXLQVOx33fjSA+1zYcHOmhUwc80qISS0F5ZuSaxH86vg7b9D01tC
++D4kDK1R1AHAz8kL5Y4DMA37dwEPV4jsBjrdJX8YRhmvb4VN98IV0PnRC+/
HoanB+npr442AXni0p3zW0fgnP2VgsiNJnhQwk0gQkdgMMizqcOjGbRSSk/5
HR6F4uc7NzlabbDLG8WHO16By9G8C3dedkH7TsMn9PtjwCycrQ2U7gbm3u46
w84xuFZ8DVWMuuHo2m2+2uoYeFU0WHBTuiEg8DcfK6txYLbqnpS36AGj9Pc8
kaVxiPtHNsCjqBeMOldYoxlvgL2vr2gtaAAqvdXCw3onQHp/YNTjrAHY/eE4
f3xqAmr3M055tA0AMy76ts7iBCgccBBpVx4ExYrW57nyk9DFeuWY3jgI1s01
Sx2nJ8HUdErMQHYYVLa/MLSdmASm5QI76PdRUOerDZCTUzDsso3xeWocLOws
lV3rBWDFSpw0lxYA3YTDP0ObhmvEem4QbwbqzRSL/tD+B3o9iYLPTZ/gk8vd
xJ7RWTAUbSAKSuahSPKYmdnLOchM8k9G7iI4ySutJK5/BolxP+Nw4RVY3mhs
rJZZANW+nPSf2r8CXVk9v+6nL2CcoK4Y5fkNFE3ku900F+Hj+t1p/twm2Ifr
N44ylyAv/n6FvpMQyotxHs0oLMPQUhbhniuMPgHj9hPry8A+YMAyJ0SRfSz1
rtLHFSiza5PO8KaivrbS/FDvKojbRv9mUSqGtuI79ljnfoUnO4aeFdIlkPMh
Vl8QtQZu/XZxbDYNjx2iBQ9arYOXo/f+rmYCNWKGXmvu+gZ6NSHxZbskcS2Y
c8n+6zcQ23zs9zdXCpPoXO5YzQZoMaK0hgalMX/Pg+tOCZtQJGYKkrIy2Efh
sdLUKKjOrTA6Uy6D4QdDWqeiKNj+c3heptdWbDNvKvd9T0EuzdFh8ztZ9JrP
vNjwsxCa6UcGGfNlMUg1RyPuoRCG9qnN7Du/DStT7/kbSQpjGXss78Q2Ojpb
MepYZ4WR4fC207aJjjs7Pj+U+lMYQ003IMSHgek2urGBu0XQLCWF6igth152
UO0YI4Is+xCWHF8Ot67u60ibFkEtEf8n6x7yuKbXtdxsIYo2zPK7fDkFTA6r
0WouFsUAdek/Hz1XQKlLMm9Wt1BxLXPKxs5NERutI9PO+lOxOELMbEB2O+55
P0mPHKWiu71JWGTldtRYdB5RBzE8lFS/k/hVCQ/olB00LxbDqwYN5HEmE/9j
FRzGVxbHjv5Bz6oXTOy4aR2tGSeOpiMsOeEAZXwcYeycviGOpZ3FWwIVVZAR
f8fnjL8ExulmO2fVqiBnX0Wv95QEJmy+UXjoq4qHhH7gJ3vSsMVl+w1fGol9
yTF/t0zQ8HREu8sYQeKW1T4dkbc0nM2+pG0tSWJp4NyEyTsa0gVj3Xu3kLhQ
EBn8dIaGbJ/7277QSYRbSeEPFmi4HKzJCyVJbBDS1cmkEqh+0zT3qj6JM7HN
Q3/tJrCq7FPgCotEkwxVrpomgcf6s8y9DUlUlxC96KtF4AV5kfdHTEjM6w4c
2NAlsC6jebe0GYnaGfQWdWMCTxbaPE6xIrEqrL8jwYrA6XahCKoNia238/1G
bQi89LHMJsiWxLGjGlG77QnM2cuYdzhB4sqsoXCrA4Gzz0b2KzmRKPNhh5+U
G4GRw9eo10+T+Cm2+ZGrB4H0r0aD67+QaGtp5FLGIdDQJDN4zJXEiZvZ3zue
I7DDxfpf1m4k7qtS0fv9VwLZERTFF+4kFlpefi50nsD57NLpvZ4k8qRotSe5
BMa8dK/O5pB4jiKsUxRA4H8B6TYVvw==
          "]]},
        Annotation[#, "Charting`Private`Tag$36809#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk4lekCAHDbwfkGSedYcvCZCWkM2Y/1fcvI1WLtSTQ4lqNkyIlBLrJE
luQpiqNLiEhGKFnzvsTYxr6rISRDkyzZIu69f/yen6L7FTs2Hw8Pj+///H/7
WvWF5cA40+ETAXwZLwwQvZaxmcz1BE7yxet/ZBeh6lmmmBs3EGx3j/Q2XipH
bD8Pcns2Alz4rnDuml0lStg+wT3JvQHY+lG5lIfV6B34JS8dJYBu8e+TFW/W
Ib0bnKfvZ2+Dip7ckg8qDeiqYLcL4KYBRvO6pbl3I8oqOj/DVksHZ5Lcr6Pg
JtR2cubiLcQF1sVCefeDXyOFlE3/sdlsoJPBaxxq34I+JN1pNODmA2AWHZuR
04Z23g7zd00XgBjWB4tm93a0X51xgqVWCNJdbXxtFTqQce/jjjj0BAx+uX3M
KaETpdLqBwZmS0FZt0b+8JFulGO1uqLHfQG09Ftkb/n0oR836Gk8ppWgqlhz
q72sD718yNTtmK4EajKDrrtf+lDnUniws1oVWEi0SgoJ7Ufrd4V3YlANeP/v
0My20AF0ZkSO0jfbAIZ+SF0rcxhC3zTyk3S5zYBJ36HJF46iUebbu/ErzeBm
6JLA9bej6MUxWuabUy2APBt2/8r+MXTZ/kZR1G4LeFzGSSJCx9BwkGdLl0cr
UE8rP+93YhyVvjq0x1bvAIe9odBo1xvkcqrg6v3XPaDzkOFz2qMJxCherA8U
6wWMo70Nht0TKLE0Ecob9YJT2/eQ0tYE8qpqsuCk9YKAwN98rKwmEaNd65yU
RR8wypzj8q9Povh/JAI8SvqBUfcmczzrHWJpD5RsBw2Bam+liPD+KSSmExj9
LGcIqH48gyZnplC9Dv28R8cQYMTH3NNcm0LSeg78nXLDQKaq/VW+1DTqYb5x
zGweBtatdetdF6aRqemMoIHEKJA/iA1tp6YRw3KVFfT7OFBGSkPk9AwadTlA
X56ZBBZ2lnKujbPIipk8bS42C2gmbHSROo8SiZ38IO4CaDSTKflD4x/U70kU
Lbd8Bp9dHiT3jS8iQ4EmoqhsBZSInDYze72EslP8UyFnDThJyW4m7ywj4Uk/
4wi+TbCx29xcK76KFAbyMn/q/ApocsqFDT99QcZJyjLRnt+AjIlUr5vaGvq0
82AeLe0B+wj95nHGOipIeFSl78QLpQTZTxekN9DIeg7hns8HfQIm7ad2NhBL
z4BpTghA1un0B7KfNlGFXYdYljcF6mvIroz0byEh25jfLMoFoa2Q4hHr/K/o
ueLIy2KaMGR/jNOfjd5GboN28SwWFZ4+Tg0ettpBXo7eOj2tBFSJHXmrdvgb
0q0LSag4LAK3g9lh9l+/IcG9Z35/c0RhCo3DmajbRer0aPWRYTFYeOTxLaek
PVQiaApEJMThAA+XmaHEg5U5VUYXK8VhxLGQ9ploHtz5c0RBttd+2GHeUuk7
x4M5VEeHve8koNdK9rWmn3mxmX5UkDGSgEEKeSrxT3hx6IDSgvaVA7A6/aG/
kQgfrmBNFJw9QIPOVvQG5iU+THd4323bQoOHupafiP7Jh0NNd0GIDx1m2mjF
BaryY7O0NIqjmCT0sgO1jrH8mGkfwpREknD/lnZXxjw/Vuf3f77jIQW3dXs2
Wi0EsA2j8gGSlIap4XXqraUCOEBZ7M+nr6ShaJj4u619FLydPWNj5yYDm62j
Mi75U3BppKDZkMRBeGRumhY1TsHu9ibhUdUHocqa85gyEMTHUxoPEb/KQj3N
imPmpYL4pkETeYbBgP+xCg5HckK4a3DYswYzYNcd6xi1eCFsOsaU5AuQg88i
jZ0zd4VweXfpvkAZeUhPuO9z0V8Yx2vlOufUy0O2dlW/94wwTtp7J/3EVwEe
5/0BpXpScZvLwdu+VBIOpMb+3TZFxRciO10mCBLu2xrQ5H9PxYu5YRrWIiQs
D1yaMvlAxbTZid6j+0i4WhQV/GKBilk+jw58oZEQ3E2JeLxKxRvBatxQkoRN
vFqa2RQCK98xzb+pT8KFuNaRv1QJXFPxOXCTSUKTLAWOkhqBTw/mmHsbklBZ
WOCarzqBr0rxz500IWFBb+DQrhaBG7JaVcXMSKiRRWtTNibwuWKbZ2lWJKwJ
H+xKsiLwfCdvJMWGhO33Cv3GbQgc9qnCJsiWhBOnVKJV7Qmcd5S+4nCWhJuL
hnztDgRefDmmI+tEQvGPin6ibgSOGk2k3LpAws9xrU9dPQhM+2o0vPMLCW0t
jVwq2AQ2NMkOnnAl4dSd3O8dLxO4y8X6X9ZuJNSukdf9/VcCsyJ5ZLA7CYst
r7/ivULgldzy+aOeJOSKUuvPcQgc+9q9NpdNwss8fJolAQT+LxqNTD8=
          "]]},
        Annotation[#, "Charting`Private`Tag$36809#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0wlMW3UcB/DXux2sFCiMm25jMra5qU0c6uS9QSLipga2ocMayw52IHjN
ZBqmReZgWWIzcLpoNS+DrHh1mcOJsZlIW8yGMUBnYGF1BTYKwqCTcnQtxf6+
XZOX5pPv7/j/X/JW7nmjZL+QYZh94Yf+wz+902pjLYVD5zba+34L2/C6x0nO
V1kGyNzJrTfJq+yyf8ju07rbbH/zm4/mNY2QmamJUXJsWcwdsv6YZQpOTBgn
dzxm98LsW/+SeYHVRy4uXTuF+fHlc+TeTRXT6N9Z4mcni9uPbii/96A+QE7a
bP4P806YQ+T2wdkZ7K89w3BhLyhmfajP6xeQcy3XZ+GPikXkAe2medhwXgzv
2rCAfk2fBP2pCj/m/7ldhvy89D7OF3tZTj7b4IUNv0woyO3pjgBZ83FlFPno
Iz8HMc90KRp5YsUi7lOZosR5ovJDqD/8fAzmhXpg3q5Xob/r0BL2tclj0V9n
hd2H18O5X09EnJ4dx82t1ekO8kwHzW/9CTZlqAVkJt8YT94S6oO5y1o12RrI
FZL5aQ9s6jXCmuIvEsjBIU8kr45LhAVPisiGK7fgNNclmBnfvIJc03gV5kUe
2KRcL0ae1ZqE+nM2mO9mk1Ev2CYhu70+2PqUC+5oaExB/S5Win3P7ExFbmmD
3c1euKZbKcN5y1rSsO9Coywy70g63kdptBz33bIIB499CetDtgzMn3tIgfMY
KjKRH9LB+tdkGuRdlbBm8Ak4+OlemHuh93e2pD3DJbH2sGSt1kl+9Zb/Bjxq
cbE5OuNf2fuGyHpj5xD5E/P3w8jHboyRq0NnR8nusvxJsjLnoofMv3TNi7wq
ZZxsyPrcR97Yvf8u+te8O8+qLYWyk21e9F9R+sn18QX3UP/4dwGy+elJ2F37
zhK5cHnnDLmjtYXhwj7QedAHX1spJGf3iufQX7ZDBL+SNU/W6Ixi+FsnzP8Y
LSWbU6cX0K8qlGGevclPZtw/yJELa+7j/iNrlpE9730TQL5tdxTqc4uC2Df8
RzTski6i3hFaTq5/exDm6yUxmFcV/s5p32cqFfx+/RKcIYnllvU3j8xUMxzV
jzXABWccEW9PiCPbFlYJyAbTMNzc0wIzjvD3QX44TkjWVK9Wo/54Faw/fRcu
GL4aya+Hv4+wRUWZosi+ZxORd9fCXNdNuO7vAVh/kV2B+gSlGD5yG7Z9pYc1
6g+TyKtf5CMOnErGvIkdErhvGrZpmyLuPJGCvHMe5te9nPqgX4r8uQC894JE
hvyDX9Ow/7gRZu6Up6M/SSrnIu8vA966B9Z7HXBdshPmRQcyMb90Ceby5BrM
L1Iq4HU5sGi3XMH9D09hTpI=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVkns41PkCxoddm0uT+SVatZOkVI5Ds5UKx/tdozT2pJ6NVhRlXUK5Fkcr
0WR3dDlLOyYcpF05kS5u07ieUeO6EbtlyGXF0cRMGpeiZpjj/PE+7/M+7/O8
z+eP19w/4ptAbRqNdmJR//c4dmZeRGqc07W22W6e8QaUZZjm2Fz3BL3ItGGQ
xUeyl32qRhCIU8XhnPyfcmA8vXV4KysSJRWHF+6fu4mxqjaNTHAGqfologdf
FqA+6TgzR30WXtELJt4ZhWi1SGBuYiXBra91gFd3G7njyx36BSnY2P1ycOe1
Eui6D3KEHB7OpIzsP+Z+D9GlRV5p6kvoyB5Kuzx1HxaOax3WsdIgD476sCap
FLPaD726BRnYfnNqR5xdxSLHF8fYSgE+szA5atBdAf+gC8EPOJmoz9s6pxNV
iSet+2IvqbMxohTtLswW4sDeKY4ZKx9XFOn7LkpEWG+YGvyH4BZ6Pf9TrJ1b
iwWZgzyVXQhpxF25vmEdesUT4URZiK+mOPHHz9fhn9EesXc5t5FhdT3axace
c8/NUn5UF+O2fFD6jCZGkLtPF5P1AE1uyQUrLjXA3nhqoktQCTm39MLAbgla
eppqImcqQeVvaZiPkuBQzr94ht8I8fUz/axHuRJEW+xet4/+ELbDJ3TYMxIU
szI9W7gixO44l+GV2whTd6fa+sgaiBTt0uCXTUhgN0o8b4khPf3rWLt9K7wT
qGvO55vw4gvp052B7Rhw7e+dLW5CuHeqpd2Fdhwz+rf53e4mjI1H001vtCO4
2LF0pU0zMv+ki9N62nG6J7hT0d+MKo2ie79bB65uq192fXE3hJhwOZufQqwI
vSx/9xtOV0lXhIV14mcbf2c3YScW5Ol1MfNdKOHf+ZlLdaNOO9Mk8dEzdJ4s
5r8b6kPojdw40ygpnJz6htILh5C8IfHOXE0vTDUO+xsFIwi4aZk6urQfHdX8
MRL/Cix6Zf8t1iD2LJ/JWmU1hurV0SF69CFI1tn8wjBWINCeK+IbvITO03Bx
QMcEhihZtefkSzBqDqbQ6pQo+FZkmfhkGGvDjnb3207B1xCrbleMgAoJ/fJ1
6jSGwi4sf8P7L1IeB1Rrab3DAUnPgkXYKIJW+3gh6j3+Ah2DZXteYXODh1ZJ
yyx+fb4yS20oQ8Rjh27Lv32A6FCIkeWYDAIjS2Fn5kfIu7uUGWWvQcTzDTxK
ja9NQsPnL4/h29CukQDuPEYzIwJ0j4/jgP9tRmT/AuIqWxt/3yhHkI+wwmUz
jdyKP2D/u0aODOvsV6+lNNKRL9y1v02Bs+rvLcy4WiRf0ValTH+Dm2c9Yvsd
tUlegs7ExpMTqLpxz501rk24h8oNhLveYnmMxpFe+AlxSvItSqYrYb7b3e57
308JJy3IOuvcYq5fU5mkr0N+4VzmlcqU+G50lENv1CFURMjzO0cmISi3CWDF
fEbck9xbZL9N4nzSmVQZcwmJex3fa+IwhSJVmWS9dAk5anBQekI4BQkzOuUD
V5dkHSzjO1tPw3xi4xFP6JGJ/UxO8P1pRAT6ifZO6JHhU4cLv/vrDGL6+GYd
WfpkbPPVsvSSGYg04pwXBw3Idu4VJ4bDO0y0hd9I1FpKtjy/xG6WvEOQi5Go
qG4p0avScan3ew9+bWVfUCydLHA0E4cW3qO8r/dizbplhC1gxD7MnIVR0Qz7
+sAyMtMeu27GdQ4BzHSe/hVDMlqb8NOT6TnYtRgrflzNIG+Uk2eUBR/wwmtw
jfs/GER3OtSKivyI2drgFUMdDGKdneK9a5cKfP7CTf9OBhFe8/i71FGFLScz
bEe7GGQDOeIYS1QIXf3YbfwZg9iJfUwfuqrQH78meeYFg9yvZEpdDqkgtnv+
RlfGIA0a25G0GBV4D5ybWRoGGXW0Ov72ngrreb0eFTSKjBt4O94rU6HBL3LY
TpsiYp/2TeFCFT4uy5t30Fns12p2TNapcPLUh617DChy19z2q0/bVThg9SDf
eyVFQn44dtVXroJCy9Vm4HOKcLgvW2zeqpDaO1Djt4oiO3YOm9GmVXjEM5AG
MCnCyvvEovCjCttkQfQIC4qIfDlpGj01OuvnsyfXUyTsomt1D12NUwL+ptOW
FPG7s0KnfPHXhbsfseM3U2Rbebsm1FQNZ+bhLpUVRbY3G5XuZarx58xb30Rr
igyxB1I2mquR8OQHBc2GIh65PYlLNqjxeQHzLNd2ke+PipzXm9T4H5E2MCA=

          "]]},
        Annotation[#, "Charting`Private`Tag$36957#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjns41Pkex4fd2VyazC/Rqp2EIo5Ds5UKx/e7LmnsCc+GFUVZl1CuxdFK
NNkdXc7SjgkHsSsHqVyncf2MGtdtxG5myGVdjlxmkssIzTDb+eP9vJ7X8/rn
bRAQ+U2QKolEOv9x/2e8Q1Z+ZFq83d2uFRFLZy9UZerlWtzzRJRSvZYROhtS
vK3TlJwgdLEsglHwUy7oLB0YP0CPQuU1pzaeXC2Embou5RTnMkrTKOdVfFkE
zcnnaLmKK8g7ZkPXJ7MYOo0SafvoychlsHOY1VQCebNbbYY4qchENDZy5G45
qLmOMLgMFrqcOuF21vUxxFSWeqcrbqLunNH0W4tPwMh2t40hPR1JQqLXdiVX
worqU28RJxMdKlw8HG9VA+U1X5x1mOegz4x0z2iKaiAg+HpIBSMLNecfWCVH
18KLzhNxNxU5aGKe51ScwwX344sMfXoBui3NOHFDwIM9Wmkhf3AeoAFPKFPN
a4SNKRtJmkMxEkc+kmhoNcEAfy4CzxejrxYZCeeuNcG/YzziHjFKUKbZvRhH
32ZY7dNP/VFRhkokI+JXJD4Eu/r20ugVqM0lpWjbzRaw1lmc6+XUIgmz8vqw
kwA6+tsaomS1iCjY37IeLQCv3P+wtL7hoq9faWQ/yxNAjJGT4QnKU2Q5fp7s
IBNAGT3Ls4PJQ3GHr2Z657WCnqtdY3NUA+JJheKQsTZIdGgVeD7gI/GlX2eE
1p3gk0jctb/Whl5/IX55JEgIw85DAytlbSjCJ83Y6roQzmr/1+CRqA3NzMZQ
9O4LIaTMtnK7RTvK+pPCT+8XwqX+kB7pUDuqU0pFbi7dcOdg85Z71p0oFOsy
GaYvgS8NuyVZ/g1dqhNvCw/vgZ8tAuxduD1oQ5LRFLveC+Xshz8zCRFqUs3S
TXr2CnoulLGXRwdR2P28eL1oMdjZDY5mFI+ilL1JD1cbBkBPaePWyplAgYXG
aZObh6C7nj2DE94gOqV26AF9BI5tlWXvMJtB9TtjQtUpoyAwtPiFqiNFQdZM
HltzDMgvI/iB3XNolJiq91wYA2rDyVRS0zwq+pZnnPRiHHaHnxENWS4iPy20
o6RmAojQsC+n05bQaPj1rW9Z/4PU54H1KirLyF3Qv2EUPgnBO329UfR79DdE
1txy7A2YtniolHesoF/7tmcrtKYg8rmNyPgfa4jnFaptPDMFHG1jbk/WByQR
9c5nVk0D5q+3sAgF+lo3LGL91gx8G9Y7EchcR5NZkYFq52bBPaCEGjW0geJr
O1t/N5FAsC+3xtGUhB8kuFv/rpRApnnOm2kxCXcXcI+6dUnhiuJ7I32mCi6Q
dtXNZ7yFwisecUO2qjg/kTxncmEO6u4/dqXPqmKmV7Um9+g72BqrtKUUf4Lt
kv1KUyjzYODkavW936eYkR5snn31ozfvqk3WIONfGLdYlVPz8N3kJIPSSsZE
ZGjfw9MLwKm2CKTHfoZdk107pn5bgGvJl9OmaJtw/HTCgK7NIpTKqwR7xJvw
Gc2T4vPcRRDQYlLXmGo4+2QV2958CQzmTE57InU850ZjhDxZgsggf97xOXU8
fvFU8Xd/l0HsIFu/O1sDz5jeqcoolwFPyc99fVITH2LetqPaLMNcV8T9JJXN
eH/fTYd2wTIEO2rzSps2Y/U6smOz/3tgN9YOBsdR8AZDOee18R6qBwduNBhu
wQ4catzTrBXQLpU53BvegmXCOEOZ8yoE0jJYGre18GRj4k8vllbBqkNH+uNO
Kn47v3B5vmgNXnuP7HL9FxWrLYWZEVEfYKUxZNtoNxWb56T6HD0qBzZ7ozCg
h4q5dz3+KbaVw/4LmZaTvVS8F5+2jcNyCNv53GX2FRVb8X31njrLYShhV4rs
NRU/qaWJHb3kwLfqe6s2RcUtSsuJ9Fg5sCrs2+lKKp60NTv37rEc9rAGPGpI
BJ7V9LF9XCWHFv+ocStVAvN9hfsiuHL4sCV/3Yb8se9WHl5oksOFi2sHjmkS
+JGB5VefCuXgblZR4LOdwKE/nL3jJ5GDVMXZYvhzAjOYYx0W7+SQNjDc4L+D
wIePjOuTluTwjKUpDqQRmJ7/iVHxBzkcnAqmRBoRmOfHSFeqK6CneT1nYQ+B
w2841/dTFHCRw953yZjA/g+3kasJBRQ7PXNIMCXwwWqhMkxPAfa0U71yMwIf
ateuPE5TwJ+yd35J5gQedRhONTFQQOKLH6QkCwJ75PUnbdqrgM+LaFeYlh//
/VGTO71PAX8BLw5kIA==
          "]]},
        Annotation[#, "Charting`Private`Tag$36957#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0ntMUwcUBvArD4EKwuJCtsEMMwPs0gWXBUe34b1mUYY6XYAUpRjAoZPB
IhuzmUaa+gdkTifZGGoJWbqgZqYdizJgYxIafLIJgowiL7ktLaUPsLVQehmF
cb7apGl+Od953Ju+duhY1uEghmGKV7/0u/rRO3/SsV+ki5K3SNo6V62Jz7vN
5td0vSzb2Q+/8VIP+YDBPwgnmgfIJ7jdw+SEF9kR8vDer0dhvZwnq9+VjpP5
lL+M8EL8EzLn/sSMfI9pAnW91Mo2ZRjLQjt5MnN0k518rq7ASFbxDTOoLxeY
0K/d5iLv0eZNkgvl191k3b+JZtynSvLAuVNwgvciXMalWFDX/jpPdiZ9NIV+
xT4v3KKBmbACH+YbjFay3sIKmFdYPo38oHWRHCktsiEvzl8iS7ZH2VG39PnR
/7sZVunOrsB3fQ7cM3qC4egeRakTeeYp/MDZDjPV3WvIzrhLM9g/lhpElqh3
ziL/9w3YGTM5G7h3Ipgbaiz3PpK7sO/UxyFkWekvMJ8uwBfyI914fx2PQsmx
pxthple9lrz1cPIz9JsywsgKVy2sWRyDDbLFQH2rNhz9IcUePE/KOGyIUMCq
4Y4I3JPthrkdGSLk92fMIV+Ruw7uy5rH/m/m4AtzNriwsikS91fe9OJ+QRmF
vLV+AfXqtPW4tyfTB7d3wwrxMMzXH4kmt07LBOxLS45B3tcH63O2B7x3AuYM
VbDioD1Ql/Nwa+qo8Pz/d5390HhSt9nZy1J95Ns77OXydNnQyCBZ876kj1yd
WjdEVpVZB8h339w/RuYd+mHykePSCeQfDj5hs/7YOHn+HR71pkQT+ZbrMayP
uWcmf1CqNJILa7qs5Mb7eSY28D7s5IE08SSZy5XPkD1axoz66QoXufZsJ8z9
9qMbdfMOC+Ydc8EVDdWW5/d6yBvaWqbgK5J5cvPGEis5oeiWF/5ZPI155b0L
mPfDdzB/brOAeUWxNjxf66H/4LbX7dj34OASHNsBq9IMfvLbhmsOMvO9coWc
HaR0Yp7uJMPRPSuhM8h/dhPOvrQFTsgrXoN61UNYX/lqELk558os7ut/IZhc
m3j/KfbfUQZz4vyaM3vCXNi3nBNC/rO4AdaMbwgl2956HKgrePjMrrGA68PX
kqXbRmCVox8Wq+Pd2P/ldBjy/lyYt9WFkzPb33uGe9M+jSCX7IvxYF77CNxd
cDRg2XkR5l10wyoheh3qzbvnYFtSJO7rks3DLXXwNfdtWH/geBTym3q8eP6r
ovXI3/h8Ac+nVsPiUQfMx52KRv9XVb7APa/EIP8PD+uNJbA42h+oCxq45F6c
gP6oZThzSSSw/wMgy5qu
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzHk81PkDx3GSZKph5uvqFxVTFGVRWxs9vD/4JWJz9Gid61corVauJlYS
jZbwK7HzsylpO6WSrKuUUMQkd35acsSQcy7njOO3vz9ej+d/L13fYNdjy+Tk
5IL+7v+ODf54bKV5lKVXBedXjwB9uMR9CWynu4Owjb4eZXPBLW6e/oN+Any/
0AF1j5uw0ljrPUYLg1PAeB6Pexu7XepeJtAj4cdpPK155h6MU37RYTFjkDSY
O/Vl8QHS+tXQQ7sA9gfG1UT7XCSur86OoifiBn/7EV+vPCjs1XG2U03GrG/7
0PW1+YjxYMtpMC8jWDkv7t1sPsx5afkdtDRURvx2YjKjAKaKNozT9N8RIHuR
Hv5LESao4GHPK9ewLumTk0CvGI/1rldaqV7HqWsXDRPeFWMLkYSqMG/idbf0
YqZCKa68cvnpI+02Rh6xkiucXuDirDwvhJ6DSM24nEX/cgwsae4aaMiBbUqr
dFV3OayVjG+7XXmIuI3seYfDryGn4RllqfoIVW0Puz02VCB6R4HhamYeil9a
eXOWKrBn97PqVloBipaM/my9VYVvwo7qB9NL8WKa3m+YUI2DDr4jFWdKMTkd
83W6qBo/b/LLY/aUIs3dPfPoQDVy2/13FT99DiNOcrw2qcEmixO2C85lYCe9
6T4mqYHW8uDjyenl8N5PuYoO1ELewbL1UEoVHD5xilHLQ2qJZVF0RRUKz7IE
ZhM8bNyEjHuTVRBrju+QUO9huQCvGe834A2Vb+/2eY/op1b9mdvfwsZm89tw
8XtMU/skfQ3V2J/56629jA8Y6XKgQhh1YDtnsIJNG/HZpk19k3Udjvu0vdN2
bkRTrrdWR1gdLqjPm+adakRJZJAOaatDe3pD9rlHjYhXu2KgmsHD+oG9VaOM
Jqx3bLHI165HtrXZ8q6EJhwqc/cXGjTiVmbv/rnAZnTXF3h+l90CvsTwWg3V
ikzn7h/0MzpwrUuD/2HpI+yNAsy4qj1Q4p/cltLSgb0PI1QK//0F79Vf23eb
d+L7E4FTn1v56Jneo0PL+QylqLH8ctow0npsDML4PZA3mzjtQhtDsq7yIBH1
gs29mXP3gAB6P4YO/3euD785BYjbtoqw1Lzz69LQF1Qt2MoK7osReaerIpnX
jyfyixYim0lsyz/s2PZ8AKUdk7GJ1VNQ54tjBOl8xCq+WTgfMIPiKBNh9tlB
3Oh057fIz2HHmp27GF5D6Ig3bo6JlULtZNVk5JavaOZ0TiZtmEeU8zMV7vJh
jByu1RbeXoDRp817FhuHUXEuJbrIdgkXqHvrH+eOgG2QwjoZKkeuNmTVMGJH
kTknouWYyhP9XtPL3rZjyDpjQ1dftoywLeI6e7XHYfK5MD3v7TJyKMLxXyr8
cQRpJTWwOQokfrfbUvzDCVxaPLA5yHU5qbxTMbb7vADfNhgtplKKpO9piUs5
S4jXdrPigQFFYuc89ddQqhCSjC1ZxwtWkBs3Lb7nzwtR2hRZpxamRC5ptOZy
fEXwKixkSKxWktA4T153swiX41S7FhSUiUQoOEdZiHGS1eS1q0qZjCaq6F2+
I4ZByNmZm6k0Ys/R77mlIUH4fVv1nS6riEDJz6SOI0FWwsLBOd3VRAfPyMF5
Cdxc22ijA6tJFFsvfmPwJMpE9Gja3TVkO0crifFlEosW3yp7htNJmYJJ5pOj
U2gOPqvVvlOFOAv3HW7qnILVg3ZdKwVVUhQrymj1m4YgVpdpHKhKlCyjdMLH
p3HMKdrGlKdKzh4wl3SFzuCApP6CoxmDcKe4vY4rZjGTvF0hJp1BVvW5XRrl
zmKOTnxqxAxirm+RKzCYQ2CA3Tt9TyaRYzkcbq2fw53CI6FZL5hkq78O7ecg
KWpn5LY5vmSS+ysTF+xCpJgw/2NQ+opJCsRGcfrhUnxX2eflXskkbreNzfsj
paj/4GtL1TIJ68zVKL94KSYH/ddd+sgkigf7Qs5fl2Lf2p+qTwv//iuXahvw
pAj0Vo5liZmkxZabpfFBitTsh+YtEiY55BFWsqJJir82jzz9ZoZJ0oacSr5+
lOKU2cnMkQUmiS/MEvzZJ8V/HIKCj6yiCMfWkhMwJ0XZ5TWGKmsooqiXW3xk
Xore5icDr+gUqXj0PMFzSQpD9wmPdUyKeInECs6KMpT7B/+zXYsiDyL0gqwZ
MvQ/UFmK/wdFuooXuURNhpWjT5/v0KbIodw+H2jK4BoqNL66gSKPcoXNljoy
RBSmDkOXIlaPS6KxUYYbMyZ3J/Qo0uhQVktYMlSZN/tkbaLIyyj7Ymt9GYbO
ha511KeIq2f+vn1bZfgfp9JMhg==
          "]]},
        Annotation[#, "Charting`Private`Tag$37105#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzHk81PkfwHGSZKph5uvqFxWjUcSitjZ6+HzwI9fmeljn+hVKy2ocTSwS
jZbwk9j52RRaXY5C1lXKG0VMbvLTknvcx5hxzjh++/vj9Xj+91L1Yjhc2iEm
Jhbwd/93dvzHS7sNwo3ca1i/uvrSwT5mxK+H7IIwU2vyIpMN7PKOlT/IVxDX
O2hM3jULjBX2e8ySgpGt71whh50Dp+2b3saRw5A3q+2a4vWnoJP0iwqNGoUS
xvOXR7aeQ+qoHBok3ULMFsq9eMt8iD9Ynx1OjkcPudoXvNwLQeKsip2FbCJa
8+qZeLC/GKJcmWIK1GTEkC6M+bhWDAac1OJeUiqqDf3tylJ6CehJmlKukX9H
vqI3aSG/lME8wZhyu3sfHUj4YrugVg4v1B7UGss+QFfv39aM+1gOR7EgSIaa
hWBAeDtDohLuvrP/6TMpB00X0BJrbN/A7TVxTiA5F4UpxuRu+VTD2LbiqbHW
XGSe1CXcM1ANJlI6Oc5381DMYeaGtROAmIJbuJFsAarrzhtwPVQDkSdKNPdS
C1H5W2MP1nYNnDn9qr6LVILKtrX+7HpUB98EX6QzyJXozQp5VDOuHs5be03X
XK9ESytRkytl9fCzunchdbASpbq4ZFwcq4f8Hp9T5UWvkRYrMVYZN4C64RXz
TbsqxEx4P3BJ0ABKOxmXE9Oqkcc5wmHRqhHErY26HJPqkPUXVjlq5EBKhVFZ
ZE0dKo2gLejPc+CwOkp/ulSH+IpzJwTEJzDaRO6rHu8RZ6Jae8DzE0QWGY9m
aH9ApqZHPoTwP8EKYSYYbq1H5zJ+fXSW0gLT/dZEIKUJMe3SaQy9Nvhq2i2v
btKELnt2f1S2a4P2fA+l3uAmdEt+Q6/wahtUhAWo4O4m1JPWmn2joA1i5e5q
yKZz0MGxs3UzlHY4aNNpWKzcjLJN9Hf2x7WDY5WLD0+jDT3KGDq37tcBA80l
bt9ldyKuQPN+A9EFGXYDP9DTe9H9fgVuy/ZnsNTy1WfLDiIprv/xpM5eOJsX
KlP67xH0SR4sBwz64Psrfstfu7hocOWMCin3K0iFzxZXk6ZQ6qCpRjB3EMT1
56/Zk2ZRoqr0OF4cAiY7K/eJ1QJS+zFo6r/rw/CbrS+/+9gi2u44Obk9MQJ1
m+aikmd8FPa4vyaRMwovxbcMF02X0PFiJ5vu12NQ2bsUHV+/jOS5/KiFNC5E
S77fvOm7isrDdXnZEePwsM+F2ym+jk7sO3mK4j4BvbE6HVHRQiTnX7cUdnQS
Olh9SwmHNlC43SsZ9s4pmHZqVOblbCKtL0fObLVNQc2NpMgy8210i3h68EX+
NDA1kmj+QWL4XmtmAyV6BjLWF0m5euKYPqSX7GE+C5nXTcnyO3ZgpmFM35Dy
HOh+LU0r/LADO4ba/EuGOwcBSgmtTJYEjj3tvB2bNw93tqyOBDjsxLWPa2ZP
31yAb1u1tlIISTxcVGFfTeMBWKzxx8YksYXd8l8TKTwQpB/NvFyyCz/MMvye
u8GDyvawJrlgKXxHoSuf5bUI7qWlFIHxbhwU48YZ6FiE5BjZ/k0JaSzgLdwg
DPngT2t3P1UnjWfiZdSSH/NBIzBiNSuFhC1Z9MFHCgIIeWYuf9J+D16Q8tZt
YgkgM27z/LrqXqyCXuHzGwJwdugmzYztxeFMtdjDjCWoWiRHkp7sw9ospQTK
yBJsGX4r7RZCxlUSuhkvLy5DByNCqeekDLbjmTm19y2D8fMeVWMJWVwWvZje
5b0CC9GqVB0/WSxlFK4SMrcCl2wjTfU4sjjCykDQH7QKVoLmWzb6FMxeZg/Z
7FqD1URtiag0Ct4z7Hxnhr0G62Ts2cCnYAO6Yf6Cxjr4+Vp8pLtRsRjN2qmr
eR0el14IynxDxcd8VEg/BwihcVXsuM1bKn62O37TIlAI8wZ/jAvfUXEJXyuG
HiKE72qH3V1qqdg5R8dgNEwIzS1e5kQjFdOu3wv3jhXC0rjPgTufqVjy/HDg
zQdCMNv/U/013t9/6UplDY4Q/Dyko2l8Ku40Z2cqtAghJTvPoFNAxY6uwRW7
2oXw15Hpom9WqTh1wrZi8rMQrur7Z0xvUnFsaebCn8NC+I91AOPCHgKzzI1Y
vutCqErepymzj8CSavnlFzaEMNTxcuwdmcA1Ba/j3LaFoOky73qASmD3Rb6E
naQIqn0Y/+xRIvDzULUAE4oIRp/LbMf+g8D95VtsLCeC3TNFr08oE9gxf9gT
KYrAIYinc+8QgQvyeR1GKiIILU2ZQqoENn5REYkOi+Dhqu6TeTUCt1lXNWKa
COoMOjwz1Qn8Ntyy3IQugokbQftt6AR2cCs2Mzsmgv8B2RqDBg==
          "]]},
        Annotation[#, "Charting`Private`Tag$37105#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJw10w9Qk3UYB/CXEczxb0AnWdTa5E4iVCC9ok72DiPB6vTg7KLDw1fB0BDJ
PKmI8IVuyBmn59lRcsLNQOs4TD28IOTWwDMtKBVpCrfcFjAYf7bxZ2NDBvF8
37W73e5z3+f3PM/vvXeKfcVZ+0UMw+SvfOl35cMHOi6xR1KCpJ3Km7+u2JTy
+R22XaYWP3fxAVle83YfueBQ70OyRlqqhw/PD5L5iUwD+UTX4j9wy9dGWLnF
SFbdEY+wu093x+z8wEzmSnZayP71N2D5qWNW8s37zf+i/92/J8lvDm8YQn3O
NTvOr/0BVvFt0/A92zBZdzxjFp6ZGCEzS/1z5LzaHgt8pMUFf7FhDPOiPnKT
G79dY4W9Lg956MplmGOKn/jqx+F41yLya49gvk3lxb7c0phv/2XyV46ESTy/
UCWjon16v4N1VbF+5KH8XVPIT3rhRq/UhvMnakXkvMoamL/X6g+HtNgxvzrv
KdVP6Wa/H6MdyDPYAHLX9r0wd2YK3lvSBJvOGAJRH66cRr31kpismKmFdeNH
VyEfNcOqgjQJ2VwdO4N+aQdhv13JMPPgzyDkjbdguXoCTn3/Ks5zcT3ByLV5
s+hfdD2EXHHAAmuadoSinntjDvP0b4WRLyT1wlziy1LUz7/uxLyOQcG3ywUf
2BeO+6XfdvreB1iRmeBC/3RFBPbtSJjH/VvP/W+38D574NTpdphP5SKRV8k8
OL+DhxUDMbAu9i58ITke5r3729gX1ROKl0I6WKqvzOxiT3c7Hbl7esgmkaSP
zTCXJh9X9yP/9Lye/Mg4oGeF5zsAX559iPrsZ4zk7MPaAbIuRz4CqwMfw2br
KNv0ccqhdWtMqC/eYyU/X1An+FbRJKw4ZmaF991BLnu3cIjMxWqmyYZcG6zJ
jZtF/kvXMJm/uN5JXty4yQKL6lzop48eRf91SW5yp0QLy1/43YPzrt1j6C9P
fYLz3LNW7BsQ6UUeuG0c+0hOLiFvenoCrp5bRr5sEeyRMyrKK6Mm4YrVfmTD
jZwpWGyEy/o22zAvsVlE3nJlHDZ9dtAf3vqNHe5c+X9ktcsa7FkOnD8bF0BW
bmyGda+54Yb1Npg/+lsg+fHZV6Zxv+4qMXnp5zJYVc+vIpeHLsCcYZuErA1L
n4E3M0HIa/IFD0bDMncRzNgKg+Go1bO+9yHYNw9mWs6HkHP/2jQHr/0yFA73
d2LfD98Lw7zmUljzfYwU/exDMJ+sh7WJaS7MfycjHPcrvA7rBv+Ay4fr53Gf
iFcjcL+FEjfu218HaytkHuQWGyxLavUI+8dHIi8OWkD91U8Eb80W3HYfbqiv
W2D/AwPPhQ4=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVj3s01HkDxgfTZN1/io11iUyyyovIvef7dqWIXCrWLbqodWlfskS5ZR3F
olplxEqJinZSKMMpMzQu0TRFkUo0LhFDzFS76bV/POdznn8+z3kMQqI898vS
aLSIhfxLdU+uQWJM3PoEbuW3wZsrIOvz2LcjchdkXjW4ufWdwXHq+RFW5AFY
W2RHVlxjwckxlDUiPALmhg1m33mXgDPl909KZCzWFlgkTvSVwv6yZ6COQiI8
4qO5k0vL4G/KDH4pTIbXOUWd3cvK0fdah3s08jcc1fqSUnnjOgruLvu4wTET
94Y0hdbbKrHnzFIjNYUsWHXlhPgKqzBuyNjYLcyFT1oIb9KHjUM9X69EReZj
iTnj7utX1XDmJTjt6j6PN4fyTrX87zZWsT93OzoWIH1Fy4lguTsYzZxjKChc
RBlzpIDSqsHt4lgrobAEVwU6U+26dbDwjMwPj7yKtCvbgrXu1KPEuWrwjUE5
TPwPOUXrcaCGCTOv7nLIH7zxyCaDA7HpYb6d4zUccFWmb/VuAHvRgU8MhUpM
heulGb9uxPl+syqBkI355vaImoAH0MhdqfpzZC0Gqg1Dhsa4eNgS3s5+XIvd
NH132hIe4v6uTpeY10GviHOX78BD3wH8k/KxDgcbLvwUmMVDidOesQtx99Ah
0O8ZMGnGj+OZvIepDQiiGR+9tbsFyy9LHPK2N6GmSZd9LoOPz40FWlaJTYhf
9PXqeAUfwheO0p7KJpxgH3yh0c5HmkpatY4KF7dTVwiGFVsxHK9qUiHgwhm5
rr9nt+KGxyrN+z7N2Jin7JKU2YZ1877iiSA+jGPu9Ocd7EBNy+ydXdl8HNJI
MkpP7YBVdk78g3o+WLWGxUFFHbDUaZE9p9GK9cdEWzqEHTCzN9dw6GiFmheb
nu74CMxYhn3munbMjHdN1it2YulkdRpTuRN3Vm7qvs/qwufJdMX/BDxBliCB
l8EVQBR/9bPoQw/8fOe0cryeIqzS0j5Q2o+uIkGYc1c3+uz6Kntd3yLG7YLM
L+PP4TotEO3ze4fSwjYljlIfNseauv7lO4J70eLyabl+lLbQDMOY7/GnwrDM
ae4rdIwqXkpZ8wH6/GF20Zk3WD3eyqfLiBc8ew+pswZQ29ros2rfNH7TKCzL
DX6LlblutomiGTT+ej1a23IQrQ0sz8Vus0j/Ysn/Ih6Ex9PUJq5wDrdEgQks
zhAKBTr8gJ1S5ChsP9Z/4h2WrY2hm9d+wtz3VUxrSxESkg7kW9p9QQm7xt1m
RgQ1C83g8NK/8e38Q6djl4dx+lHwiR6TrzDYtUf8bO8I2ncErF1+fR63qOlm
vx9GoVuomOshTyP7t6rOnOSPolWu1vxaO40U2SnNJ6eMQUkfEbrJMkRSWDbS
ZvYe1WsMjspYypLXYlrO2Rfvse2WR/nXGVnCkg3WmcwdR+JI4FGNcjnCPJan
7O80gZIz9RGbD9NJI1/pxNSnCay0iLIQmSwi/M5f51SqP2BzqmxeSf8icvaK
a2p30CR2Ow9pxxQzyKu9nXNNulOQbSoloV6LycNlfX1VgimoruFYcOnyxK12
x7txIoaqioGbXYs8qbigyTAtFaPi0n76o7jviKJRUsT382JYXZeKYh0USLjb
9lLL0Gn47g8LdZpWIFfGn4qW86YxsMSyMvqyIlFO8vZtMpyBn42LPnefEsnw
FqlHZM0gQhlmq7WUCS/JhqEyPYPoPakHb/YrE5Ps4qSU4I/oy9cLL7moQviz
J20vCBZ6RoHSTXdVcnzV5uJmh1mMSNjjY/JqZNe6my5at2exJo3+56lQNbJp
b8zOWuYcjDLptqENauSJxjZV/4I5nHMxHebrUCTmj6ael9oS7Az9b0h9LEWM
2w8n9ZyXwHlMn+4aR5EyjoyNCkuC9VHzZa/iKWLeprJly0UJVidwxmjHKWIV
rfVzXYkEjLPWv2xNo8imgBfPiq5JUM81SX6WQxEPuSNbEjgSGBmqF09WUKQ8
weFS/BsJtCvESL5OEWsvXnbDWwkos8dvqUqKVJ7y7vk2JMG8XRbT+i+KsOx+
TMwYlaB3J6MqoYYiO0636hVOS/B7yheOPJcix0zWv30qJ8XJxb0BLB5FCk/Z
lugwpEjIrvtm2kKRKI9LjfvlpQgriNno3koRl2HfpZ+VpNh4a7L9j66FveM3
rY00pbC36Qw3FlDk4oOQiahlUpg33lC594Qi7tr3ZRu0pdBrC/Psf0YR7yAV
dx99KZa6b52N6KEIt9QjvdRACsVuZv635wv+qt4fxCukkP2JbpvXu/DX/4n6
+pVSfBoY7DV8SZHs0qDDWauk+D/JRDps
          "]]},
        Annotation[#, "Charting`Private`Tag$37253#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVj3s01HkfxwfTZN1/FRvrEplilQeRe9/v05UicivWLRJal/Zx2VxyzTqK
RbVixE5TImEnuZThfDJD4xJNUxRRugxpxIyYSbvx2D/e531e/7xf560fEusR
JksikaJX82+v82Drp8af2ZXCrlt527AZZL0f+/bH+CCZ8XZX19GLcJZ4fpoW
cxJZmRfE1NyigaNDKG2KfxpRd+82/c6LDqw5v38yYxLRjjLz1JlRBthd9wjU
VkhF7klx7NkNVeBvQg1+yc9AnpcVtY9urIbRV9rshJjfUILm18y627VQdm/j
590Oeej+Ow2+1cE6OHZxg6GaQj6yHCwM8eXXg9CAsmeIX4S8s0M4s95MiBz+
diM2pgStN6PcezXeCE6cFEefoSvodWTx+e7/3QUj5tKQg0MZytncnRYs1wQf
8hYpCgpXURV1qozQbIa7lYmWfD4d3eRpz/XptIK5R0xJVMxNlH3jYLBmUxvQ
nerfvtavRsb+kY5xuixQQzOmnkPVSD789iPrXBaITE5xbR1uoZMuyuQDXu3A
XHPyC0WhDs1F6WZvfdUBV8ZM63l8Jlru6otuDngA6kVbVH+OaUETjQYh76bZ
8LA7qo/5uAUdJem5kdZz4MzfjTkSs1akW8G6x7XnwOhJ9E/m51YU3l76U2A+
B+iOx6ZLz9xH/Ty94QnjLvhRmMd5mNWOgkhbE+4c7YZN1yX2xYc6UXOnDvNy
LheWOso0LVM7UdKabzeFNVzgv3CQDtd1ojRm+Av1Pi5kq2Q3aquw0d2szbxJ
xR6YTFI1ruGxkRMqcvm9oAduuxtpgHcX2lOs7Jye1ws7l31FM0FctDW+aaw4
vB+auxeafAq4KFI93TAnqx8sCwqTHrRxEa3FoDKooh8stLtlL6v3oF3Jgv39
/H4wtTNTt+/vQWqeTHKOwyOgJlLs8nb2oXnh4Gyb4gBsmG3MpioPoKYte4eA
NghLszmK/wl4gvJ5KZxcNg8ESTeXBJ+GkZ/vomah51OIqLOwC5SOocEKXoTT
4BCM2o7Wjbi8QfGupTK/CJ+Di5gnOOH3HjHKe5VYSqOwL9HE5S/fKXQ/TlQt
lhsDRjfJIIL6Ef2pMClzgT0O/R8Ur2Vu/4T0uJPMiouvYZuwh0uWESEX8fHI
dbQJaOnp8DY6IUa/qZdXFQW/gS1FrjapgnnU8WttnJbFW+hpp3msdV1AOV8t
uF9Fb8H9aVYnm7+I7ggCU2isd1DO0+YGHJGiQoVDyWNp72HjjniyWcsXtPh9
PdXKQgAp6SdLLGy/Ijqz2c16XgBq5hrBUYy/0cqVh47J1yfhwqPgtGHjb0jf
55jo2fEp6DscsGNT7TK6Q4i7/H74ADrlikXu8iQcdkB1/hz3A/TItZjd6iPh
Clul5YzMaVDSQ9E6GTJYUl411Wv6ERq36yfIWMjiVyJS4aUXH+HgHffqb/Oy
mCYbrD1bJITUqcAE9Wo5TE0uVvZ3nAH6xbbofafIuIOrlDb3ZQa2mMeaC4zX
YO7Ar4sqjZ9gX5ZsMX1sDb50wyVrKGgWjjq904qvpODx4wOLnTpzINvJwKGe
a/HDjaOj9bw5UN3OMmeT5bFry+H3QiwCVRV9V9tueVxTqkExYYig5loY+dGZ
77CiYXr098sisKyVChLtFXCU6yGGRagYfMMiQh3FCviG8KlgE0cME+st6uKu
K2LldC/fToN58LN21mOfUMK5XoJ10fnzEK2MTLdpKmNOujVFRTwPcceywhvG
lLFxQWV6ZvBnGC3RjaJfVcHchXM2pbxVzi1TanBTxWeN9lV22S/AlIQpnJZX
wz47G5w17y7A9mzyn+dD1fDe4/FHWqiLYJhHtgltV8NP1A+q+pctwmVnk0mu
NoHj/+gcfqklgSOh/w1pSyTw1r5T6cNXJOA0rUd2OUPgKpaMtQpNArtil6vG
kwhs1quyf/9VCWxLYU2TzhLYMk7z51a6BCiXrH45kE3gvQEvnlXckkAb2zjj
WSGB3eVO709hScDQYF3lbA2Bq1PsryW9loBWjQhl1BLYypNT0P5GAoTp4zdE
HYHrznsNr7yTwLJtPtXqLwLTbH9Mzf0ggZEjlPqUZgIfvtCjWy6WwO+ZX1ny
bAInG+9681ROCufWjgTQOAQuP29D16ZIIaWgdcWkm8Cx7tc6wuSlEFEWv8et
h8DOk74blpSksOfObN8fg6u+sw1WhhpSsLMeiNrKI/DVByEzsRulYNZxW+X+
EwK7aYFsu5YUdHsjPMaeEdgrSMXNW08KG9wOLEQPE5jNcM9h6EtBcYhasvJ8
db9+5AfRZinI/kS2KR5Z/ev/ZN2uLVL4MvF2xOAlgQsYQafyjaTwf/qMcOw=

          "]]},
        Annotation[#, "Charting`Private`Tag$37253#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1HtMEwccB/DjUdSCFmFzQdNRcAIDwrJlJssyvAuP0DRxGSz+sSlQOrsM
lox2iwxrMU5FNsURCY4tDtNhiToZkbktMGJo2IY4Uu1WlAkruwItLbW8+uAh
hfH7nk2a5pPv75X0ckmqyiJ1OMMwhze+9LvxkTWv32Qb+gKH/c8O9G7Y1HW+
n5XbdRUWy19k5bW9ZvKKa8hKlknvPiCfNd8ZJhs+ihsli48kjpC5b9J5suL7
mn/hrHU7cm/6GJl/1O5kjZps0aV2HvvOXHWTD/R47di33zdNdqjyx5Gfj5pB
fv0RLDtlmkO/uXEC8ypLF8h/mDWTqHewPnK+1wor13ID5NrTVgf6J08FyXv2
K5y4v+TFJdTrU6dQn2pYRv7+bZjj4p+Q1fczXeg/Xr+KeSN2mK/ICOHepgw3
crZ/jdz28yistL7BcHRf2MlpMpOxKYycXx/rQV6tg/eUlsCyvjPhZNFbbz+G
kxIjyOqPe2FDgR12nM7xIl9PisS86GOCE/2CK+JnUC/uF8HSBtg00RRFrs2J
nMU9ySHYwclhQ8+OzVxR1+VXCrPn4IgpuLGwHWa+Lt5C/ls1DvPV5WKyqumd
eeyPCosm59jq5p/uh/uMnTCvPRtDbq1zCfVyC5yslSwg72jbSj65SyO4tGob
+mOGYMO5gxLMV+t9uCdvBW5Ve+AT0tdi4Zt5ftQfvQPnNGYF4GDUdnL4h18G
ns6Hk8tSgpi3NiT4hXMwv0vfyf4WSMtUKYwsPQ+/d/az2myxR1bVR5b92HKf
fEPC3SOfGI57yHY9X3tRf8uKXHFslBzwXHlA5pkxnrw3rewf1LtTJpCPJ4yQ
lRe8k8jjFmGDROciH+lV2mCXfBr5TzfGMN90cIY91NC3M/4ST2Y+98+Rdet/
2uEqfh5+UzeOfZfNPvK7g90TZFNCYYD8q+XQJOZ79UHU28wwp4pdIo+IZx1w
b80yrHE6WeH9IXgwbQr7hq88wT1LqzB/tT9EXhlIdKO+o2AN+zpKYWVRKsNR
/1HNNOqzlwX3sB7cV/RVGHmnyAZzuxXhZN2+C48xryc1gryS95kX8/Lc8OsO
8Qzq069Hov7lTsFKtQj+IW4W9WNawYktMJPwSRTXUVAmzdTO4R4Pt4lsMz0U
XPkfXPyqdB4u+24z8vfKYUN5yRZy6NNrsDJnnxi2B4TcKY1Gf/VzC3D+L3Co
9SVYZsmLIbcUHBdct2MruaY52of/r74blhr1MB/+xTbM+yDLj33MLBzK0sGy
7lUJ8m/ZAPov5sbi3txmWNZ2Gy5OKQ0iv/vMdvRH+GDTQBVcfKtuEfca78E2
+eAi+z/IwIjq
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk8lfkCh48llNPJK5NxS26bazKUQZLq+5uZlEpIQqipI5IiWk7WIrJF
GUMRU6EcWyjLse/bHHtXnLJFhizZCufF1O3+8Xyez/Pfs4F9ydROlMFgOH3j
/14XJ1ym7u22F4UyItnqylAvHlOr4ZhjUMbG9XtEYU/WPc1Ijj28HHY91mc+
gkaF3IcBgQuiu0tsC+0TsC/1TJ4nh4O8K3+08PAMFn9k+MvJeaH0B4mZVZVc
aJd6p3QIfKBlvnNbr0QqDLj865c4ARBGrb5nysrAq7XTvXr6wXjO3y7u0p8J
63D5/VJyoWg+veYitykLvN0/hbQKwrG3ZntYisNL8LfctDzPuY/IgeLogl9y
seq0bGhLzwOse15y8sZoLswePivT1o9BoZ+m0YWwPPSwGpVF5eIwZy2QPVjL
g9Az1KNJ8ARnKwyKLzELIW33xsCekwTPpTj645pSqIsmshW2cpFjBN/Cu6Uw
eXzRq7GHC/GSIulS8TJEvvma+ZN+Clzm42ULxsqw3khZ/uvqdEzY7LLO/G85
omMLZhoEWRivf1gb61KJNH+JirOcPOgGKO8QNa4Bs1dMtqkzD6mWzCBD7xpc
1BGx1dblYdiwi70jrQbqo4viEks8xLZuUZxZVoss42kDrm8BzEmS+35eLXL+
1d06ElqMzPpgu+XS9TglsHThHa1A0wGT45q+fLBud0ZfuFWBYed0w/wkPko1
zCuUsisQWnGraEUjH0p3jskGyVUiYtj217VrGvBuj1GOZWclzru1JTOSG8BO
/FVI21SDO3TZ2aOqEeec1X12O9Rh/fsTHw72NEMl0MAxL6oO/SY+Pz9cbMbo
Y7bZ9qo6qBSse9Cs0IKLbfdVNq+vh7y8o9fg8RZc1vraKt1ejzt2ySVNjS3w
WmjZ0AU+eP5O0mNWrQgPcK1yl29CdFjSXqLXBhtjKz9r2zb4p/M9snpfISqh
9AtzrgOJ3buCc8pfozohrShVpAciSflfloIECJYVM2cc64e3lEDlxfBbqKZ+
do4/M4iQD5N6rod6YN43l7h0Zhi1iNT18+5D+OvMmWz1Uewraz/Czn8H/Y1q
7H6dj9gp8fuT4KJ+LIvOupYrMQU1l+sRnk8HkP7R1MDCcRq9h8/O1vi+R7iz
harW+AwqD3ZZqF4YxJKxzlqYfUal1FGNB/gbz2zc195+Owu1hOuB7/89hNX5
VT8kn5iHgdXf2s30EKSujuyjS4Vgbkyv6S8fhp61q8vtXxbQyosL7Iz6gLmE
9mSkL2JbcGHcIasRTHz3cFpL6x+cpZW05NVGkdZ5zkAy9wuWRgbusBdGIfSS
6hBjMYhWbrVFdf4YCjaxwuNbGcQ6q0DEMGAcpR6+JuYBIkT64W+p6fofsYUW
PnDfKUpYLzOOrhGZgGpY/LlCWpRYPHsidGucwLU23h7ZDDFybHD5l7iQSZxU
/Rob6CpOXv0VZJ/54xSS0w/5XtBYRrw/TOWkR0xhR6+Yk/3gMsIqmXnJnpmC
7ZaJdzeSJIhD3T/d81bTaF+33zrDWpIka4g99SiZBlcvwcZwpRTxbLOwF1ea
gYLLtiHJZinyiRF2TyFkBi1mWzlvfZcT420DQccnZ7DZ2Pwuf98KUmAWsS33
1CcU05PpbQsrCKUR0e1Y/wm8hjDTA8+lSaRDF6NT4zNMsm183jozySGbtphz
SZ+hdjgmx3/TShLsyj3p/d0sUoQSrobDK8nBkMsj8eGzCGxyy7nFZZFGNrv+
T+YcUkwtv7RYrSJvJPIOGPvNIZej5fAnS4a0HjtskCw5D524K2anzsuQ0Crr
tsWAeTi+1vI3r5QhihQzOUtSCKcYllvPRop49owFKUYLEaGtNDnpRRGr5gl+
+yYad/X4SrduUCTbzwkmyjRCfr5mIudDkfKyDYqNKjR8jzS82OlHEZ+efrka
NRoudtev+gZTROx03UKRDo0jUS207H2K3O5Oqy85TENq9qb4jsxv3cXIk71K
Q3xxq3Z9FkU6xpPSYjk0GCIddlYvKRKTeF5mizuNeeaPdTdyKbLPU0pF9waN
oc2C4Lqibz+C5VH2QTSqzbavOlFPEc6jM793xNEot+rC2F8USQueumf/mEbx
6QAX7waKOI/nMubjaWRf7G6Lb6ZImGaGrgKXRoJ/UORoO0UW3fpZti9oPArR
rPHqoMg5uaync9k0YsJ7Z1kCivxnk2FGSB6N8DgtC80uiuzeVKiYU0QjNKEv
sKabIkbrP/kdLKURlBySb9FLkdNP6k71ldPwz9AeGemjiNLVCxnXqmjczHmn
4NVPETMf2SvMWhr/A5jJVbI=
          "]]},
        Annotation[#, "Charting`Private`Tag$37401#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjnk81HkfwMetTJOfbNZT8pR4bBZZJKm+392lKCEJoVYjR67omNwRYURZ
S7m2QhlXKMc45+Nmx90jplyRdecqzA+rp+eP9+v9ev/33ku/Zu4oSKFQPL7x
f+9O5YuoBfocRxWSAkVqSqBWNaPayLBEY5J23t+jBDhW+FAznuGEAlyOPDWg
PgGNWunJUZ4XShyodqhwSgf9nMul/gwGKr3xRycbvQCrP/LDpKUDEOcH0aXt
dSzQ5gRm9/KCkZblYfUh0RwwZHFvX2OEI37CjofmtHx4s2txSM+AiV5yDwp7
jRSAbazMCXHpaNRhv9Od1V4I7KM/RXXxYtHxxoMx2S6vgat4x/oq4xGKH61K
LP+lBLbbS0V3Dj5Gu19WXwyaLgGL5BegbZCEKkI1TdxiSmGQ1qYkKJ2KVmx5
UkZNbOD7R/u1856hK7WGVdeoFSDh+M7QiZGJ/DdSyU87OaAmmEGXPcBCxSYo
pOIBB8yeuge0DbKQcHWlBEcYIP7d14KfDLKR12qaVPkMwB4TJZmvO/LQnN0R
24L/1kBiSvlSK68QzbYkN6V41UFumGjtFUYp0g1XOiRo2gjUISGp9r5SlGNN
jTQObAR3HQEHbV02mjDupx/KbQS16XVh0Q02SulSlFsSaYJC00VDVkg5ssSZ
vifYTVD8r4GuqegqVNDCdNwi0QKXeNZe7LO1qP2k2XnNEC7Q7vUlut2tRROe
ecZlmVzgaFjWyhfVoujau5Vb27ggf/+cVKR0HYqbcPh1185W+HDMpNi6rw5d
9enOomS1Aj3jVz5p14BY49c9/erbwNlTLfioSzPa8/HCpNFgByhHGLqWJjSj
EbPgn5PXO2D6Kd3iYH0zUi7f/bhDthPcux8p79/TgmRkXAPGznfCda2vXRI9
Lei+Y1Z1e1snBKx17u1HXMQO85CYsemC2HDvel+ZdpQYk3kc63WDnalNqK1D
NwrL4/oVDr2BhHTOJnWlF2UMHGEW17yFhvTcyhyBQSSQWba5EckDppSQJeXc
CAoU5ym/mngPKjlfPNMuj6GoyXk971ODYDm8krFxeQI1oXjd0MBhiH1bsFSk
No30oecMvewDGOxTpY/ofEKHRX9/xqwcAZHEwlslogtI1et2nP/zUcj7ZG5o
5bqIhk5fWW4M+QixnlYqWrNLqM6o30rFbQw2THV2IYsvqE78rMZj9De8sPPd
de/9MlJNvx3x8d/jsKOs/oesC6vI0OZv7Q5yHMRvTumTHD6i7strHKmZAD1b
b697v6yhLnZqRF/CJKyk92ShvHWkzqxIPWUzBXPfJS9qaf2DrpDyWjKq05Db
52woVrKJNqZG79PXpoEfIN4rRKNgrZIGq4ayGShXoMWmdVGwbWG5gHH4LHD8
QswswwWwRPJvOXkGn0CR5D/2PSyIaa/zz+4UmAOVmDTnClIQW714xvdpm4Nb
3exjUvlC+NzYls3UqHm4qPI1JcJbGL/5K9Kp4McFyMo7FeKmIYIDJxeK8+IW
4NCQkIfTmAimVS+9pi8tgIPi3IegTFHs0vzPwKrNIvTsPmGbbyuGszSEnvtV
LwJLL93OeJs49u+2chKWXwJZL/VxsQ5x/JkS81A2agk6LQ4w3odswabqo5Hn
55dgv6nlA67+VlxuEadecukzVJHzed1rWzGhETfg2vIZ2K0x5idfSuB4l35K
n8YXMCuyC37vScWn7LqTnDO/gOrppOIwhW2Y6c26GPjdMmTzRb2NJ7Zho6jr
U2mxyxDR7lN8l0XDbXR6y5/UFcg2t97stNmO34mWnjQNXYEShpbLnzRJ3HXu
tGGW2CropN6wuHRVEkfX23avh6+C61utMMs6SSxHULMKxfjgkUTzGdxHYP/B
mUi5RD7EacvPzwcQ2KZjjtujQMIDPa783SACF4V6IDMlEqJ+vmUmHUzgGtgr
16ZMQsiZ1leHQwkcPDgi3ahKgpfj7ZshTAIL2TevVeqQcCahk5R6ROB7A7kt
1adJEF++I3yo4Fv3U0qlbpIgvH5Au6WQwL2zmbkpDBIoAr2ONq8JnJRxVVLR
l4RV6o/NQSUE1vcXV9YNImF8P4/ZXPnth7clwSmShAaLg9svtBCY8eTy772p
JNTY9KOZvwicy1x46PSUhCr7cK/AVgJ7zpZQVtNIKHIf6E7rIHCMZr6uLIuE
9LDI+OkeAq/7jNAcXpHwJEqzMaCXwM7Shc9XikhIih1apvEI/B8F4/yoUhJi
U7WsNPsJfFShQq64koTo9OGIxgECm+z5HGrEISEyK6rMaojA9s+aLw3XkBCW
rz01NUxg+Ztu+bfqSbhT/EE2YITAFsFSN6hNJPwPyhGMMg==
          "]]},
        Annotation[#, "Charting`Private`Tag$37401#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt0mtMUwcYBuDS0tJyLYmCgUyLoQuVsLHImGHRcwJjDNnMQrAjpHVVZIki
AVw1gx8bI3Zu4CBj1qkj0ExZphKZA5GZoRVnAmNZZ6DAVgeltlyEVkoppR2M
8b2HJk3z5P1uPW3CkfL8Ej6Pxzu68abPjRfbcf4207Nd92HFzj/ub1jTeuMR
o2rsk3gGhsnGD8wm8rF9TWPIF3RmsoKpsJBr9FkW1L8e9w/qXQMT5IELGeNk
tqvfxtzMmUzbkWtF/Z4RB7lr5bNJsqHeMkPWSg7Y0N9/ep58/u3jT2Ht1y7y
lvIRmPeL0I36Zp8d88P5i5j/xQUH7vvK6YG/k0yTZUsnvJh3R8856eNl8rB2
BmYv7VqBf1uewXzfKT98dH0W96YkBHBvR+Ez9Lf1/ot79Io59LuL17DPPgYb
vxStI7+snse8TBOc1tIJayR+Hkvz1QYnrBgMIqdFaVyoV6j45C3v/AVbC2MF
yJ1HnmP/i0NwweMpmN3dGcyOXqm4/kizwH3/MiE5tOkeXHOzG76+MM25rkFE
zvhc6cbzjwrA1QebYGtlqBh5QfYi7nkyChelt3B+s01CjttngQ27d4aS7/JX
YWuyA75cnu/B8wjpDUN/wyjn1bPhm/OXYGlOBOY9+HaJ+38JI3HPYw9cc+5n
OE5Q6sX+97dFbe6HjeYYKTnA2pfRr1bBd+0FPnj1Ivx3bSdsOLgjGv1VeSuY
N14LF539CDZc64MDD6pga6LoFtPY5x3TFt1nqL6y/SHz1mR1u832Ozx7x8Rc
rdjbLX1hmFyT5DSTY4rfGCMbhiVP4KlgC8P9nybJyltbx8maK0F25PLBCdjx
5xST37O9PumilczuujZLvhEIsZGNQ8lzyHtPwOyxche59N7+p7inTLlAzks1
c840ucnJ3S121GscHnJY3ytTuC8jyIu85FdYJvp0mTynV0/D36z7kL8nmkG/
uN2Pe9iUWbL1eHKAPCg9CRu9SavI/1M/w35J3Rr6qwRzmPfjyXXMF786jzw5
hMfS/fE9sOzwQziMqXTivm1ngsj1EQEnl2fxyXmfnHEhF8cLyIOlXc/x/MzT
AlahatSdVi2gPqs5mNxWeBu2FmUKycIcqRu/x+GfYHlrLmyIqhYh//4HmJWf
CiE7OqSLuDe2H9ZFZsBG84gY82OmYFlCq4ScnZ7rwby4l0ORK+tgzbgblssm
YF5zZxjyvbFLm88nHNa/C2u0iRGb93NWrsG6rZe82J97LhL3De1Zxr5DiijM
T+3nXBstRX96jw/74g/ButTXVpCb9LBwrIGzPDEa9Skv+TGfrYWzbSVwTaUF
lpcV+5n/AdxEepk=
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk8lPsCB2BJXcTUvDmiQyQ3OU5R3Rxp+f4+RFyORKXSdpJEWWuypaix
lopC11K2EqlBZDspExlh7NImJLI0ljGWeSfde/94Ps/K4552ztJSUlLu//P/
VyW79rdl+G9nTf71ee3cGoz+YnCVEeqA82abIvTGEqBmGWb6ge0Ch5byB4e/
pyLVtCw1IcMbDv48L+/yTBQcz79XyfbFx+oQvbKxLFSFPLw77ByE/usm08eq
cnC6qZEflRGCY+OvGjh2jxE0+rqhkB2OnBdSGrsFeVh4yaTBkhWFmAU1Fa6i
fNxkVNR3OUfjzJZfeiwEBWiOf+/MzoiBYoy1OZ4X4ktR84kn7ATk3y4KiBQW
42HQjb4ZyR083ak3fSGvBGfM/jxhykqEFDNpRuxSiqk2nlOncwoafz2zdA+v
DDLio+tDMtLwpK/00VeH51BWdTB4xM6Ctwrn4v6Jl5iRbPJqIg+hOz28h7ep
Eu+7lfJEkocwYLawDf0qce9hiz5h5UBHYeqUsbgSa4xs9NudH4PrxE8TCLlI
eaSVcCkjH72iPt+8qipw3qjGZ7OLkWi22W7RzxoUdO8YvD9UjIAHflkrNvLw
bMpza7ptCfI+vdCoPslDhdbr3kS1UuhGSit31PPAD/DRv1ZYhv5D13Otb9di
5Lc6nkffc6TEaXafouoQZ1bxQ1WLC9Zo4o7+jgbEN9nrqOzl4oaBMIuax8cd
x0Fb5Qguwtvdpxbo8ZHsrZRJCbhwHl413+wiH5kpbv9eVPYK1V+WWW/TakSh
SDlBsrsaCprL1p0waELLfU+DzyE81HZF3/U90oyJCphfyOfBsEN4NsizGVTn
4kOqPTzsSx3wORvcDDv5vHB7Uot2uZuZBunNaPUY66qZq8XTekn2ZF8z2v7w
js4LrIOSDdOuxqUFb2t9hkJYfMS6cxTjnFohmDK2i/1XC6JVNmv+atyOMFnZ
ht3ynbjzd8lleVYnLB1vBOYe6YKro2dna8wHDBkV7vdZ1YsEj5Mjh//oQnVf
kOLHfV/hoz3DWOnVDdfwXK09gd+QuV//lmd2D8YXseky12FYc7z+flnRC0a+
kYdnggADPzZv/GfXF8iqWdlF1oyhVfVMsnR3HwQHc9V7t0ygTXtnwbW2r9D4
TVLU0yjEK56MiVRHP0zcNPM6LURYvsJ0ovfFADjGG33P90yBG8wyDCr+hpAw
P48knxnwOj2jTt8fhJlpbE3xt1k4L7XUP3ZpCHtuJn4PuEjDQX/wzrJTw9hr
48vaNCuBnLkSy3H7CNKSTd7E35rDQauzGW2rvkN3Y2oWlkqRRRuuNHySFiDA
Vi5Jv1GKvG2gbW2aBRgrGpycSJxHMpRWSldwRvHZvvDn+gPSxKJfR3ELxhCs
fye9cOl84qnbxjTNHMNOe+Ej+a75hHM6V7WAOY5wjtHJj4ky5MX6VprvO44R
e1FYiMsCsvSu34H0/nHIGNbBzWAhkU3ibuXaTyDO9mo2f3gh2Ws+ZCIunYDV
U67/wuJ/kKNJDm99dYUIsOkTl56TJUL1OZFVrBCOOhpK+evkyPoNOduGZoU4
btF8K3BGjiREmT8IOD2J3jT3qspCefJeb613dsckwk1DHD8ELyI5cys8nKxF
uK9+KcMLCmRLuHelsFwE1qb4K5ZiBcL46nZeUW8Kp+O034iqFMmDxXWtJfen
8H5tSqX6ZQY5Jr2vw3f5NDwY0RqquxaTOLVor9KkaTgq18n/rrCENAwszypS
n0F55Y4jcm5LiOVLccCCxBmsY4pPNDUuIQyzwQOXtWfx6YL2jvZ1TLJZ/tr3
jOxZnAx3HKWvMklyq1mkloEY8wz5fyqMM8mcA6Ne8lqMd1LP2Ad3UcQoMDi6
Zz8NqdDI5J+2FNG/STP8HWmskTtcmGlHEe5tlbklR2j4MWX6BHspUhUxb7WJ
Ew1lLTvTK4coMtmklJ7tTmOPqWBeritFip15vtGXaTSFrr704wpFig46zM/J
pTEjJ45PD6VIKGEn7+LQ0Lze8GRnOEUilJqzRfk0POPPdcVEUaShLm2laTEN
RhZ32+oYiix7J3vtSyUNK94Ric1dioxJEgON39Lwsd6gNHmPIsdbt3sNvKOR
2LTg9/+kUUTHyv3j7Y80hjpzHb9kUuTUjIXaeA+NiEFxme8jimxbvJxwRmjk
ufNb1B5T5OAng+mjozQ6x9OGKp9QRHftLR3mBA0dscVyhQKK5Kioi85N07C5
qLYh/ylF9rs8i9UR0zgvPWa5r4gi/SkXc95LaNwNe/UX/Ywi9V+fbL3+k8Zr
+QT/1BKKlEcEW5pIS/BfmnZjiA==
          "]]},
        Annotation[#, "Charting`Private`Tag$37549#1"]& ], 
       TagBox[
        {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk41PseAGBE1zo1P45wiOQmxymqy5GW7/ch4nIklKLUSRKy1kSkqLG0
qCjLtWXNmkFkO/lkIiOMXZJkl6WxjLHMb9K994/3ebdd8LZxERESEvL8n/+/
PdltojvzxmHa0l9fd63vhLlfdB9QwuzRdRO9SO35eFA2Dzf+THdF9p01L85+
T4M04+q0+ExfZH+D5eNbkwWlF0qe19H90UBDqHb1fA7Uh+amzrgEo4lHRivn
6/PBo72NfT8zFJ1feNfKsHkJwXPvW8voESgfhFSPc4ph422jVnPafRQt1ljr
xiuBJ5TalkGXKHTlwC/DZpxS6Ijrd6FnRiOZaEtT9KYMRss7LhbR41HJs/LA
e9wKyA1+PLYqSECvjmqv3CyuhCsmf140piUiIWrSKt+1Cpa7Wc59Limo7dcr
snasahDln9sTmpmOisaqCsbt34C8or1uAT0H+Sowbp1afAurAj2fdpyLtFZm
7Fh6ddA/JFfME+QiXWonXT+gDp7ndupgWj7SlF6+bMivg50GVjo9Li8R05md
zuEyIaVAPf52Zgka4Y35F9fXA+ODYlwevQIlmuy3kfrZCKVDR6aypytQ4IuA
nK37WPB62ftghnUlKv4Cqg2XWFCr/n4kUbkKad0Tke9tYQE70E/nYVk1mjjz
qNDyWRPM/tbM8hp7g1Ji1YYuE80Qa1L7Q1GdiWhziUcmelshrt1WU+EEEz3W
5eYQwmxIcJyylo9koogez2UxbTYk+8plERwmcpnZvsHkFhuyUtz/LVX9DjWM
brE8pN4GZTz5eMHxBiSttmX3Rd126Mz21v0aykJNg1Gp/k4dsFiLTG+WsJB+
L/dqsHcHEH2bzigOs9DJtEm/qyEdYCNZHGGLm1CPxJMs3YwO6PKaH2xcb0Kv
WgR5S2Md0P2Hb1RxUDOSs6LaNLp2wscmv+lQGhvFeDJkYp27gLNsaBPzr04U
pbBf7VfDHggXF289LtmHEv6uvCNJ6wNzx8dBhU6DyM3Ru68r+jNMG5Sd8ts+
guK9Ls2e/WMQGsaCZQZOjiM/jVXKNp8hcIsoVLcL+oayTuk89c4bhgUpOlnt
NoMsGT5/v60dAUqJgZd3PAdN/ti/75+DoyCubGFzr3EedSleSRYZGgOOQ6HK
yIFF1K1xtPRh9zio/iYoH27joncsUSOh3gkwclcr7jPjIaWtxosjMAkMw33+
14eXETOEph9c8Q1CwwO8kvxWEavP+75H9hSYGMc0VnxbQy6y5jrnb0+D3ZPE
74G3SGSvM5Ww5fIMnLDyp+mtCZCEqRzN8fAspCcbfYh7uo4cLK5mdm//Dlr7
0nKQrBCW2nu39YsIBwKtJZJ02oTwx1bS2qqDA/PlU0uLicI4U26bSC1jDr7a
lv3cc1oEm01oyhxA8xCik5BRJrsBe2t1U42z5uGoLbdAcnADZngUKpZSFyCC
YXBpIFEUw54uku2/ALO2vPBQVzEsmxpwOmNiAUT1m5G77kYsnsQ8yLRdhFjr
B3nsmY34hOm0Eb9qESxeMW9srPgHPpdk/9FfiwuBVmP8qmvimKuyzrOI4YKj
pqpcyW4JvGdv/qHpNS5cMOt4GrQqgePvm74I9FiCkXTP+roySdyvvcs3r3cJ
IoxDHT+HSOH89a1ezpY8yFa5nemDpPGBCN86bg0PaHpxd8350pgy7n5dRnsZ
PGI1PvDqZfCLTc1dldnL0L8rpU7lDgWfFznZ66+0Al6UKFXFY5twrHKUT1XS
CjjKN0v+Lr0Zt04q5ZSrrEJN3REnCffN2PwtP1AscRV2U/kX29s2Y4rJ1Ok7
Gmvw5abGkZ7dVLxf8uH3zLw1uBThOEc+oOLkLpN76rp8ENZn/ym9QMXr9pQW
wXs+fBJ6TXc4RmCDoJCo4VMkCIXdS/5pTWCdJyTlhiMJOyXOlmXZEJj5TGF9
sxMJAVTRMc4JAtdHCu8wciZBXt3G+O4ZAi+1y2XkeZJgZ8wRLnQjcIULyz/q
DgntYTtu/7hL4HIH+w35hSSsSvDjMsIIHIbpyccYJKg9ai06GkHgSLmOPF4J
Cd5x1waj7xO4tTl9m3EFCZQc5qEd0QTe8kn84WgdCRYsJ4FVKoHnBYlBhh9J
8LPcK7f0nMAXug77TH4iIbFd7Pf/pBNY08Jz4NkACdN9hY6jWQS+vGqmvDBM
QuQUv9q/gMCHNilhxiwJxZ7sTuWXBHb4ortybo6EvoX06boiAmvteqpJXSRB
k2+mJF1K4HwFFd61FRKsbinvLXlF4FOur2M0+SRcF5k3P1lO4ImUW/n9AhJS
w9/9Rb4mcMt40cFHP0l4Lxl/I62SwDWRIeZGIgL4L8u+mgg=
          "]]},
        Annotation[#, "Charting`Private`Tag$37549#2"]& ]}, {}, {}}, 
     {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1HtMU3cUB/DLswJClWl8LGL5ZyhGJW6Z2wzeu0QnkojCkDlhs2wyMjcG
i850hi0Mog7mUsoMui2BEmAUsiFGNopxGdA4IFLKEhgvB7cU+pBCaaFvaOb5
Xpo0zSfn/M75/prbxn9QmJEXzDDMxedv+nz+6jqSdp9Vx10P+cw78Bf5o5Fe
Nkfe0y0yD5O5osEhuEI1SuYbfx4m65s+HydLinMnyPFa4yRZqW2ZJr+p+fo/
uP3wLNt6Ql85coXH/LrjRjIfF6snS08tm8mSbB0s+VRmJSfVrcxgX+9dG87f
eGzAvMTtdnLRlfuzyCedc5CXFJY5zLMeXEH/Nwojzu9qcqJ/+imsLHnJjf7q
XSb4bK0H9QkVLJX3+FD/6bIF87VHVslnrsvmUe9WrZGHEhutuM9if4DcVvze
ArmkP5PhqP/SxCJcERNELiottOF+uZogbrS+SKYULSGf7ONgct/5dLhk94ch
5JR9YXb0vxEbSvbo3oaV5j74bnUtzP1xOYysbpmC+cIL4eQx5VUH8hm2iMiv
Oftg/sE4fG40fhn1e2Ub4ME7sKTm/Qj0VyetwK5tkcjbrICZOhM81mmBua23
opCv/IBz/T4bcb67A+YS90YjH7/ThfoUD3sOX4WZVxQx8NER1/p5Mc5fTHUj
347Nm8jbf5MJfvcL2HPAKvjkAKzWpHuw7/arm3H+TJQX9W+rBJ/8FeZjHbBM
2wlLxFGxuL+s3Cc8L/mwLNULc/pr7ay8x6m+kN3Bkr+/8zebor+2ak3pJ5fc
6nwCZ36iJUtCs/5lG4qS4/ySEbjJ/BR+cXmM3LXVP00O7E6YICvzH8yQp8qW
J8n84wIjvH9uCv21Oy1shjpON5nKY3/Vk3ny6fNv6bE/95CNLNa2zsDJkXbU
o3sM2D8+6CAXGivn4LwdK2Sb6oYR8xqmneR79QYTK/wfuMkHHz4yk5nff/Fg
fn6HBfPX8nw4b3A9w7z5GT/ytWnmMe/PjDXMu1RjhRObA2S5LmUB9+t6neEo
3x7pIuYf88G60pdt2K9qCOL25shvepklzJ8tCyYnjN6GpQXHQ1AfDbEjT/iS
4MEvYS7tn1Cy6asYB+ZxpWHkfHumYz1fOObtr4eZU6EicpPLLfQXtMM3W9KX
sU9dswFO9sPc9OkI9C8UrKCetQaLJBrB7tlI7As66sR9WxujUO8rh7l3sjci
37F+oX5uWzT5RHOoC/cpHoJN+7IEO9pikFe2CnMv5IrRX6lw4/vJEW9CvoE0
uOuhTPAPEV7cr7Ab7v2xAlbmBIR6xDMYvw/KW/XIh/xhBjhhS5If9cChWOwb
/s6//rzCIp3Zz/4PyjOerw==
       "]]}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}]}], "}"}]], "Output",
 CellChangeTimes->{{3.78141699444071*^9, 3.7814170191609716`*^9}, 
   3.7814170591932616`*^9, {3.781417092615361*^9, 3.781417099193477*^9}, 
   3.7814177464096546`*^9, 3.781417798118965*^9, 
   3.7814179543190393`*^9},ExpressionUUID->"de62fba7-8e06-4f32-b080-\
69405bc2284c"]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"index", " ", "=", " ", "14"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"{", 
  RowBox[{
   RowBox[{"D0", " ", "\[Rule]", " ", 
    RowBox[{"topDimensionsB", "[", 
     RowBox[{"[", 
      RowBox[{"index", ",", "3"}], "]"}], "]"}]}], ",", " ", 
   RowBox[{"L0", " ", "\[Rule]", " ", 
    RowBox[{"topDimensionsB", "[", 
     RowBox[{"[", 
      RowBox[{"index", ",", "1"}], "]"}], "]"}]}], ",", " ", 
   RowBox[{"W0", " ", "\[Rule]", " ", 
    RowBox[{"topDimensionsB", "[", 
     RowBox[{"[", 
      RowBox[{"index", ",", "2"}], "]"}], "]"}]}], ",", 
   RowBox[{"k0tilde", " ", "\[Rule]", " ", 
    RowBox[{
     RowBox[{"ncurs", "[", "0", "]"}], "[", 
     RowBox[{"[", "index", "]"}], "]"}]}], ",", 
   RowBox[{"Stilde", " ", "\[Rule]", "  ", 
    RowBox[{"Abs", "[", 
     RowBox[{"nders", "[", 
      RowBox[{"[", "index", "]"}], "]"}], "]"}]}], ",", " ", 
   RowBox[{"kx", " ", "\[Rule]", " ", 
    RowBox[{"nsagCurs", "[", 
     RowBox[{"[", "index", "]"}], "]"}]}]}], "}"}], "\[IndentingNewLine]", 
 RowBox[{"Clear", "[", "index", "]"}]}], "Input",
 CellChangeTimes->{{3.781417177689826*^9, 
  3.7814171873166556`*^9}},ExpressionUUID->"69df1f1b-c55c-44f6-ac38-\
933ce7f83cb9"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"D0", "\[Rule]", "3.131000041961669922`18.495683073437334"}], ",", 
   RowBox[{"L0", "\[Rule]", "12.29819965362548828`18.08984153926677"}], ",", 
   RowBox[{"W0", "\[Rule]", "8.238699913024902344`18.91585868437355"}], ",", 
   RowBox[{"k0tilde", "\[Rule]", "14.243184989814932`"}], ",", 
   RowBox[{"Stilde", "\[Rule]", "10.37745103253657`"}], ",", 
   RowBox[{"kx", "\[Rule]", "1.0113261447282447`"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.781417173642273*^9, 3.781417187691512*^9}, 
   3.781506245081192*^9},ExpressionUUID->"320c43f5-5be9-4671-bd7c-\
5a83e3117fca"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"A", " ", "single", " ", "example"}], "*)"}]], "Input",
 CellChangeTimes->{{3.781506118912893*^9, 
  3.7815061225349407`*^9}},ExpressionUUID->"8dcc8bc0-8a0d-49fe-9277-\
ad60224a730b"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"D0", " ", "=", " ", "3.13"}], ";", " ", 
  RowBox[{"L0", "=", "  ", "12.3"}], ";", 
  RowBox[{"W0", "=", " ", "8.24"}], ";", " ", 
  RowBox[{"k0tilde", " ", "=", " ", "14.24"}], ";", " ", 
  RowBox[{"Stilde", " ", "=", " ", "10.38"}], ";", " ", 
  RowBox[{"kx", " ", "=", " ", "1.01"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"d", "[", "\[Lambda]_", "]"}], " ", "=", " ", 
   RowBox[{
    RowBox[{"D0", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", "-", " ", "\[Lambda]"}], ")"}], 
        RowBox[{"(", 
         RowBox[{"1", " ", "+", " ", "kx"}], ")"}]}], " ", "-", " ", 
       RowBox[{"kx", " ", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"1", " ", "-", " ", "\[Lambda]"}], ")"}], "2"]}]}], ")"}]}],
     "//", "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"W", "[", "\[Lambda]_", "]"}], " ", "=", " ", 
   RowBox[{
    RowBox[{"W0", " ", 
     RowBox[{"Sqrt", "[", " ", 
      FractionBox[
       RowBox[{" ", 
        RowBox[{"4", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"d", "[", "\[Lambda]", "]"}], "/", "D0"}], ")"}]}]}], 
       RowBox[{"k0tilde", " ", "-", " ", 
        RowBox[{"Stilde", " ", 
         RowBox[{"(", 
          RowBox[{"1", " ", "-", " ", "\[Lambda]"}], ")"}], " "}]}]], "]"}]}],
     "//", "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"p1", " ", "=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"0.5", " ", 
        RowBox[{"W", "[", 
         FractionBox[
          RowBox[{"L0", "  ", "-", " ", "x"}], "L0"], "]"}]}], ",", 
       RowBox[{
        RowBox[{"-", " ", "0.5"}], " ", 
        RowBox[{"W", "[", 
         FractionBox[
          RowBox[{"L0", "  ", "-", " ", "x"}], "L0"], "]"}]}]}], "}"}], ",", 
     " ", 
     RowBox[{"{", 
      RowBox[{"x", ",", "0", ",", "L0"}], "}"}], " ", ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Brown", ",", " ", 
          RowBox[{"Thickness", "[", "0.01", "]"}]}], "}"}], ",", " ", 
        RowBox[{"{", 
         RowBox[{"Brown", ",", " ", 
          RowBox[{"Thickness", "[", "0.015", "]"}]}], "}"}]}], "}"}]}], ",", 
     " ", 
     RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{"p1", ",", " ", 
   RowBox[{"plot", "[", "14", "]"}], ",", " ", 
   RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Clear", "[", 
  RowBox[{
  "D0", ",", " ", "L0", ",", " ", "W0", ",", " ", "k0tilde", ",", "Stilde", 
   ",", " ", "kx"}], "]"}]}], "Input",
 CellChangeTimes->{{3.781092333846627*^9, 3.7810923345808306`*^9}, {
   3.781092370321046*^9, 3.7810923866629615`*^9}, {3.7810935148577895`*^9, 
   3.781093515466132*^9}, {3.7810935883297777`*^9, 3.7810936269619703`*^9}, {
   3.7810936803571763`*^9, 3.781093680676323*^9}, {3.7810938982829957`*^9, 
   3.7810940463885107`*^9}, {3.781254093879808*^9, 3.781254097884331*^9}, {
   3.7814171493819466`*^9, 3.781417167970277*^9}, {3.7815061356108313`*^9, 
   3.7815061607856784`*^9}, 
   3.781506496800623*^9},ExpressionUUID->"a58de90f-c245-4831-b428-\
f5c023ab3817"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {RGBColor[0.6, 0.4, 0.2], Thickness[0.01], Opacity[1.], 
       LineBox[CompressedData["
1:eJwVj3s41Ikeh8eMO43fLLksQkvzk0bPSG2b+H6F5BJGukory2nXuiUiWZpk
a0y5dsKuXOIY12Ijqk1EiFmGcZnKddimrU4lUkJO54/P8/73Pu/HJCDcO4hK
oVBCv+z/jBWsD0uUpNudcBP6Cxe3Q4k/yeuQhUFcci+l9EElLAjWM8/JEmCU
16eFRTdBlDbhmMk6Dza7grwGVBuhpNviZIAsFQx+zuFsab0Lfybd3ZPrlQXv
Axw3HVG9D6UmR0O4rGwQnSvaconSAqf8qq5yZPngEqmbu/1aK9Quk08NAorA
lLtv3lPcBqXC07J0r2J4nN3ybmr2IaQHm1BOsQRw2oOjX6/eCYGlIWwX2XWI
0qKbm7Z3Q9Wd8fyx4BowPlF0ZWuREJhrVf6jG1AL3b/WaH6M/gsMZnxrL3rd
BJ/bdu/i6b2gmCbXFcVqAO96yjYnWh887nJfdJQ1wVznLO94qRh8rE7KJY7d
B/e081H5c2KQCXuTRoKbgfPPSEyh/QActV7gaQe0AN8z2Xe/ZAD20dyvpHi1
wuZWZVbXwiBg0cz1SFYHJHMN35zWkoDW6PaJHbIecPtKw2FD/1OQ//Cx1im0
F34fEw+do4/AHFGftGu2FyhuOZrfu45A8LUrmoJEETzj7h0uaR4BtyF6QxW/
D7plUZoPBaOgbrey3FD8pauZ+/5MwDikrprg94iHoexk4X+L3Sbh16+b5nq1
JVC+zkWBETgJCcw8v76DEhArOH06HD8JYfYHNg6MS6B4vyQ/q2oSPKNF/Y9f
PoZdZ+pWeGpSIEab9f6mjcBbpT+2U9uk4DIkEi/rTcC92cAQsck0xIWbWuz8
bgLy1ruf4m2ehgrl2LOpBybA09jJhOUyDeo2Rmyj7AkIPTumbRcxDT0Foamo
NQk+b0Xsi/emwecnVZckuhRe72iUp+39G/yXHJqUadPAf5HSx419BrFrG8o0
X8ngstqP5hq5z8GcdiFv6sob8PrMVirc+wqSi4/ZKs/Nwm4O7UHd6zeglmeo
kjX4AV7nD/c3JsyAeTvd1V11CXyHUqO7lWbB8eq23bWrKZgWLczxOT4H96kN
xbeoVIyufOlnWfseFOX6rPfoyePkq+qcs0vzkLPeeu4ndUU0k4wyasw+gusC
x+bGeyUsWOTzQ2EBHvmvusdXVsVqrkfbp2OfIHOWESr9oIZlCd/zDkYvAtOo
br+IoKNPyMp9buYSvI5RDprXIPDAtzXO/JJleB3tW9+iwMDwoe6a/ILP4IPL
1w4QX6G5uIrdWbkC/oWtgg0qmmgjgqggDgX7hRIXobYWxjUyT9wfpOCAW/fG
JKPVWGjVZPfLPjmM95duiNHWRvXuzRmtf8lhiv2uji1rdfB5XI1cmAcVbRv7
YzcZ6GKZ9Dtvi3YqnuFuC3Nm6GHY4u2kQBsamuvMUJj6X6P+iGZ57h0axu4Q
Vjho6mN0lIvvJbY8srbNz1gYG+AjYbDCwh/yGHluOd6CNMSp1N397VYKeDjQ
3OjHNWvwfPvvpWMVClhNlByJMDdCZ/2COW9LReSUFz05xDDGod8uq4RUKOLl
2XEmj2+MU/8SNVw1U0LVkocOhoQJsrOdTTyqlXBPge3LXr4JZurY39KyVMZe
it/R54y12G6gWHXsT2VcU03/wShtLRICOetvHVWwnnpDUaryDS7YJG+KFqpg
YtN8rGraN7jVNVyRGaiK+g9FJzlqpqi+meMw/l4VX7C9HT5nmOJ5U1bdVI4a
Unc9qN2ibYaDA1XGHXbq+KqsrfJShhlKIwocQsfVUSUiLMpVZx32ZDl4/nN5
FS5wKzrNLq/DzLysTr2ddGTbDjZdpDPRe1WxlcYSHfOOCJIOZjGxWtd2fqVb
A590qQ04apC4iSF+We5OoDaHwgxjkKgrWXrB9SDQe3juVLYmidJM4tghLwK7
pkaNXuiQGDG5fljdh8C7Szd+TjMmUbKhsiDGl8A8Sx/aEzaJceMC7aBgAo9k
5lmF+5D4SJ4iKrpA4G+6Gck5+0jMyL+pmJJC4FB+sqTlAIl7Px5vi7xIoEdl
WIKWH4l7DgYOOaUTCG3YdTuIxCmFZL932QQaz08flY8hcfV4u2OQgMDD8Y/r
WKdIfNp4R2tfOYE51B6l/adJzFXbeNy5kkCGRkN1eSKJlGBKn8UNAqkkb8Hj
wpd/IeZbFm8RaHf9F/fYlC/+UGrU20YC46wjC4oukuimZ2X/7A6B79DXaS6d
xHAjRb64iUDLDs8cwywS32X+oNzdTGDwbseXO/9NooOUp936gMBS8Va7iGwS
mw4N1d9tI3DqICsjN5fEC9mlz+raCfwfsakLKg==
        "]]},
      Annotation[#, "Charting`Private`Tag$13820#1"]& ], 
     TagBox[
      {RGBColor[0.6, 0.4, 0.2], Thickness[0.015], Opacity[1.], 
       LineBox[CompressedData["
1:eJwVj3s41OkCgMe4Xxo/Sy6LXJbmh0YPybaJ7xNyDSOJpJXltGvdErlkaZIt
Ru4n7MoljrtiI6rN94kQswzjMsqdbdp0lGsJOZ0/3uf9732eV8sv1C2ASqFQ
gr/wf0dX6Ick8DMsLjpyfDmbR1CZL5ncJQgBsUn9lPKnNWijQp9+TRAPJpIH
FGDJfcRNn7bOYlwHZnYBrkNSLais1+CSnyANqP2cxzRtf4z+THx8It81G6z5
WR84K4VQuda5IBYjF3CvlZjepLShGJ/a20xBIbAPV84/cqcdNWyTL9X8SoAO
y2PdhdeByjmXBRmupWAst215buUZygjUosQwKsBlZ6Zqk0w38i8PMrIX3AUR
CjQ9nc5eVPtoqnAysB5oXiy5daiEg+jakv9R9msAvb/Wy3+M/AupLXk3pLre
B+4PLZbjaP1ILF2oJ4LRDNyaKIdthAfQWI/TprWgFax2ryRfKOchd+NLQgmT
CDilX48oXOUhAac/cTwQA+Y/41HFlkPonMlGsqJfG2C7JHmf4g8hD2GnWymu
7eBguwSjZ2MYwZKlu+GMLpDEUn93WYGPFCaOTB8V9AHHr2St9g2+RCIfPjbY
BPeD3yd5I9do42iVaEq0W+kHFMc8+e8dxlHgnVvyFQlc8Ip1crQMjyPHEVpz
LXsA9Aoi5J9VTCAZi53t5lIeEGDW2hW/KZS2a5rdxxsFlZeK/1vqOIN+/bp1
tV+RD6r22ovK+c+geHqBz4AXH/BEbT6diZtBIZae+4em+KD0FL8wu3YGuURy
B8cWxoDdlcadZOlZRExglb+Fx8F78T+OUDtmkf0Il7etMg2erPgH8bTmUWyo
jsGx76ZBgb5TTPLBeVQtEX01zXMauGjaaDHs55GMmYaRRu40CL46qWgRNo/6
ioLToMIMcH/PNUp9Mo/cf5KyT6TNgsWjLSLCJ/9GvltWrRLC84D9JmWAFf0K
RWs3V8q/FYAc6R/1ZPNfIz3hGwVzt94B189G4sUn36Kk0vPmEqsr4DhT+Gnj
4jskXaAumT38ASwWjg62xC8hvU6ag5PUFvAeSYvsFV9B1rcPH2/YTYHpkZw8
9wurCFGbSx9QqTCyZsHHsGENiQkNmJxQEYEzb+vyrm6tozx9k9WfZMSgLn9C
rl73I3LYYJrdWxOHRZtsdjDYQM99dz1hS0jBOpZzx6fzn1DWilzw7AdpWBn/
fbJX5CaiazSe4hI06B60g1hZW2gxSiJgXZaAnt/W27LLttFipHdTm6gcDB3p
rS8s+ozc4fYdT+IrqMerNequ2UG+xe0V+yTloRkXRAQwKXiQw7fnKCrA2Bb6
RTRMwUOOvfsTNXbDYuNWi188hHCc7+y+KEVFKNN7MLP9LyGcYmnXZaqtBF/H
1guFOFOxectg9AE1ZVg5+52bQScVX2EdDrGVU4Ehmw8T/c2EsZ7SEoWu+jVU
HZevyn8kjKOPcqqt5FVhZIS9900jEcw4vL5koKkGn3MCRTf+EMHh17bjDEh1
OJd2fLDTWBSf8dfT+HHPHni98/fyyWpRXEeUnQ3T04C2qkWrboZimFlV8uK0
nCYc+S1HMqhaDOesTNGT2Zpw7l/c5tu64liq7JmVOqEFjXJttZzrxPGJIvOF
frYWzFKyfKBgKIH7KT7nXstpw041sdrzf0rgPXW0HzTStSFRIWTyrbUkbqLe
E5uV/AZumCUdiORI4oTW9Wip9G/gIYdQMbq/FFZ9xr3ElNaBMgeZVlNrUviN
kZvV50wdeF2H0TiXJ42pdk8bTBV14fBQrWaXhQx+W9lRczNTF86GFVkFT8lg
ybCQCAelvbAv28rln5xdeINV3a2bsxdmFWR3qxyjYSPz4dZUGh267So1lt2i
4YKzFYle2XRYp2y+vtMri1/0SA9Zy5LwgBxvocqJwIpMCj1EjoTK/K03LGcC
u42uxuTKk3A2izh/2pXAPXMTGm+USBg2oz8q407gx1v3fk7XJCF/X01RlDeB
CwzdhV8YkTB2qkIxIJDAZ7MKjEPdSfhchMItuUHg35Qzk/I8SJhZeF8sJYXA
I4VJ/DZPEp78eKEjPJXAzjUh8Qo+JDzh5T9ik0Fg0AF7HgaQcE40yWc5l8Ca
6/PnRKJIuHuq0zqggsBn4sYaGTEkfNnySMGjisB51D7xU5dJmC+9/4JtDYHl
ZJvrqhJISAmkDBjcIzCVTN5wvvHlL0jPdPMBgS3u/uIUnfKlH0yNeN9C4FiT
8KKSVBI6qhhbvnpE4GXobbOaQcJQDTE2r5XAhl0ueerZJFzO+kGiFxM48Lj1
wrF/k9BqNlmx/SmBy3mHLMJySdh6eqTpcQeB57wYmfn5JLyRW/6qsZPA/wPi
8UGq
        "]]},
      Annotation[#, "Charting`Private`Tag$13820#2"]& ]}, {}, {}}, 
   {RGBColor[1, 0, 0], PointSize[0.01], PointBox[CompressedData["
1:eJwt1G1MW2UUB/BbWCkUKAwpSIG2UEoLiCyWKS/ivTCzF9gcTKqwqHQMonMS
gnaxMjJqFB0Y4QMyNFu26rZIgPCBaFhkGVdrXIRkxmGZJG6WyUtYJ46WdlI6
sOd/bdI0v57nf85zn9x70+qbDzWGMAzTEPzSb/Bj7Tg8xXa4qioDVb9P0B/V
f91m7V793jDHXbLTsjxPfuM12QJZ/ZZlhTxwPu0e6nnjbnJ41NJ9srWr28fO
tcavjdU+wPojdj/ZfCfZjfUl723C7R94MC9jQMQF/c3idS+ZV3aEwjN3fGSu
sk1MXmNO/0u2jZ+RkM3VgXXY91EEOf9j3k821Umk/+dhZuFINOqlZwPYn+po
DPpdVGwif0wZi34SC+xclm+HF1q3UA/VxXEtJdJ7OUUMT9fjuguXD/XCvCwl
HvW6ChHqBTo5efC5YZj5UpdAlraIQuDlZxLJXSHNsMnih6XpN4V6kiEJ/cfb
QsnWzDIFebL+N5g/vi+Z/Gb7k9uQrz6UgnpWj+Ck+lTk92/AfHu4EvWJUjGZ
++kVFeZfFoVhv335aux3plOwrx+enPTBvNmQBhdflGB/9kuwdHgVduZo01Gv
LQ8n2/zn4GzXGMzPZWnQ33oyAut798Dlmguw2vYznB0fL4WPvpAB13QL9t0S
nCuJRH74sBbnfb0JZh7KM3EePf1ROK+2HbC0fQI2NS0IXuFk8KvP6mDGAfOV
Lh13RSm+XCyKxbzUY3pyo7UWNtmnp9iT8SM9XytnWepfMDNLbnaM3IZfNC+y
JdJbicd3z5OdbezfcOXAElndfcJNHmt52kVmckd9qH+66x/k8/ZvsKoOV6Sh
0022aec3yS79qAfr7Q0iLuipc6974avB5yPonH0eH4v7oVNMdv248JAVnk8J
ueKCaJ0V7vcI5B9l+5EvOxiJ/BXzBuZpCqOwvik5QDYV/ylDv9X+R+i/44sY
8ie75gSfjtuOfjcObKFflyqO6/nBa1wRMxzNV+U/Rt6ptcHMtQewvCNBROZW
NXLytw0O2DmWlwB/qAtBfu2JRLLjpgV2Dhc9jvofTtg6xiSRT2SUhaJeUqjA
/AqP4N49yciPVG7D+vMHUlCvG4VNTxlTYYtWLNSjldjvzk7YFKhRof9yVRj2
/3yRGv3ckzA/cAmW67Mk5OD7Iw397Kdg5zt9cN9XN4T6UG46/Is1HPnpIVhe
mhKB63Wla5D//F3Yeo2FvUVnYc4wLVj0khT7u38wA/nFWdiZ+StslNVEYp4i
T4v1hqswX+sQvDUYhX5aYybOc7A1GvMLlmB55ikZ+r/foMN5eApjkJ/8Hjau
fwfbPmvUc3vn/Iq3X47l/gMk7jZH
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.781092388053259*^9, {3.78109360590628*^9, 3.7810936301215205`*^9}, 
   3.7810936811201353`*^9, {3.781093948545865*^9, 3.781094047165433*^9}, 
   3.781094613195916*^9, {3.781254074795385*^9, 3.781254098321653*^9}, 
   3.781417102989957*^9, 3.781417168516947*^9, 3.781506065679384*^9, {
   3.7815061257841024`*^9, 3.7815061612175817`*^9}, 
   3.7815064984113116`*^9},ExpressionUUID->"739a0ab2-01c9-482b-881e-\
f10d7550d4cc"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"beakNum", " ", "=", " ", "1"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"D0", " ", "=", " ", 
     RowBox[{"Dep", "[", 
      RowBox[{"[", "beakNum", "]"}], "]"}]}], ";", " ", 
    RowBox[{"L0", "=", "  ", 
     RowBox[{"Len", "[", 
      RowBox[{"[", "beakNum", "]"}], "]"}]}], ";", " ", 
    RowBox[{"W0", "=", " ", 
     RowBox[{"Wid", "[", 
      RowBox[{"[", "beakNum", "]"}], "]"}]}], ";", " ", 
    RowBox[{"k0tilde", " ", "=", " ", 
     RowBox[{"ncurs", "[", 
      RowBox[{"[", "beakNum", "]"}], "]"}]}], ";", " ", 
    RowBox[{"Stilde", " ", "=", 
     RowBox[{"nders", "[", 
      RowBox[{"[", "beakNum", "]"}], "]"}]}], ";", " ", 
    RowBox[{"kx", " ", "=", " ", 
     RowBox[{"nsagCurs", "[", 
      RowBox[{"[", "beakNum", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"d", "[", "\[Lambda]_", "]"}], " ", "=", " ", 
     RowBox[{
      RowBox[{"D0", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{
          RowBox[{"(", 
           RowBox[{"1", "-", " ", "\[Lambda]"}], ")"}], 
          RowBox[{"(", 
           RowBox[{"1", " ", "+", " ", "kx"}], ")"}]}], " ", "-", " ", 
         RowBox[{"kx", " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"1", " ", "-", " ", "\[Lambda]"}], ")"}], "2"]}]}], 
        ")"}]}], "//", "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"W", "[", "\[Lambda]_", "]"}], " ", "=", " ", 
     RowBox[{
      RowBox[{"W0", " ", 
       RowBox[{"Sqrt", "[", " ", 
        FractionBox[
         RowBox[{" ", 
          RowBox[{"4", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"d", "[", "\[Lambda]", "]"}], "/", "D0"}], ")"}]}]}], 
         RowBox[{"k0tilde", " ", "-", " ", 
          RowBox[{"Stilde", " ", 
           RowBox[{"(", 
            RowBox[{"1", " ", "-", " ", "\[Lambda]"}], ")"}], " "}]}]], 
        "]"}]}], "//", "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"c0", "[", "\[Lambda]_", "]"}], ":=", " ", 
    FractionBox[
     RowBox[{
      RowBox[{"4", " ", 
       SuperscriptBox[
        RowBox[{"W", "[", "\[Lambda]", "]"}], 
        RowBox[{"1", "/", "3"}]], " ", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          RowBox[{"d", "[", "\[Lambda]", "]"}], " ", 
          RowBox[{"W", "[", "\[Lambda]", "]"}]}], ")"}], 
        RowBox[{"2", "/", "3"}]], " ", 
       RowBox[{
        SuperscriptBox["d", "\[Prime]",
         MultilineFunction->None], "[", "\[Lambda]", "]"}]}], "-", 
      RowBox[{"8", " ", 
       SuperscriptBox[
        RowBox[{"d", "[", "\[Lambda]", "]"}], 
        RowBox[{"5", "/", "3"}]], " ", 
       RowBox[{
        SuperscriptBox["W", "\[Prime]",
         MultilineFunction->None], "[", "\[Lambda]", "]"}]}]}], 
     RowBox[{"32", " ", 
      SuperscriptBox[
       RowBox[{"d", "[", "\[Lambda]", "]"}], 
       RowBox[{"7", "/", "3"}]], " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["1", 
         RowBox[{"W", "[", "\[Lambda]", "]"}]], ")"}], 
       RowBox[{"1", "/", "3"}]], " "}]]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"c1", "[", "\[Lambda]_", "]"}], ":=", 
    FractionBox[
     RowBox[{" ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"-", "16"}], " ", 
         SuperscriptBox[
          RowBox[{"d", "[", "\[Lambda]", "]"}], "2"], " ", 
         SuperscriptBox[
          RowBox[{"W", "[", "\[Lambda]", "]"}], 
          RowBox[{"1", "/", "3"}]], " ", 
         RowBox[{
          SuperscriptBox["d", "\[Prime]",
           MultilineFunction->None], "[", "\[Lambda]", "]"}]}], "-", 
        RowBox[{
         SuperscriptBox[
          RowBox[{"W", "[", "\[Lambda]", "]"}], 
          RowBox[{"7", "/", "3"}]], " ", 
         RowBox[{
          SuperscriptBox["d", "\[Prime]",
           MultilineFunction->None], "[", "\[Lambda]", "]"}]}], "+", 
        RowBox[{"2", " ", 
         RowBox[{"d", "[", "\[Lambda]", "]"}], " ", 
         SuperscriptBox[
          RowBox[{"W", "[", "\[Lambda]", "]"}], 
          RowBox[{"4", "/", "3"}]], " ", 
         RowBox[{
          SuperscriptBox["W", "\[Prime]",
           MultilineFunction->None], "[", "\[Lambda]", "]"}]}]}], ")"}]}], 
     RowBox[{"32", " ", 
      SuperscriptBox[
       RowBox[{"d", "[", "\[Lambda]", "]"}], 
       RowBox[{"7", "/", "3"}]], " ", 
      SuperscriptBox[
       RowBox[{"(", 
        FractionBox["1", 
         RowBox[{"W", "[", "\[Lambda]", "]"}]], ")"}], 
       RowBox[{"1", "/", "3"}]]}]]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"minCurvature", "[", "\[Lambda]_", "]"}], "=", " ", 
     RowBox[{
      RowBox[{
       RowBox[{"signedCurvature", "[", 
        RowBox[{"y", ",", "\[Lambda]"}], "]"}], "/.", 
       RowBox[{"y", "\[Rule]", 
        FractionBox[
         RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]}]}], "//", 
      "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"termsPlot", " ", "=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{"c0", "[", "\[Lambda]", "]"}], 
         SuperscriptBox[
          RowBox[{"minCurvature", "[", "\[Lambda]", "]"}], 
          RowBox[{
           RowBox[{"-", "1"}], "/", "3"}]]}], ",", " ", 
        RowBox[{
         RowBox[{"c1", "[", "\[Lambda]", "]"}], 
         SuperscriptBox[
          RowBox[{"minCurvature", "[", "\[Lambda]", "]"}], 
          RowBox[{"1", "/", "3"}]]}]}], " ", "}"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"\[Lambda]", ",", "0", ",", "0.99"}], "}"}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Thickness", "[", "0.007", "]"}], ",", "Red"}], "}"}], ",",
          " ", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Thickness", "[", "0.007", "]"}], ",", "Blue"}], "}"}]}], 
        "}"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
      RowBox[{"PlotLegends", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
        "\"\<F =\!\(\*SubscriptBox[\(c\), \(0\)]\) \
\!\(\*SuperscriptBox[SubscriptBox[\(\[Kappa]\), \(min\)], \
\(\(-1\)/3\)]\)\>\"", ",", 
         "\"\<F =\!\(\*SubscriptBox[\(c\), \(\(1\)\(\\\ \
\)\)]\)\!\(\*SuperscriptBox[SubscriptBox[\(\[Kappa]\), \(min\)], \(1/3\)]\)\>\
\""}], "}"}]}], ",", " ", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"\"\<\[Lambda]\>\"", " ", ",", " ", "\"\<F\>\""}], "}"}]}], 
      ",", " ", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}]}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"paramsPlot", " ", "=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"c0", "[", "\[Lambda]", "]"}], ",", " ", 
        RowBox[{"c1", "[", "\[Lambda]", "]"}]}], "}"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"\[Lambda]", ",", "0", ",", "0.99"}], "}"}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Thickness", "[", "0.007", "]"}], ",", "Red"}], "}"}], ",",
          "  ", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Thickness", "[", "0.007", "]"}], ",", "Blue"}], "}"}]}], 
        "}"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
      RowBox[{"PlotLegends", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
        "\"\<\!\(\*SubscriptBox[\(c\), \(0\)]\) \>\"", ",", 
         "\"\<\!\(\*SubscriptBox[\(c\), \(\(1\)\(\\\ \)\)]\)\>\""}], "}"}]}], 
      ",", " ", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"\"\<\[Lambda]\>\"", " ", ",", " ", "\"\<c\>\""}], "}"}]}], 
      ",", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}]}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.782211062674946*^9, 3.7822111057164507`*^9}, {
   3.782211152498167*^9, 3.782211204050021*^9}, {3.7822112429312916`*^9, 
   3.782211277682337*^9}, {3.7822113212041764`*^9, 3.7822114303079014`*^9}, {
   3.7822115190909543`*^9, 3.782211520151121*^9}, {3.782211552312256*^9, 
   3.782211559252655*^9}, {3.782211593683676*^9, 3.782211641875455*^9}, 
   3.782212216565767*^9, {3.782215726958281*^9, 3.7822157310536933`*^9}, {
   3.782215789178048*^9, 3.7822158075483356`*^9}, 3.782217125737562*^9, 
   3.7822182045385017`*^9, {3.782218237919422*^9, 3.7822182733206425`*^9}, {
   3.7822183073873405`*^9, 3.7822183162350254`*^9}, 3.78221838735345*^9, {
   3.782218870748169*^9, 3.782218881857027*^9}, {3.7822189153395243`*^9, 
   3.7822189354069686`*^9}, {3.7822189737055044`*^9, 3.782219119202566*^9}, {
   3.782219520507221*^9, 3.7822195554276342`*^9}, {3.782219589224452*^9, 
   3.7822196178295307`*^9}, {3.782219648993415*^9, 3.7822196518677406`*^9}, {
   3.78222044373554*^9, 3.7822204513938236`*^9}, {3.7822226400792418`*^9, 
   3.7822226403314257`*^9}, {3.7822973258891006`*^9, 3.782297435756273*^9}, {
   3.7822980380082884`*^9, 3.782298151088739*^9}, {3.7823051651078916`*^9, 
   3.782305190654999*^9}, {3.7823052653778877`*^9, 3.7823052729590054`*^9}, {
   3.7823085402566714`*^9, 3.7823086459036617`*^9}, {3.7823086909028983`*^9, 
   3.782308693871056*^9}, {3.782308750174926*^9, 3.7823087639068127`*^9}, {
   3.783192160789856*^9, 3.783192370884528*^9}, {3.783192464712756*^9, 
   3.7831924805705843`*^9}, {3.7832434365794306`*^9, 3.783243436833412*^9}, {
   3.7847097387943897`*^9, 3.784709832449419*^9}, {3.7847197652004657`*^9, 
   3.784719830654455*^9}, {3.7847198609524155`*^9, 3.7847198807702465`*^9}, {
   3.7847199887632446`*^9, 3.784720037003293*^9}, {3.784720153713698*^9, 
   3.7847201997615347`*^9}},ExpressionUUID->"3703ee60-f01c-4d8e-9b03-\
7007f78620b9"],

Cell[BoxData[
 TemplateBox[{
   GraphicsBox[{{{{}, {}, 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[0.007], 
          RGBColor[1, 0, 0]], 
         LineBox[CompressedData["
1:eJwV0Hk4lAkAx3FUqITFyCOrVp6E6pHR04VfVHIujUVRUbLaIZK2esLuFlbR
4WrC8vQ8o5xrMsjRZZvX0Eq5j8E4xnjHMTMvYpuUte0f3+fz//e7M5GMEBUl
JSWPr/0v76pGfyHXx37h/L7nD39VgNVCKjFJOs77BTjlxygQZ/Agz548CP0U
FaLwigJR9tT0VtIbpetu3quMVCDs6AZdYzIYG6mFsJ5ABSb8uQUGZDRkx3Ql
zgcUKAiMnaGR8YhMp2UOKSuwSnT6vh6ZgXc51VXPkj7CJyPemPHiEfa49wgz
k/9BmKZ2ed57DqZWXmjPKV1ARaD5pIVfFST1Di03Budhb8WmbamoAxn7NqhS
bR6Wso+b8rmvcKS+xJvh9gG0tI78jZo8tKvLeedvzUGjznfgTXUDHC1riPyu
Wdj4uahU7myCvRLNV0yfxVmupHqb6G+w+ukVKXdmwL8+7y8524I1mm1FQXMU
Hg7v2LzU/x7HTWq4mQNy/BWbbHuUaIPqW0N2aZ0MzQ02gYdUOhDn515pXi1F
31SV83JAJzjxMUuqRdNg97o1hD7pAm2DQ+Lx4ikkLmfXzEx3w/CeehmrYRLh
q15FORzsRfGUveB09wTCnLLzK+L74GH2dFa2JEFEiGvu9JAA8z+wJphGEuxw
0zHroA9gQfiBiHcioRqeZi6IGoS4q4DYnTgOEZOcK2wW4nfrLd3Kz8ToeTRH
f6AxjFuZnqYDymIQHckrDE1HUKD90onOGMO3jkle7q0jCN8xof48S4SVnoEC
zchRbLuEcYOZUchc2Yd3GYlQ+YL9R7vdKGxKZq5ZN4pwSLN69VL6CNQKDaX1
Z8fw2jI/yko+jMH0Jwe42mKMuYCaYQ/BzmhTuzVXjNh8bb2saCG+qOdapHw/
jsY8m+TtnoN4Kb4ReuTTOBb99tu26w9g7anDIxlZJEw3R66J/ChAQONF20OH
JSi/L+1lE33Y3RLTlUBK4Onmpksr7EXUrtRduQkTyK2/bWGS3oOyO1rX1ltN
IvjHgjx6aDd+jmcumrRNYtE55hPh1QWcszqVHjeFoKbpEZZJJ0LLlVP6zKZx
QitcY5+iHUYszgdO4zTUHO7JtYbb0MlsxORFKXJSfSuyGa3QF9Y1VerK4LB6
75EmlXeoqag18OHKEFmfPlj7ZzP8r5h4+J+Qw1iweTlV7Q1uCUJfUp/laC2g
kWk/8TEXYO1V+68cGq22IZdP8uE/9EX0mzIF7QXzEt+jfGwbS1PXUaPQWVMV
smYvH23S5942OhSsU3Ne26nzsV5Je+rqVgpeZoqnLY8b8HhLrb6KDwXXOOGi
m5CAZvGN4mY/CuWzETuz2ghctvSwzfCnsG4PY8UwQcDZSnTaNIhCTECY+4kS
AtK9GmVOYRSGmLo2elcI0D2CDqZcp9BtrEVGaBHIbbXo8U6gUHlZ4RGoQmAl
Y+GcURIFft3Juy4LPPT4Jt8tu03BIC/xzNoBHq4FVQlaH1CoO6fa5VjAw5jo
l/CsHAov3nNilbJ5cA9xWQ7KoyDZp3OnJoUHY+aQ6RybQn/w1uJvonhIkhbV
PHtMwXFFGKsqmIeZiGjX+CIKn/ff5Hj58nBs1k7oVkphO48/Ou7Mw+to9Qt6
nK//MuibLu3n4T/saXMB
          "]]}, Annotation[#, "Charting`Private`Tag$34750#1"]& ], 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[0.007], 
          RGBColor[0, 0, 1]], 
         LineBox[CompressedData["
1:eJwVjns41Pkex82MuWCOE3IpE3LJJZQQW8znWxqVKJelY1iXDdMy5XYsiR6i
WtptFUUlletS5LboJCMjZGmEilKExm1+vx9ip1yynT/ez+t5/fN63pt/DHcP
JsvIyPz32/7Pljjmm5IqT7YKNSwuYUwouNYllgkVW8Lsa+t9XZ1CQaJG9i22
2AEW8iqNdaqFgkg2MWMk9gADp7xd/UlCQZibpoqW+Bikvhzee0JLKJjkVhVr
iKOB5N9wLJDbIij2T5hVFacA49RcK+dls4A6Gnh1vTgTjkQ9fYHKHwk8M1O0
3BsLYRVTWpkxrBCEKa6rvPW8AvTQYHqJzCVBtb/xlMnRWjD4vtk4afEmsLfn
q26pfgj6rl+E4Y7VsBWT6hRUNYFnV7TLnaRGUL3cW6Ct2AJ9Xy0+84uEwHzo
9bajrhW82fykOVEHWB09SK6xaIcKi2RRxoVuCKqaqDMdfQahvOnfnRxfwNPk
Be5EUBek27/dezirD24Pm+utvnkOjoYiRYboJTQnpNu5CXtgDjc/dcByADpb
rfz3kXtBW0u8FPvTGxiYrj2w5tMHUS1vOOy/hiD/9aFW3oN+0DhPC47THoZz
a9frZ2deQuX5lsXgohHgU5si9zi8hmVu087Z3g8Q5ni9oDplAKbv0+vjsVE4
GeyUO/N+EObHV2zLNo+D+SFlw17Lt8Dl+S2ZeXwEGv+y8WDkEPQR3i7F0WIY
DRXPl3S+g790jGJ0qybgVeG8ZTZzGKS5fidm30+CsDedslF/BNS+6CT1MKdh
094Lrs6iEUAim3fmvjMge8R/UDH8A5g1Iq2mWxLAnPI51qxRyPvwokGbioNV
2Wz8jrZReELWkBZFEUAv2SgRBI2BGVu50T10FoauPEBV68ZhJcXhWNyOObBn
6bzYUTUO6jV2kQZ/z8EKI9fk4uGPkK/3w9IZwTw8Hj/L2//lI9ibh+UcKP4E
Cn6ckcwcMTwoCSj4nL4APm1Rdvs4E3D63knbicxFsOk63Z8qnoBrbrmKcnl/
Q6R1hnVu6iTErI98VFMvhfLf/h2vvn0KPmUZFE3KfoGYlNAl3Z4pwLw5Rtt8
lgCOb/e7kjgNGWp4h1S6DLxK0sUBwxnYdcN2s0bLKrCuVXyqaJsBkhYjI7Z0
DfpC22AqSgLJtzs25tBJKNdW/BM/RgKasUFWsUwSCqHRsohYCQS5Wf7irURC
n+9yJhcTJFAeMIUZapIQa7A1g3xBAtlZt7Ul5iQUtF/4QfOmBHyFp+6qHiWh
Bb3mlMNCCUxOhzTKl5GQ2ruH7TUqGOQVLxik+pARf2DV2UQNg7QR0zKbQDIS
9u3pvaOBQWWeWyQRQkYRnc+GftuEwdzrzcNhUWTUWT84xzPEwMcg4U1OGhmd
ufJFk7Ubg90mO5M7GshIvP+7iNQfMbhyszaxbCMF2TkkLi4FYZDMUrCb16Gg
TPaT+EgeBhFpd+XAkIKQ9cFzfnwMTLiJxIQlBd3Q9b5h+zMGBXfu1cS6UNDh
1bhWSRoG9D16j68mU1B9dYOGZxUGNpopG2RxCur0Tjcj1X7rG+4WZS1S0JCM
797yOgycS+gPTFcpiHxkLYzaiMEpupAVxZRFzjMcwZ9t3/5XW9M8t8qiEb2+
YLUhDGodllnnQ2UR4ypW/ZqGg7zfBtsFXBZttBO0p8jhEH42tihFKovMxjKG
tjFxmGDFfNaUoSJ3CyvaL0o4KK2zzOApUVFud7y3Leubp+l48a2oyILGkLlu
gYN2ur7j7gQq4sbqunB9cXDwH38SoUJDY7+O5Q/44dBhKuZns2iIn1/42SsQ
hzDF85PtBjSU2L2l0CMEh5j9KjcdbWnojt7WZecIHPzTzZcaf6AhsciyFFJx
yNzgXZ5XRkNRRhyqwX0crJUSC58509GyPc2noAKH3HG5cbejdJTq0V65uQqH
cR67VBxIR1fPHPTVqsNBeINqujOWjhr6XWrUm3FIYpyQhufT0dckr0D5fhy2
Wq92hSzTUdog7zGxjMOuVf1LVg0MNO+zw7XhKw5eSdyLi08ZiPt+ZTSJRIBG
aM/Xzj4GMh27zFCmE5C/z0azlmCgHskjDytlArr/xVY/ZySH1GXWTccZEZDs
e3zL93lyqGhLgxrZkwCV+vW2IbnySLH0bGnnUQLsu0OsTcvl0c9bXewyuQSc
Zt2TKjbJowPbRwP1AwhY7XXSNh2RR5LvmOWOYQTYbTLIfm6ggCxdAhwuJhPw
vMNeSq1XQLkik1ceqQTc93DdIXymgGTdF4+zLhBQvqJsVTCkgF55pV8q/5WA
wHx8fzeZieIDagdF2QRkMoScV65MNDZ6hp9zg4C9v1ux64KYyDn44FrALQKM
DzeWNcYxkVboe/35fAJUNfuH2XeZ6ILkj/r/FRGwaU234tGfTDR7Mtop5Q8C
RNt0VwI6meg/c/bvDt0jYE9Pt/u2YSZ6Es2IWF9BgMtqhb3hAhP9A2l9c0U=

          "]]}, Annotation[#, "Charting`Private`Tag$34750#2"]& ]}}, {}, {}}, {
    DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, 
     AxesOrigin -> {0, 0}, FrameTicks -> {{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, 
     GridLines -> {None, None}, DisplayFunction -> Identity, 
     PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, 
     DisplayFunction -> Identity, AspectRatio -> 
     NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, 
     AxesLabel -> {
       FormBox["\"\[Lambda]\"", TraditionalForm], 
       FormBox["\"F\"", TraditionalForm]}, AxesOrigin -> {0, 0}, 
     DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, 
     FrameLabel -> {{None, None}, {None, None}}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLines -> {None, None}, GridLinesStyle -> Directive[
       GrayLevel[0.5, 0.4]], LabelStyle -> Directive[Bold, Medium], 
     Method -> {
      "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
       AbsolutePointSize[6], "ScalingFunctions" -> None, 
       "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}}, PlotRange -> {All, All}, PlotRangeClipping -> 
     True, PlotRangePadding -> {{Automatic, Automatic}, {
       Automatic, Automatic}}, Ticks -> {Automatic, Automatic}}], 
   FormBox[
    FormBox[
     TemplateBox[{
      "\"F =\\!\\(\\*SubscriptBox[\\(c\\), \\(0\\)]\\) \
\\!\\(\\*SuperscriptBox[SubscriptBox[\\(\[Kappa]\\), \\(min\\)], \
\\(\\(-1\\)/3\\)]\\)\"", 
       "\"F =\\!\\(\\*SubscriptBox[\\(c\\), \\(\\(1\\)\\(\\\\ \
\\)\\)]\\)\\!\\(\\*SuperscriptBox[SubscriptBox[\\(\[Kappa]\\), \\(min\\)], \
\\(1/3\\)]\\)\""}, "LineLegend", DisplayFunction -> (FormBox[
        StyleBox[
         StyleBox[
          PaneBox[
           TagBox[
            GridBox[{{
               TagBox[
                GridBox[{{
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[1, 0, 0]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[1, 0, 0]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[0, 0, 1]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[0, 0, 1]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}}, 
                 GridBoxAlignment -> {
                  "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, 
                 AutoDelete -> False, 
                 GridBoxDividers -> {
                  "Columns" -> {{False}}, "Rows" -> {{False}}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {
                  "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, 
             GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
             AutoDelete -> False, 
             GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
             GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], 
            "Grid"], Alignment -> Left, AppearanceElements -> None, 
           ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> 
           "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
          Directive[Bold, Medium], FontFamily -> "Arial"}, Background -> 
         Automatic, StripOnInput -> False], TraditionalForm]& ), 
      InterpretationFunction :> (RowBox[{"LineLegend", "[", 
         RowBox[{
           RowBox[{"{", 
             RowBox[{
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "0.007`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[1, 0, 0], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0.6666666666666666, 0., 0.], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 
                    1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])}]], "RGBColor[1, 0, 0]"], Appearance -> 
                    None, BaseStyle -> {}, BaselinePosition -> Baseline, 
                    DefaultBaseStyle -> {}, ButtonFunction :> 
                    With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[1, 0, 0]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[1, 0, 0], Editable -> False, Selectable -> 
                    False]}], "]"}], ",", 
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "0.007`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0, 0, 1], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0., 0., 0.6666666666666666], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 
                    1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])}]], "RGBColor[0, 0, 1]"], Appearance -> 
                    None, BaseStyle -> {}, BaselinePosition -> Baseline, 
                    DefaultBaseStyle -> {}, ButtonFunction :> 
                    With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0, 0, 1]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0, 0, 1], Editable -> False, Selectable -> 
                    False]}], "]"}]}], "}"}], ",", 
           RowBox[{"{", 
             RowBox[{#, ",", #2}], "}"}], ",", 
           RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", 
           RowBox[{"LabelStyle", "\[Rule]", 
             RowBox[{"Directive", "[", 
               RowBox[{"Bold", ",", "Medium"}], "]"}]}], ",", 
           RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), 
      Editable -> True], TraditionalForm], TraditionalForm]},
  "Legended",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"], 
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, GridBoxItemSize -> Automatic, 
    BaselinePosition -> {1, 1}]& ),
  Editable->True,
  InterpretationFunction->(RowBox[{"Legended", "[", 
     RowBox[{#, ",", 
       RowBox[{"Placed", "[", 
         RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
 CellChangeTimes->{
  3.7823055993271484`*^9, {3.7823085480182953`*^9, 3.7823086255442905`*^9}, 
   3.7823086974763055`*^9, {3.78230875888723*^9, 3.7823087652654624`*^9}, {
   3.78319216910087*^9, 3.783192182445529*^9}, 3.783192231806012*^9, {
   3.7831922764918137`*^9, 3.783192295028283*^9}, {3.7831923370854473`*^9, 
   3.783192371932889*^9}, 3.7831924823685684`*^9, 3.78319441677269*^9, 
   3.7832434387233095`*^9, 3.7847096551777515`*^9, {3.7847097691340723`*^9, 
   3.7847097911169543`*^9}, 3.784709834480192*^9, 3.784720092106632*^9, {
   3.7847201718867807`*^9, 
   3.784720201034557*^9}},ExpressionUUID->"2efd1e8f-9e9c-427a-a989-\
87fe8295a0c5"],

Cell[BoxData[
 TemplateBox[{
   GraphicsBox[{{{{}, {}, 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[0.007], 
          RGBColor[1, 0, 0]], 
         LineBox[CompressedData["
1:eJwVxXk01AkAB3DEspkmT64iOaYSahnsvvbJtw2pUBNrtOxGK29qdDlqSxem
UkSO183apZIOGoSIFL/BuMZgjGtMw4xjZvqJerbT7v7xeR/r3w8HRGppaGj4
/+f/Xx2nDBRygzzy6mllPivluNam0GArXJBpzpe2WMtx2ux6rofCE2ca4j/6
WcoR7UEq7RSBOBRVOB1kKkfUTvMllooIUEViScy3ckyEcO+ZKWKxMS3muFg9
hnthp6aNFRy4tdgGMyrHoCPbc9VIkY3ACfNZqd8YgrI5lgHP70Bn5AIlKXoU
UVSDJ7kdxUhIjnhfx5WhNGzNpH1wOZKZcxfmNGTwcMo3XlX6DN9lHY147vca
Duo5qwJuHehi/9uni6UwzhQWrKC+wuf1TeUfKFJQnjEHmysaYRZiZ8cmJXAN
3qpV5twE89VfqD4Tw9jLHa9wlLXgETPUdf/AEIjEdyHje9tAn0uizyoHkTey
zvbLQAeKE5tNpxYNov5UivvOBgHqc/Vt3dcMgN/oGualJcRYg9Zg+u5+iKfK
t8yHdiOs20dWnSZGfp9vI6ukBytNdnl/5Pfh/PzNymllL4zlK8+OL+/DAZ26
6J88+8Dpew8lW4SozTcLSjlieHNcMlJbe3EocluOUtIPA0brn2WrerHO13C1
0GUQ5yMybu+43INvDmSu6Y8egnKttuFFrR7I2IqZQv4wqisKNTNiuyG6M+Ny
nTKCEcYNUf2sEA3ClAXLaFLot018f+KkEMs3JTP8OqVQh7bX+X7tgvaOsH7q
4dfQ8czQc07vgnpbvrebhQz2J2qlKUu74PpgOp7Ok2GBYNbuwUMBdAuXqV7s
HcViY6v1y7YKMJRVspFrMIbWBdK8lMZObLCw6qJzx+D4urGoWb8Tn/Vy7FO3
y5GUJVi09LcO1I4lsXw+yPEy8dj2yHvt0N/tLc2+oUBMwiiLotWOUF6Mu5f3
ODiMaIcfmW34oe1kzznFONLMP92Jq2lFtFuGW865CWjG7f+72a4Vj9MWx5s6
TcJJ91aJ2RU+jnLYH20EkzDipLxL0OYD+5x2Z52ewll6fO8vsS1gPdFMFa9W
YpjpfKl8shkW14pni3lKOM7TWLEHm9HN5mEyRoXZAsHUQmUTTIafNZUtUYPV
Pue19mgTKkurzIK4agRIr4otdJoQ8oeNf8ivb2CTNr7P6woPl/pZteSnNzgb
Y8N5QONhJpTOqPr6Bp1rbUt6bXgIkXyWJWiSOCGzX6ppzYPjaKaeoS6JaUOb
wl3LeRCoagJdDUnU+8QVLTThwVTDYOq4HQmVULQhXpeHu6uqTLSCSFinZAQn
TxGgFiUV8YNJcJ/z1lVPEDjm4O+eHULCuStvk1pBYIuTbA8tnMRT08VWP48S
UK2nPN4cRSL/YMkT2hABF/9wz9REEuZdB1d0tRPI6bQXBZ4jkZv+tEa3jYB2
wPt9Fskk3lJnsj34BETMlPTHl0k4UC3/ecQjEB9e3t95nUTcEaP0yy8IjMrO
HLhxi4RZWI8eUUvAL3LrfHguCeFN+osvNQQs2RLaTD6J0vy/JIerCCSr7ldW
3yUxybjlU1RBYPpQ7DbOfRIXqXoqWTmBXW83DPs+JHGhR9JqUUbgZazeEaNi
Er0dS8aZXAL/AngKcLQ=
          "]]}, Annotation[#, "Charting`Private`Tag$34827#1"]& ], 
       TagBox[{
         Directive[
          Opacity[1.], 
          AbsoluteThickness[1.6], 
          Thickness[0.007], 
          RGBColor[0, 0, 1]], 
         LineBox[CompressedData["
1:eJwVkWs01Hkch8dg5l85soSprFS6KHVctyNjvj93RmNFw0ZlhNXB5tbSme6G
tWW1K4WKbRuJ1tLMsCJlStKmlmnKuOXS4D/M4M/I0YSsffE5z5vn1fPZeDQh
MJpMIpFYy/ufTSf1esqEbMYGti+9bWWnOP81TorF7cE5skHHbVImPkMrKGbg
7vChWBnw8I1MnMQgVNvxIBCl9PxQVygTx+1fb2SOR4K8jZ+t3CoTj4YK79Lw
FGgIuoVbenSI74afnjLGeXDqgLIJv/BWrCuPuLYGz4OXJ78a91opEbPzeOaB
j+6AV7nqoIb7VBynbyAobquCaAEnoyrytlgUbjW2I6QGRq4zmlrsBMCw4Rtv
FdVDIv2vE+3bn8POiTmLEmEjFCis2dWnJGCcKy3ZoN8EEYcrI1IEMtCrD+79
p7YZMjsVd0NuvAeHEF9yte0LMMpPjXRfGIQooaLWWv4SDnVhwabSIXh+4WOo
Iuo1qKp2n+j7HodbA7s3L/a0gYn3YZ+xgVF4cvoSff8zCRhSDGnscypobXYI
9yBLgamp/4M+PAFdyhqfpbC3kOAkMA7bMwX8Tr/mmPvvIHezcn5l4jRkLl1/
MKXqgLHk/Kn1l9UQr9uY5OreCZolUUFF4wzEeV0vEfG6gHeQJxno+AjHo5lF
qv5uOL9LUGi7NAu7/Qy3Se17oWK6Z2Ct+RxQ4nOtupPeA6egF/205RPIY3F1
WWsf2KO4uUaGBmR31PYFegPAOh0oj3L9DM+kl7TXWQ5Cg5FneqrzPHztlhWw
r30QnuNrCbL3Auh8G96tn/ABeKtWR7JdFmGCyfd0NJPDN0p+QLvHF3D4c4pr
1yKHUY2O1VqPJaCWrRsXRw2Blbd/8j1TEnp/5T4SGgzDvt+dBaJrJORiZvHG
TjgMlOyOzMUVWmgBK9qR7T8Chzgbg5u5WujxcHqMt2YErjE4NOmMFlp1xHMw
rxCHOf7izSuRZBTWkkz38FRAc5r5gbReMtrz+tS7DFwBORVMK1+mNkpy/M2x
KGMU1MJn4aN/a6PKnNVcU5sxoD1pjr9opYN+5MV+3iQZA2yifyT5qg6CYzZH
rpxRwjbHUkeg6qIYgVZ21zYVyO77NylTdZFZftVMVYsKzLrJJrb9uuhtbMvy
V+NgsOcMfS+Lgkz66l9UG01Ay6/FV6k1FPRAVEdjCyfgJWfSk0qjotC0TazQ
Q5Mw+6Z+qIJHRRe7Yx4T85MgZZ5zDVFQkTrMLqDuyySId83fNhxb9vsX5Oe1
CEhM1sz8q6Qi66FczJBKQGBQRrzHJBVJxhuCHAwJsHikK7CZpSJTkoHy5HYC
5p180inaGCrdWmdCZhNA47pyyswxpH8v/V5rCAFuQ2c/ciwwlLqTRc8LJcA9
J427bhOGfGzkEZYcAhLu3A7L2YKhcSe9Sq84AujKFSnJ1hiyZ3Hcsy8QIOgR
zjntxVBR+w5ZUAYBpvMnytXOGNIJnD1mlkXAK9fVfhUuGJIFX7pc+QuxnFUS
beaKIS6npru9gICQT9XTi94YGpKfjS+8QUB5Lce21hdD+6J9lzjFBHQmqI8e
98OQeWy/pZpPwN7SVzf7/TGUNV7+4GEpAa2FJiX5ARiaOp7C5JUT8HMEq8g/
EEPfTbv0+VUQYPIwKYtyAENPU7DENVUEGIdlRjWyMfQf0KVWug==
          "]]}, Annotation[#, "Charting`Private`Tag$34827#2"]& ]}}, {}, {}}, {
    DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, 
     AxesOrigin -> {0, 0}, FrameTicks -> {{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, 
     GridLines -> {None, None}, DisplayFunction -> Identity, 
     PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, 
     DisplayFunction -> Identity, AspectRatio -> 
     NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, 
     AxesLabel -> {
       FormBox["\"\[Lambda]\"", TraditionalForm], 
       FormBox["\"c\"", TraditionalForm]}, AxesOrigin -> {0, 0}, 
     DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, 
     FrameLabel -> {{None, None}, {None, None}}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLines -> {None, None}, GridLinesStyle -> Directive[
       GrayLevel[0.5, 0.4]], LabelStyle -> Directive[Bold, Medium], 
     Method -> {
      "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
       AbsolutePointSize[6], "ScalingFunctions" -> None, 
       "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}}, PlotRange -> {All, All}, PlotRangeClipping -> 
     True, PlotRangePadding -> {{Automatic, Automatic}, {
       Automatic, Automatic}}, Ticks -> {Automatic, Automatic}}], 
   FormBox[
    FormBox[
     TemplateBox[{
      "\"\\!\\(\\*SubscriptBox[\\(c\\), \\(0\\)]\\) \"", 
       "\"\\!\\(\\*SubscriptBox[\\(c\\), \\(\\(1\\)\\(\\\\ \\)\\)]\\)\""}, 
      "LineLegend", DisplayFunction -> (FormBox[
        StyleBox[
         StyleBox[
          PaneBox[
           TagBox[
            GridBox[{{
               TagBox[
                GridBox[{{
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[1, 0, 0]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[1, 0, 0]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
                   GraphicsBox[{{
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[0, 0, 1]], {
                    LineBox[{{0, 10}, {20, 10}}]}}, {
                    Directive[
                    EdgeForm[
                    Directive[
                    Opacity[0.3], 
                    GrayLevel[0]]], 
                    PointSize[0.5], 
                    Opacity[1.], 
                    AbsoluteThickness[1.6], 
                    Thickness[0.126], 
                    RGBColor[0, 0, 1]], {}}}, AspectRatio -> Full, 
                    ImageSize -> {20, 10}, PlotRangePadding -> None, 
                    ImagePadding -> Automatic, 
                    BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}}, 
                 GridBoxAlignment -> {
                  "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, 
                 AutoDelete -> False, 
                 GridBoxDividers -> {
                  "Columns" -> {{False}}, "Rows" -> {{False}}}, 
                 GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
                  GridBoxSpacings -> {
                  "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, 
             GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 
             AutoDelete -> False, 
             GridBoxItemSize -> {
              "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
             GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], 
            "Grid"], Alignment -> Left, AppearanceElements -> None, 
           ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> 
           "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
          Directive[Bold, Medium], FontFamily -> "Arial"}, Background -> 
         Automatic, StripOnInput -> False], TraditionalForm]& ), 
      InterpretationFunction :> (RowBox[{"LineLegend", "[", 
         RowBox[{
           RowBox[{"{", 
             RowBox[{
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "0.007`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[1, 0, 0], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0.6666666666666666, 0., 0.], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 
                    1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])}]], "RGBColor[1, 0, 0]"], Appearance -> 
                    None, BaseStyle -> {}, BaselinePosition -> Baseline, 
                    DefaultBaseStyle -> {}, ButtonFunction :> 
                    With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[1, 0, 0]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[1, 0, 0], Editable -> False, Selectable -> 
                    False]}], "]"}], ",", 
               RowBox[{"Directive", "[", 
                 RowBox[{
                   RowBox[{"Opacity", "[", "1.`", "]"}], ",", 
                   RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", 
                   RowBox[{"Thickness", "[", "0.007`", "]"}], ",", 
                   InterpretationBox[
                    ButtonBox[
                    TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    RGBColor[0, 0, 1], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> RGBColor[0., 0., 0.6666666666666666], 
                    FrameTicks -> None, PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 
                    1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])}]], "RGBColor[0, 0, 1]"], Appearance -> 
                    None, BaseStyle -> {}, BaselinePosition -> Baseline, 
                    DefaultBaseStyle -> {}, ButtonFunction :> 
                    With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    RGBColor[0, 0, 1]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["RGBColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                    Automatic, Method -> "Preemptive"], 
                    RGBColor[0, 0, 1], Editable -> False, Selectable -> 
                    False]}], "]"}]}], "}"}], ",", 
           RowBox[{"{", 
             RowBox[{#, ",", #2}], "}"}], ",", 
           RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", 
           RowBox[{"LabelStyle", "\[Rule]", 
             RowBox[{"Directive", "[", 
               RowBox[{"Bold", ",", "Medium"}], "]"}]}], ",", 
           RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), 
      Editable -> True], TraditionalForm], TraditionalForm]},
  "Legended",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"], 
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, GridBoxItemSize -> Automatic, 
    BaselinePosition -> {1, 1}]& ),
  Editable->True,
  InterpretationFunction->(RowBox[{"Legended", "[", 
     RowBox[{#, ",", 
       RowBox[{"Placed", "[", 
         RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
 CellChangeTimes->{
  3.7823055993271484`*^9, {3.7823085480182953`*^9, 3.7823086255442905`*^9}, 
   3.7823086974763055`*^9, {3.78230875888723*^9, 3.7823087652654624`*^9}, {
   3.78319216910087*^9, 3.783192182445529*^9}, 3.783192231806012*^9, {
   3.7831922764918137`*^9, 3.783192295028283*^9}, {3.7831923370854473`*^9, 
   3.783192371932889*^9}, 3.7831924823685684`*^9, 3.78319441677269*^9, 
   3.7832434387233095`*^9, 3.7847096551777515`*^9, {3.7847097691340723`*^9, 
   3.7847097911169543`*^9}, 3.784709834480192*^9, 3.784720092106632*^9, {
   3.7847201718867807`*^9, 
   3.7847202012061234`*^9}},ExpressionUUID->"9cf3e58f-da72-4868-982b-\
cbd9359d0afb"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{"Plot", "[", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"c0", "[", "\[Lambda]s", "]"}], " ", 
      SuperscriptBox["\[Kappa]", 
       RowBox[{
        RowBox[{"-", "1"}], "/", "3"}]]}], "+", " ", 
     RowBox[{
      RowBox[{"c1", "[", "\[Lambda]s", "]"}], "  ", 
      SuperscriptBox["\[Kappa]", 
       RowBox[{"1", "/", "3"}]]}]}], ",", " ", 
    RowBox[{"{", 
     RowBox[{"\[Kappa]", ",", " ", "0.2", ",", " ", "1.4"}], "}"}], ",", " ", 
    RowBox[{"PlotStyle", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{"Purple", ",", " ", 
       RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"LabelStyle", "\[Rule]", 
     RowBox[{"Directive", "[", 
      RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}], ",", " ", 
    RowBox[{"AxesLabel", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{"\"\<\[Kappa]\>\"", ",", " ", "\"\<F\>\""}], "}"}]}], ",", " ", 
    RowBox[{"AxesOrigin", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{"0", ",", "0"}], "}"}]}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.7831944494642935`*^9, 3.783194529163188*^9}, {
  3.783194565585926*^9, 3.783194638116392*^9}, {3.783194737257403*^9, 
  3.783194739163208*^9}, {3.784709679646674*^9, 3.7847096880381413`*^9}, {
  3.7847098613164196`*^9, 3.7847099086264114`*^9}, {3.7847201181226416`*^9, 
  3.7847201399200077`*^9}, {3.7847201833311386`*^9, 3.784720188493693*^9}, {
  3.784885869990217*^9, 
  3.784885889503995*^9}},ExpressionUUID->"3cae6623-e303-42ae-83ea-\
c6b9edf5f03b"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0.5, 0, 0.5], Thickness[0.007], Opacity[1.], 
      LineBox[CompressedData["
1:eJwVx3k41HkAx/HfT+vY0qGQq+QqCdU48tSTz7fdMpvSIUnDZklax0blfKIt
eVDJkcVTGW0tNlE63KLtcMxUdnNEtoPJOAq55jeMmbGzf7yf9/My8g1xPaJE
UZSLov8/Ra9vvnKFh6eu1XcGa8XwKiw0LMznoXF0yN7ssRiP9xgfr7zPw51X
uk9++kuMhOtLNDt4PCQH+Hd0PBVDazNzUFPCQ5VcVbmhUQxWVI0whcOH/Rrj
dTdfixE8sk12Tv8FpjSLHT2EYnR3cSyPcV/C/ILowj31KVDN2tesBX+j6SIv
w91nCt/1RffXRr7GcMqzXpuSKXjo9NRXMy04dMppt61kChcPpBdbZbXBdhc/
bHT7NEIMWkR9um9Qlmg31XhZ4RFPtnZdB+jO4xp09zS+P3no/TXOW1w1WFei
byFBU+xY+9F/uxA/58C+ul8kCMx89aYw5h34HrHZ58okqGVt3MhS+oBTeouN
dcQS9MYZChad+QjH5ckRevYzWDK6ksdK7UbO7mb/pdEzuOST4HpmTw/Ki3r8
PMtnkHlwbreasQDtbjWCKPEMVIv4qY++CrDNQCPC1F4KV7SGZpR8gsnShi3x
IVKs4VDu+b/2oq0t78/rxVK8qwgP7toixKIF80lBrxT6OQsTnTX7wA2r2Ouy
Qob6t8JnQkEfqru8F3QelIHN+YaV90c/ApRqw/NTZDjgw87jhg1glWml33SD
DKSohV29YRBpblrVNRIZMnZdna8kHoTKxu0XqyzlCItK6Ihv+IyWOfXPzXzl
sBZWt1gkfQF//cvTWzPkiOhc0jKPMwTKpL6iplEOc7PCiaXmw6jPS5XGSOR4
WJrgxB4YxrLCMaHV6lm85Cdx71eOwKFxUtfIcxa1Jq1mOPUVeuqcQuPzs1D/
YjkwYzCKrbI9g0VlszibGPc4PH4U6e8z+b7CWRzeFrOWFo4ibeX+2GI1iiQ7
JRnddhlDaH7kbrsVFDEKcCj2KxmDSDvm0mc7igRVqjTZLhzHibNV4ZPOFJE6
9x8xjhzH7WnfijgfikzLg3KMOsdhfShVvjeCIo6M0n7HLRO4N3wjiptMEQe9
ytzQWxPIXjgnjtykSK63xtlStUn0unimbyinyI6BGKHW8Ukk+iuZ3HxBEb/L
yYKklkn06bZ4BX6kCCugOlSDJULnA5NI7jhF2OckZyquiDDPZ0K+SZUmvLoP
q0MkIqhG31X5QY8mpenlKoZSEXRo/1s5Cuf6pXxqlomwIDHGaUzhE3MdudY0
A7flTZFX9Wli4M5dNKLK4PCJ3rtDBjQ5NuwpDtZi8MDhfEiaIU0WG7x9HrhO
Ydmmze2mNJGO3Luhx2JgnvZb0GozmvQ9STrNt2Fw8pJHVqzCNUcdHCw2MCjZ
a9pjtpImfg+ziwY3Mwiobd8RsYom5c7ul3/ewUD9H1G4tgVNfl9mHaLjwiCX
sgkKVPjCqPLOpl0M1lb1eNUp7J1VpmzuymAfO9POfw1N1ASa0f0eDKwivR+V
WdJkvHRofzaHwcNEm8xvrWjyLvE5i+3FIMs8JvBHhe9bhQ0VeDMIzA2eq2xN
kxxqJ8/dh0GxrVa7h8IJrSYFKocZjL23ySlWOLRgJq7cj0G5pMmbWksTTnSr
t78/g+AvbYZuCv8HyuxTqg==
       "]]},
     Annotation[#, "Charting`Private`Tag$18527#1"]& ]}, {}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{
    FormBox["\"\[Kappa]\"", TraditionalForm], 
    FormBox["\"F\"", TraditionalForm]},
  AxesOrigin->{0., 0.},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[Bold, Medium],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0., 1.4}, {0., 2.148109673199931}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.783194529397535*^9, {3.783194579336585*^9, 3.7831945982885284`*^9}, 
   3.7831946388939867`*^9, 3.7831947394131765`*^9, {3.7847096705301085`*^9, 
   3.7847096891160135`*^9}, {3.7847098745030985`*^9, 
   3.7847099091575365`*^9}, {3.7847201315239797`*^9, 3.784720140482325*^9}, {
   3.78472018449712*^9, 3.7847201892778053`*^9}, {3.7848858706693983`*^9, 
   3.784885889989772*^9}},ExpressionUUID->"75b5f56e-86a6-4c27-9ebd-\
381e384f85c3"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{"FileNameJoin", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       RowBox[{"NotebookDirectory", "[", "]"}], "<>", " ", 
       "\"\<Run Results\>\""}], " ", ",", " ", "\"\<Profile Data\>\""}], 
     "}"}], " ", "]"}], "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"speciesNames", " ", "=", " ", 
    RowBox[{"{", 
     RowBox[{
     "\"\<T.Bicolor\>\"", ",", "\"\<G.Fuliginosa\>\"", ",", 
      "\"\<G.Fortis\>\"", ",", "\"\<G.Magnirostris\>\"", ",", 
      "\"\<G.Conirostris\>\"", ",", "\"\<G.Scandens\>\"", ",", 
      "\"\<G.Difficilis\>\"", ",", "\"\<C.Pallidus\>\"", ",", 
      "\"\<C.Parvulus\>\"", ",", "\"\<C.Psittacula\>\"", ",", 
      "\"\<P2.Inornata\>\"", ",", "\"\<C2.Olivacea\>\"", ",", 
      "\"\<P.Crassirostris\>\""}], 
     RowBox[{"(*", 
      RowBox[{",", "\"\<P.CrassirostrisD\>\""}], "*)"}], "}"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "import", " ", "and", " ", "make", " ", "tip", " ", "at", " ", "the", " ", 
    "origin", " ", "and", " ", "reorient"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"import", "[", "index_", "]"}], ":=", 
   RowBox[{"(", " ", 
    RowBox[{
     RowBox[{"list", " ", "=", " ", 
      RowBox[{
       RowBox[{"Import", "[", " ", 
        RowBox[{
         RowBox[{"speciesNames", "[", 
          RowBox[{"[", "index", "]"}], "]"}], " ", "<>", " ", 
         "\"\<.csv\>\""}], "]"}], "[", 
       RowBox[{"[", 
        RowBox[{";;", 
         RowBox[{"-", "2"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"(", "  ", 
       RowBox[{
        RowBox[{"DiagonalMatrix", "[", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"-", "1"}], ",", "1"}], "}"}], "]"}], ".", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"Transpose", "[", "list", "]"}], "-", " ", 
          RowBox[{"list", "[", 
           RowBox[{"[", "1", "]"}], "]"}]}], ")"}]}], "  ", ")"}], "//", 
      "Transpose"}]}], "\[IndentingNewLine]", ")"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"scaleColors", " ", "=", " ", 
  RowBox[{"{", 
   RowBox[{
   "Blue", ",", " ", "Blue", ",", "Blue", ",", " ", "Blue", ",", "Blue", ",", 
    " ", "Blue", ",", " ", "Blue", ",", "Green", ",", "Green", ",", "Green", 
    ",", "Green", ",", "Green", ",", "Purple"}], 
   RowBox[{"(*", 
    RowBox[{",", "Purple"}], "*)"}], "}"}]}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.781683144000444*^9, 3.781683248382869*^9}, 
   3.7816832785493355`*^9, {3.7816834014414654`*^9, 3.7816834653964653`*^9}, {
   3.781684124938119*^9, 3.781684126465511*^9}, {3.78168420226724*^9, 
   3.7816842302137303`*^9}, 3.7816853477614822`*^9, 3.7816853936895814`*^9, {
   3.7816856003933926`*^9, 3.7816856016507072`*^9}, {3.7816857080424433`*^9, 
   3.781685709834632*^9}, {3.7816857783366137`*^9, 3.781685801161182*^9}, {
   3.7818686960130577`*^9, 3.781868698752805*^9}, {3.7824727293658476`*^9, 
   3.782472810169984*^9}, {3.78247301076063*^9, 3.782473015671629*^9}, {
   3.7855782060410786`*^9, 3.7855782445332537`*^9}, {3.78557827834294*^9, 
   3.7855782793701687`*^9}},ExpressionUUID->"dc87b991-ee15-4613-a9ec-\
36bae0fa0120"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   InterpretationBox[
    ButtonBox[
     TooltipBox[
      GraphicsBox[{
        {GrayLevel[0], RectangleBox[{0, 0}]}, 
        {GrayLevel[0], RectangleBox[{1, -1}]}, 
        {RGBColor[0, 0, 1], RectangleBox[{0, -1}, {2, 1}]}},
       AspectRatio->1,
       DefaultBaseStyle->"ColorSwatchGraphics",
       Frame->True,
       FrameStyle->RGBColor[0., 0., 0.6666666666666666],
       FrameTicks->None,
       ImageSize->
        Dynamic[{
         Automatic, 
          1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
           Magnification])}],
       PlotRangePadding->None],
      "RGBColor[0, 0, 1]"],
     Appearance->None,
     BaseStyle->{},
     BaselinePosition->Baseline,
     ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
       If[
        Not[
         AbsoluteCurrentValue["Deployed"]], 
        SelectionMove[Typeset`box$, All, Expression]; 
        FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
        FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0, 0, 1]; 
        FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
        MathLink`CallFrontEnd[
          FrontEnd`AttachCell[Typeset`box$, 
           FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
           Left, Top}, 
           "ClosingActions" -> {
            "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
     DefaultBaseStyle->{},
     Evaluator->Automatic,
     Method->"Preemptive"],
    RGBColor[0, 0, 1],
    Editable->False,
    Selectable->False], ",", 
   InterpretationBox[
    ButtonBox[
     TooltipBox[
      GraphicsBox[{
        {GrayLevel[0], RectangleBox[{0, 0}]}, 
        {GrayLevel[0], RectangleBox[{1, -1}]}, 
        {RGBColor[0, 0, 1], RectangleBox[{0, -1}, {2, 1}]}},
       AspectRatio->1,
       DefaultBaseStyle->"ColorSwatchGraphics",
       Frame->True,
       FrameStyle->RGBColor[0., 0., 0.6666666666666666],
       FrameTicks->None,
       ImageSize->
        Dynamic[{
         Automatic, 
          1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
           Magnification])}],
       PlotRangePadding->None],
      "RGBColor[0, 0, 1]"],
     Appearance->None,
     BaseStyle->{},
     BaselinePosition->Baseline,
     ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
       If[
        Not[
         AbsoluteCurrentValue["Deployed"]], 
        SelectionMove[Typeset`box$, All, Expression]; 
        FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
        FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0, 0, 1]; 
        FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
        MathLink`CallFrontEnd[
          FrontEnd`AttachCell[Typeset`box$, 
           FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
           Left, Top}, 
           "ClosingActions" -> {
            "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
     DefaultBaseStyle->{},
     Evaluator->Automatic,
     Method->"Preemptive"],
    RGBColor[0, 0, 1],
    Editable->False,
    Selectable->False], ",", 
   InterpretationBox[
    ButtonBox[
     TooltipBox[
      GraphicsBox[{
        {GrayLevel[0], RectangleBox[{0, 0}]}, 
        {GrayLevel[0], RectangleBox[{1, -1}]}, 
        {RGBColor[0, 0, 1], RectangleBox[{0, -1}, {2, 1}]}},
       AspectRatio->1,
       DefaultBaseStyle->"ColorSwatchGraphics",
       Frame->True,
       FrameStyle->RGBColor[0., 0., 0.6666666666666666],
       FrameTicks->None,
       ImageSize->
        Dynamic[{
         Automatic, 
          1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
           Magnification])}],
       PlotRangePadding->None],
      "RGBColor[0, 0, 1]"],
     Appearance->None,
     BaseStyle->{},
     BaselinePosition->Baseline,
     ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
       If[
        Not[
         AbsoluteCurrentValue["Deployed"]], 
        SelectionMove[Typeset`box$, All, Expression]; 
        FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
        FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0, 0, 1]; 
        FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
        MathLink`CallFrontEnd[
          FrontEnd`AttachCell[Typeset`box$, 
           FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
           Left, Top}, 
           "ClosingActions" -> {
            "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
     DefaultBaseStyle->{},
     Evaluator->Automatic,
     Method->"Preemptive"],
    RGBColor[0, 0, 1],
    Editable->False,
    Selectable->False], ",", 
   InterpretationBox[
    ButtonBox[
     TooltipBox[
      GraphicsBox[{
        {GrayLevel[0], RectangleBox[{0, 0}]}, 
        {GrayLevel[0], RectangleBox[{1, -1}]}, 
        {RGBColor[0, 0, 1], RectangleBox[{0, -1}, {2, 1}]}},
       AspectRatio->1,
       DefaultBaseStyle->"ColorSwatchGraphics",
       Frame->True,
       FrameStyle->RGBColor[0., 0., 0.6666666666666666],
       FrameTicks->None,
       ImageSize->
        Dynamic[{
         Automatic, 
          1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
           Magnification])}],
       PlotRangePadding->None],
      "RGBColor[0, 0, 1]"],
     Appearance->None,
     BaseStyle->{},
     BaselinePosition->Baseline,
     ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
       If[
        Not[
         AbsoluteCurrentValue["Deployed"]], 
        SelectionMove[Typeset`box$, All, Expression]; 
        FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
        FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0, 0, 1]; 
        FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
        MathLink`CallFrontEnd[
          FrontEnd`AttachCell[Typeset`box$, 
           FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
           Left, Top}, 
           "ClosingActions" -> {
            "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
     DefaultBaseStyle->{},
     Evaluator->Automatic,
     Method->"Preemptive"],
    RGBColor[0, 0, 1],
    Editable->False,
    Selectable->False], ",", 
   InterpretationBox[
    ButtonBox[
     TooltipBox[
      GraphicsBox[{
        {GrayLevel[0], RectangleBox[{0, 0}]}, 
        {GrayLevel[0], RectangleBox[{1, -1}]}, 
        {RGBColor[0, 0, 1], RectangleBox[{0, -1}, {2, 1}]}},
       AspectRatio->1,
       DefaultBaseStyle->"ColorSwatchGraphics",
       Frame->True,
       FrameStyle->RGBColor[0., 0., 0.6666666666666666],
       FrameTicks->None,
       ImageSize->
        Dynamic[{
         Automatic, 
          1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
           Magnification])}],
       PlotRangePadding->None],
      "RGBColor[0, 0, 1]"],
     Appearance->None,
     BaseStyle->{},
     BaselinePosition->Baseline,
     ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
       If[
        Not[
         AbsoluteCurrentValue["Deployed"]], 
        SelectionMove[Typeset`box$, All, Expression]; 
        FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
        FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0, 0, 1]; 
        FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
        MathLink`CallFrontEnd[
          FrontEnd`AttachCell[Typeset`box$, 
           FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
           Left, Top}, 
           "ClosingActions" -> {
            "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
     DefaultBaseStyle->{},
     Evaluator->Automatic,
     Method->"Preemptive"],
    RGBColor[0, 0, 1],
    Editable->False,
    Selectable->False], ",", 
   InterpretationBox[
    ButtonBox[
     TooltipBox[
      GraphicsBox[{
        {GrayLevel[0], RectangleBox[{0, 0}]}, 
        {GrayLevel[0], RectangleBox[{1, -1}]}, 
        {RGBColor[0, 0, 1], RectangleBox[{0, -1}, {2, 1}]}},
       AspectRatio->1,
       DefaultBaseStyle->"ColorSwatchGraphics",
       Frame->True,
       FrameStyle->RGBColor[0., 0., 0.6666666666666666],
       FrameTicks->None,
       ImageSize->
        Dynamic[{
         Automatic, 
          1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
           Magnification])}],
       PlotRangePadding->None],
      "RGBColor[0, 0, 1]"],
     Appearance->None,
     BaseStyle->{},
     BaselinePosition->Baseline,
     ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
       If[
        Not[
         AbsoluteCurrentValue["Deployed"]], 
        SelectionMove[Typeset`box$, All, Expression]; 
        FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
        FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0, 0, 1]; 
        FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
        MathLink`CallFrontEnd[
          FrontEnd`AttachCell[Typeset`box$, 
           FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
           Left, Top}, 
           "ClosingActions" -> {
            "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
     DefaultBaseStyle->{},
     Evaluator->Automatic,
     Method->"Preemptive"],
    RGBColor[0, 0, 1],
    Editable->False,
    Selectable->False], ",", 
   InterpretationBox[
    ButtonBox[
     TooltipBox[
      GraphicsBox[{
        {GrayLevel[0], RectangleBox[{0, 0}]}, 
        {GrayLevel[0], RectangleBox[{1, -1}]}, 
        {RGBColor[0, 0, 1], RectangleBox[{0, -1}, {2, 1}]}},
       AspectRatio->1,
       DefaultBaseStyle->"ColorSwatchGraphics",
       Frame->True,
       FrameStyle->RGBColor[0., 0., 0.6666666666666666],
       FrameTicks->None,
       ImageSize->
        Dynamic[{
         Automatic, 
          1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
           Magnification])}],
       PlotRangePadding->None],
      "RGBColor[0, 0, 1]"],
     Appearance->None,
     BaseStyle->{},
     BaselinePosition->Baseline,
     ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
       If[
        Not[
         AbsoluteCurrentValue["Deployed"]], 
        SelectionMove[Typeset`box$, All, Expression]; 
        FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
        FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0, 0, 1]; 
        FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
        MathLink`CallFrontEnd[
          FrontEnd`AttachCell[Typeset`box$, 
           FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
           Left, Top}, 
           "ClosingActions" -> {
            "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
     DefaultBaseStyle->{},
     Evaluator->Automatic,
     Method->"Preemptive"],
    RGBColor[0, 0, 1],
    Editable->False,
    Selectable->False], ",", 
   InterpretationBox[
    ButtonBox[
     TooltipBox[
      GraphicsBox[{
        {GrayLevel[0], RectangleBox[{0, 0}]}, 
        {GrayLevel[0], RectangleBox[{1, -1}]}, 
        {RGBColor[0, 1, 0], RectangleBox[{0, -1}, {2, 1}]}},
       AspectRatio->1,
       DefaultBaseStyle->"ColorSwatchGraphics",
       Frame->True,
       FrameStyle->RGBColor[0., 0.6666666666666666, 0.],
       FrameTicks->None,
       ImageSize->
        Dynamic[{
         Automatic, 
          1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
           Magnification])}],
       PlotRangePadding->None],
      "RGBColor[0, 1, 0]"],
     Appearance->None,
     BaseStyle->{},
     BaselinePosition->Baseline,
     ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
       If[
        Not[
         AbsoluteCurrentValue["Deployed"]], 
        SelectionMove[Typeset`box$, All, Expression]; 
        FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
        FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0, 1, 0]; 
        FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
        MathLink`CallFrontEnd[
          FrontEnd`AttachCell[Typeset`box$, 
           FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
           Left, Top}, 
           "ClosingActions" -> {
            "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
     DefaultBaseStyle->{},
     Evaluator->Automatic,
     Method->"Preemptive"],
    RGBColor[0, 1, 0],
    Editable->False,
    Selectable->False], ",", 
   InterpretationBox[
    ButtonBox[
     TooltipBox[
      GraphicsBox[{
        {GrayLevel[0], RectangleBox[{0, 0}]}, 
        {GrayLevel[0], RectangleBox[{1, -1}]}, 
        {RGBColor[0, 1, 0], RectangleBox[{0, -1}, {2, 1}]}},
       AspectRatio->1,
       DefaultBaseStyle->"ColorSwatchGraphics",
       Frame->True,
       FrameStyle->RGBColor[0., 0.6666666666666666, 0.],
       FrameTicks->None,
       ImageSize->
        Dynamic[{
         Automatic, 
          1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
           Magnification])}],
       PlotRangePadding->None],
      "RGBColor[0, 1, 0]"],
     Appearance->None,
     BaseStyle->{},
     BaselinePosition->Baseline,
     ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
       If[
        Not[
         AbsoluteCurrentValue["Deployed"]], 
        SelectionMove[Typeset`box$, All, Expression]; 
        FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
        FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0, 1, 0]; 
        FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
        MathLink`CallFrontEnd[
          FrontEnd`AttachCell[Typeset`box$, 
           FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
           Left, Top}, 
           "ClosingActions" -> {
            "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
     DefaultBaseStyle->{},
     Evaluator->Automatic,
     Method->"Preemptive"],
    RGBColor[0, 1, 0],
    Editable->False,
    Selectable->False], ",", 
   InterpretationBox[
    ButtonBox[
     TooltipBox[
      GraphicsBox[{
        {GrayLevel[0], RectangleBox[{0, 0}]}, 
        {GrayLevel[0], RectangleBox[{1, -1}]}, 
        {RGBColor[0, 1, 0], RectangleBox[{0, -1}, {2, 1}]}},
       AspectRatio->1,
       DefaultBaseStyle->"ColorSwatchGraphics",
       Frame->True,
       FrameStyle->RGBColor[0., 0.6666666666666666, 0.],
       FrameTicks->None,
       ImageSize->
        Dynamic[{
         Automatic, 
          1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
           Magnification])}],
       PlotRangePadding->None],
      "RGBColor[0, 1, 0]"],
     Appearance->None,
     BaseStyle->{},
     BaselinePosition->Baseline,
     ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
       If[
        Not[
         AbsoluteCurrentValue["Deployed"]], 
        SelectionMove[Typeset`box$, All, Expression]; 
        FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
        FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0, 1, 0]; 
        FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
        MathLink`CallFrontEnd[
          FrontEnd`AttachCell[Typeset`box$, 
           FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
           Left, Top}, 
           "ClosingActions" -> {
            "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
     DefaultBaseStyle->{},
     Evaluator->Automatic,
     Method->"Preemptive"],
    RGBColor[0, 1, 0],
    Editable->False,
    Selectable->False], ",", 
   InterpretationBox[
    ButtonBox[
     TooltipBox[
      GraphicsBox[{
        {GrayLevel[0], RectangleBox[{0, 0}]}, 
        {GrayLevel[0], RectangleBox[{1, -1}]}, 
        {RGBColor[0, 1, 0], RectangleBox[{0, -1}, {2, 1}]}},
       AspectRatio->1,
       DefaultBaseStyle->"ColorSwatchGraphics",
       Frame->True,
       FrameStyle->RGBColor[0., 0.6666666666666666, 0.],
       FrameTicks->None,
       ImageSize->
        Dynamic[{
         Automatic, 
          1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
           Magnification])}],
       PlotRangePadding->None],
      "RGBColor[0, 1, 0]"],
     Appearance->None,
     BaseStyle->{},
     BaselinePosition->Baseline,
     ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
       If[
        Not[
         AbsoluteCurrentValue["Deployed"]], 
        SelectionMove[Typeset`box$, All, Expression]; 
        FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
        FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0, 1, 0]; 
        FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
        MathLink`CallFrontEnd[
          FrontEnd`AttachCell[Typeset`box$, 
           FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
           Left, Top}, 
           "ClosingActions" -> {
            "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
     DefaultBaseStyle->{},
     Evaluator->Automatic,
     Method->"Preemptive"],
    RGBColor[0, 1, 0],
    Editable->False,
    Selectable->False], ",", 
   InterpretationBox[
    ButtonBox[
     TooltipBox[
      GraphicsBox[{
        {GrayLevel[0], RectangleBox[{0, 0}]}, 
        {GrayLevel[0], RectangleBox[{1, -1}]}, 
        {RGBColor[0, 1, 0], RectangleBox[{0, -1}, {2, 1}]}},
       AspectRatio->1,
       DefaultBaseStyle->"ColorSwatchGraphics",
       Frame->True,
       FrameStyle->RGBColor[0., 0.6666666666666666, 0.],
       FrameTicks->None,
       ImageSize->
        Dynamic[{
         Automatic, 
          1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
           Magnification])}],
       PlotRangePadding->None],
      "RGBColor[0, 1, 0]"],
     Appearance->None,
     BaseStyle->{},
     BaselinePosition->Baseline,
     ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
       If[
        Not[
         AbsoluteCurrentValue["Deployed"]], 
        SelectionMove[Typeset`box$, All, Expression]; 
        FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
        FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0, 1, 0]; 
        FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
        MathLink`CallFrontEnd[
          FrontEnd`AttachCell[Typeset`box$, 
           FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
           Left, Top}, 
           "ClosingActions" -> {
            "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
     DefaultBaseStyle->{},
     Evaluator->Automatic,
     Method->"Preemptive"],
    RGBColor[0, 1, 0],
    Editable->False,
    Selectable->False], ",", 
   InterpretationBox[
    ButtonBox[
     TooltipBox[
      GraphicsBox[{
        {GrayLevel[0], RectangleBox[{0, 0}]}, 
        {GrayLevel[0], RectangleBox[{1, -1}]}, 
        {RGBColor[0.5, 0, 0.5], RectangleBox[{0, -1}, {2, 1}]}},
       AspectRatio->1,
       DefaultBaseStyle->"ColorSwatchGraphics",
       Frame->True,
       FrameStyle->RGBColor[0.33333333333333337`, 0., 0.33333333333333337`],
       FrameTicks->None,
       ImageSize->
        Dynamic[{
         Automatic, 
          1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
           Magnification])}],
       PlotRangePadding->None],
      "RGBColor[0.5, 0, 0.5]"],
     Appearance->None,
     BaseStyle->{},
     BaselinePosition->Baseline,
     ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
       If[
        Not[
         AbsoluteCurrentValue["Deployed"]], 
        SelectionMove[Typeset`box$, All, Expression]; 
        FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
        FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.5, 0, 0.5]; 
        FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
        MathLink`CallFrontEnd[
          FrontEnd`AttachCell[Typeset`box$, 
           FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, {
           Left, Top}, 
           "ClosingActions" -> {
            "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
     DefaultBaseStyle->{},
     Evaluator->Automatic,
     Method->"Preemptive"],
    RGBColor[0.5, 0, 0.5],
    Editable->False,
    Selectable->False]}], "}"}]], "Output",
 CellChangeTimes->{3.7824728257842383`*^9, 3.78247301622116*^9, 
  3.785578280380468*^9, 3.786191538061488*^9, 
  3.786192421090133*^9},ExpressionUUID->"31b081a4-7111-4db6-8e20-\
41bb81b4fc2c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"fitANDlist", "[", "index_", "]"}], " ", ":=", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"list", " ", "=", " ", 
       RowBox[{"import", "[", "index", "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"fit", "[", "x_", "]"}], "=", " ", 
       RowBox[{
        RowBox[{"Fit", "[", 
         RowBox[{"list", ",", " ", 
          RowBox[{"{", 
           RowBox[{"u", ",", 
            SuperscriptBox["u", "2"]}], " ", "}"}], ",", " ", "u"}], "]"}], "/.", 
        RowBox[{"u", "\[Rule]", "x"}]}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"pfit", " ", "=", "  ", 
       RowBox[{"Plot", "[", 
        RowBox[{
         RowBox[{"fit", "[", "x", "]"}], ",", " ", 
         RowBox[{"{", 
          RowBox[{"x", ",", "0", ",", " ", 
           RowBox[{"Max", "[", 
            RowBox[{"list", "[", 
             RowBox[{"[", 
              RowBox[{";;", ",", "1"}], "]"}], "]"}], "]"}]}], "}"}], ",", 
         " ", 
         RowBox[{"PlotStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"Blue", ",", " ", 
            RowBox[{"Thick", "[", "0.01", "]"}]}], "}"}]}], ",", " ", 
         RowBox[{"PlotLabel", "\[Rule]", 
          RowBox[{"speciesNames", "[", 
           RowBox[{"[", "index", "]"}], "]"}]}], ",", " ", 
         RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
         RowBox[{"BaseStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"FontSize", "\[Rule]", "15"}], ",", 
            RowBox[{"FontFamily", "\[Rule]", "\"\<Times\>\""}], ",", 
            "Italic"}], "}"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"plist", " ", ":=", " ", 
       RowBox[{"ListPlot", "[", 
        RowBox[{"list", ",", " ", 
         RowBox[{"PlotStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"PointSize", "[", "0.025", "]"}], ",", " ", "Red"}], 
           "}"}]}], ",", " ", 
         RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
         RowBox[{"BaseStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"FontSize", "\[Rule]", "15"}], ",", 
            RowBox[{"FontFamily", "\[Rule]", "\"\<Times\>\""}], ",", 
            "Italic"}], "}"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", 
      "\[IndentingNewLine]", 
      RowBox[{"Show", "[", 
       RowBox[{"pfit", ",", " ", "plist"}], "]"}]}], ")"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"fitANDlist", " ", "/@", " ", 
    RowBox[{"Range", "[", 
     RowBox[{"speciesNames", "//", "Length"}], "]"}]}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.7816834573908205`*^9, 3.781683515050088*^9}, {
   3.781683550621426*^9, 3.7816837732673264`*^9}, {3.7816838043881197`*^9, 
   3.7816839625618243`*^9}, {3.7816843442503443`*^9, 3.781684353771516*^9}, {
   3.781684516882375*^9, 3.7816845981938066`*^9}, {3.7816846437265606`*^9, 
   3.781684661395503*^9}, 3.7818693955406475`*^9, {3.781869448642993*^9, 
   3.7818695038522058`*^9}, {3.782050620637598*^9, 3.7820506300396214`*^9}, {
   3.782050757095394*^9, 3.7820507703615894`*^9}, {3.782050806505763*^9, 
   3.782050824416433*^9}},ExpressionUUID->"c7faa310-3a54-449f-b329-\
98f87214edb5"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV0fk71AkAx3EsqVGKKE+2HmVd5cjkmGR8dI1oHUlP6FgdI0UUWSm5Jkyr
Ep5ipjQd2hzD1lDTRnTQYcYaBkUKM/h+8c0KzVOitv3h/bz+gPfSvVH+bA01
NTXvH/3vU691OSMn/dwm5digRQ9xcynzV04wbVE5ydAPv8eE/f78cRHTDe2P
j8tXV3pDiKqv2UwfXBpYmMoQ7cKhMmlSCnM33nxjx4aWH4bn/ra18cxIVBnS
bnf+eQoPajuWxTITcdep3a4p7xyOfNgxP4Z5Hk7RKwNq4guw7igvR5sjQOW1
LqVNTDnO5O3xuRZ2Gzc3jenmRt3HXc97tT6D5bBiOcui9z2CFW/95L70CpA7
RQeDQ5/i1yVTAZf9xTB7URSuktRDWBOjxzhShXEseYqDryB8SasrOFEL9qa/
Fgf0SVFz97hxreAJWpOlc7RoMtSflWgpSp6h0cy6qL2qGY4rWX7rcuux9120
G7FJjliuzFA7+gXsmquFfz9vxdZIl7OJ8a/gd2I8vXxnO/g/S/eu2i0BZ4Ph
/uKm10gOZA7xwxvhcf5jx8agDjh51lChUU0wddq5XE/eieUpFRaMIhlumGem
Va7oArcwzn5BWTOyndUfLeK9g7HQdzjnWgsY6V+TWAPvcepE3nRYkRyfpByP
INMeeJge8D5a2op26wANdWkPWHe8vI0K2pB7alF2LLsXBppXbxndbEc/f6SN
p63AAletcnHea3TKrzA0LiuQ7DMxzs14g7AHuxQNFko8tNiaU5HZgQvFXU8C
q5Ww7K/vSUjsRILv4SLd9X1gHyzKEKS9Rc5psxmvZH2gvdSPmMjogs+eWh3+
9n700bLVyOPvkGA0JzWhuR/nDJI+OCS+h+SzuChmywAOaaT8YRLdjbqT0w7j
dQMIZKfRBSt70OI05h9HJ6C01pAGi3owQjPzMr9FgDvAfcRe0YvUyPxh99kk
LnI8dhSU92K0wNn+eRyJav15W36xUsB/W6rA9g2JhVlX2BuuKzDTocn0E30Q
HSMh5tmmSiwLO7BvTfYg7rvbwaZACYZv/iLP/kFMxjpqqkz6cKc0Od7QdQjR
+d+J7Tf6UHLpma3q7BC0yuSms4z7QadUy7mtQ/he2K1DFPSDx08XkIuHMT/r
02YDowH87nns9NHdw9gR2lTSmTUAgShPf5o3DJ2lvfca9QiYlB/oiGgfRlvj
lNG8TAIvLD8+JGkUqsVxmTbnCHjRTVIadCgUXh+b9soikFg7Y6p0NoXoWFKR
lktAkz05N1KXgu7iVuHXywRiuk7eGdGjwIoodSeEBKgEQt5rREFMCw6r+YfA
+tN7CrPMKVydaO18KyNgq5miHmZBIf29r/eXFgIN2oHz3S0pBIg20h1eEzDm
W2/714rCaJD9VHE3AbPhqC1eNhQsi2deuDhKQO72m/XYKgpzczkaFWMERr+o
WusdKKgSvh2TTRB4zGDReY4U6vwmgnS+EIhbq6MDZwohn7tNU9RJ+CTZOWa4
UPBQBF+6+hMJrUAOJ3ANBVtp28xqLRJRlefTrVwpTAkkH1SzSAR9lpQ0MCko
z7BCDH587+qelvDdKDTEPGmx1yWht5m4fggURLtcN/rOIzG5mmvt4k6B5yEW
R+iTyBP2hM9aS+E/+Zxo8g==
          "]]},
        Annotation[#, "Charting`Private`Tag$63223#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[1, 0, 0], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.033881617050851354`, 0.06298505733812121}, {
          0.06992547974825314, 0.151357195258504}, {0.11512027491408938`, 
          0.23109965635738838`}, {0.162651067608788, 0.29809065987103756`}, {
          0.23962315147303004`, 0.40271825166994857`}, {0.31203907486775573`, 
          0.5074230665276653}, {0.3958840109656745, 0.6034595930344802}, {
          0.4729140121240203, 0.695374338777559}, {0.5455229931657595, 
          0.7577030001158345}, {0.6159311170315458, 0.8031198115757368}, {
          0.6862620178385268, 0.8654870844434148}, {0.7522491215877063, 
          0.8813178114985134}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Italic},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"T.Bicolor\"", TraditionalForm],
    PlotRange->{All, All},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVjn0w1HkAhzcMt5tIofUSklJWF4ZarfZDLyNnleSthOL0fktp67ys04tC
aYq5IRkvFTFcQ7rjLi6UYr2ztCHs2t2v/fWKapOG6/545vnvmWdFRLRflAaN
RvP5zv8+8yFlZUaAL7epzJqjiAzhWhj2fUtXr0NbUK9BpKUrtC/ll3ipN8N1
SHBTaOGFr9yLs2vUPojPOiHWWr4Xp83UxUx1KKqHHQ+4mR5FVZpDwmL1L0gK
KdVoMIxDt3tHlK5aCI9dCzN66GkIzzMLYagzMOx49enMdA4s2S2iUtcCRDMq
67y7yqBlVBlj6XQPm2aL9OmMany0zpMFFN0H2+TxNYW6FpOxKTrvgquhzbW3
XrbzMQ6xDet8zGtQ6DzKuXm9CXuD5T4BDo8wsD+qwaqiGaLzWll+jo8hLGtv
vFbRgjwdLuevM41wa50vYPLbkJWQa7ZM+AS6NZMSWVgnUgutvbUPNmO9TJRo
kNaNepGffwznOYTPYweSBnpQdXsl70duKzLOfd3M3tSHuyyrrHiLNnze17T2
bLIYgRH1Laa2HbjuQMuihvrhma8hcVndBV2mLLHB7gVuNbveij7XjeXi5jh+
qARTmU0e7y70IGZDrN2nOy/RwpbqOwt6URNm8iutaxBJLr79d+L7oJn8orhN
dxh9zlk6uxPEUPjXChO5r1Cqe+Jg87F+sEpdtLQDRxDK+f1BJH8AE6fClk4l
jeLGFn9W64EXKFp92sDJcwxRPLL4xE4Jeuf03K+0joH5h+gt2/clZkx2BL3e
I4W3cutUu/sg1LxWmnOvFKFnFr1L3z6EjXWfr6qDZNCnlwde2j4MR++FT1dJ
ZHA/PaLc4fwKo+JyCyVvHLs3RPBdNo7AuYHFim0Zh7Q7YblqzSj44pBnE2w5
6DUPzd8yxtD88yOZ4K4cBlV7SuKvjMFmm333KmMFgrPrnxzXlMJkfOBQpFAB
/bKu4ZMpUvjmXrZnUwpo36tIG5qTwk1feGySp4RPyfSbcYEMhf3ljprlSmj2
yLwXqGWQXHFKXqBHMEPyuOejx7GYOWOdfpgg3G7enjk1DlrsYXpsM4ERv62H
d0oOp/fpiiSLCTDyIxgKlRzCCqPJf/kTiJ4p4mYeV2DL/YtPKpsmYOhRoX1H
rkCf+F7gOj0V6OlWKX4hSjDkJhrxASrw59zmjYeViBOUe3YWqLAk3GYR/Alu
/xT2wE+mAs1oOjMokGAkOy1eMK7Ce1EjMyaYIGdeUzdHrkL7hnCbov0EVy2U
6cNKFS7r5XI0owgEueFfIl6r8K1e/9hzAQEn3TYz6qMKCvPZZ7uyCUq8FjZ6
aFMQ97byjtz83leaVIfqUGhKzelNvkVwI/8sP+4HCoUfXUaqCggSQ608KhkU
9rXHfFpaSsAzsQ0006fQmaBcKaklUKTSQZZRqHP8s+zDPwTMTvqzeSaFcnJh
Pb2eQLRurzHTlELqnhWcTY0E990US3aYU9jK2u+X1/r9N+dBQrEVBSepneRh
G0FxFcunbgUFq+yZ0I4OgiDFNOm1pjCnkX10rofANe9k3LwNhTe1Ue+NxQRH
LG1jjFZTGOI7C9YPEJjWsxxYthRENpqznhICL8Fvf7uvoVA72JN8YJDgi6e1
buBaCv8BiAhcAQ==
          "]]},
        Annotation[#, "Charting`Private`Tag$63370#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[1, 0, 0], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.02591138713652663, 0.05844139945973725}, {
          0.0598859082859311, 0.12451747692458359`}, {0.09066129124399147, 
          0.1956615768813299}, {0.13096063917475287`, 0.22875878334815924`}, {
          0.1890347906278309, 0.2898198852554006}, {0.2487574775774688, 
          0.3635755265928362}, {0.32457378828560457`, 0.4424481568230598}, {
          0.3859368496649882, 0.5263602458113323}, {0.4665600287269551, 
          0.6001689340830634}, {0.543951425330319, 0.6688932777292647}, {
          0.614928223417365, 0.7426774828005518}, {0.6777765989570155, 
          0.7885222756318706}, {0.7454073596500532, 0.8216888511666245}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Italic},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"G.Fuliginosa\"", TraditionalForm],
    PlotRange->{All, All},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxXk01AkAB3DVKqbstq71kLOUHCkiR74Nbcdz9Eq7CuuYyO6yuZI1pq3k
qNgyNi05ZhgybyOE9KyWyBiy1LgmTWHMmN+PX7SVGb1We/zxeR9zRtyRqJVq
amp+//n/puKcMa/dhz177EL36RwP8/RYXu1ayd0GpXdUZ0WHBz7lfPAO4wL+
yjsm19p9oVpI7vXgHoKhPUva/SAEMQaOuTbcMHhmN8YxWmNRVcN+ZcGNg++d
1+saG1noVO4pM+GeQ7+zSCP8Vi6eFheeMeZewz+yA1PtOSVIzU9r8WNyMeRx
bOBNei3OFqqZ2KTxkVhzIDC9sxl+ilHJnHU91HnlQ7LMNqxyaLVjxDTB+Wem
3vaJh3j/5aLMMvI+CjwX6sa2daNAczdH/W4b1ByKEH5fCE7iOqYiuQOmhQmZ
6837obP/1ljCqU78fsk6KpI+iKBEgXMu+xG045UfLX2egp6hfdA3TwB6tcMF
N5EI9hX8LWqZQnjxA+ppPsOY1+/W3FvZB9pP0eYZkhH4J2qV2XH60RL32n2n
7xjSN0ocqx8NwLBmeNBtSIzQBKYPLf4JDhc0yFN8xvG4q2T0l5inqOLpBV7m
PUcFPZ0RxRKBeS360P7PX6D37nKPZtoQAhsrFm+HvUTQIQ975dVhuKqZPznZ
OYH5v0zTJKUjyIpNzWblTEKUXVRecHMUDn21XoTVFEwPjgpv1Izhw4Zw298e
T6Ftmd/7fY0YOZtHjy5FSBFy36xhV/UzGJ8/maz+RoqTZcFF/i3jSHRhGxZd
mUZHim2wS/Nz7CsNE6XryZDB6tjwrVCCBi+3sAN8GXyy3wvyR18gpE7VkOMk
ByNTeDBP9BL8c0l9bxvlkN4J+nNkegIT9TaME24zeBZF10tJmISuQ+AXEU0z
8FJtdjk/Pwlvn0F63RYFwk3ij9udmcK9haSxnTwFrHCR6Ho3BWFrXb+ONoHy
RVXKx7NSLG89rDqXReBRlctpi49SuCvUA2oXCBDi3hNdadOYt6r7jhlA4mH5
gwCNT2Q46kuvU28j4RXJqne+KMPqaHGAseEsfmwr0dLUkkN3Pst2H2sW9b9+
Fnrsuhw3VDsSBsSzyIv1M2Jrz4AWst6iwWYOG8co8Q/FM9hoVXJUdGEO4e6B
q5yMFDitn5/aMjCHMgtd85RCBdpMVfoD+hTYnB0INSPw7mpEd0AEBVt94z57
DoFLtTEro3kUmPn9tKhyAsGbqKSsSgrCT8/6FPMIVAoeVlRVUYhc87J/DZ9A
YWbsrulqCsVLnMHJegK0xXbv4BoKtOeWI/mdBAxuho57NlMgODaTSjkByd/M
NcMCCs7GEjM7gkAyj2s510MhozA34sQsgYwko+UVvRTM2K+kg/ME1PPWE/aP
KQSm18n5KgL5rUulmYMUBJGOc0GaJEZHOi5biSnoTk3bsNeSEOm4prk+o8D4
5npsjxaJvWmrt/qOU1j+avGVozaJHAG3PV5CwWl/y+t1RiQq/Yf67k1SSO+K
3u69gcQR8btbPVMUnsAgMdWUxJmcmD1iKYXYXalv5ZYkzE8du70ko9DaZO1k
bEWCXzrA0pihoLF9/PSRLSSqlEVrDRQUvq690nxpKwmD1NbAzQQFnrW78g9b
Eis2OUQ4kxT+BTfncH8=
          "]]},
        Annotation[#, "Charting`Private`Tag$63517#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[1, 0, 0], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[PointBox[CompressedData["
1:eJxTTMoPSmViYGAQA2IQjQ4czmwKkFSda79gWcc31Znr7BkuBLLyq6y113gr
FaArd8D+QHgOb6/lVvuCN4X3Pqcds99gy99pGLnT3uEtoy3r9BP2GWaP+k5a
HrKvOHdCOYP/nH2D4wb2n97H7R+87nj6I+2y/ZGVU+4v4D1jr3LqB8eB7mv2
BgtYgx9oXbBP2ew5ZxfjTfua04+y3NZctNdI+lzpPeu2/Zk+mUgGp8v2ewrE
Cp4b3bM/1KXd3t131b5gaolZ1KwH9m1TE6JyE6/bv1r8ZeetBQ/t93Bo32w+
dNNezc1RsfDUI/s3LMYewQl37Plc14c/jXli37Bw1/1o//v2X44bn40TemYf
M+ujSJ/mQ/tc9hD+VVrP7QNcZC+sanpk/+XjrcMms17Yqxj5pgb8emz/Vf0L
38NnL+33fN4803DnU/tLS/KEr719Za+XeOiie9Nze39epmkPL7625z99898+
nZf2bzd5zVsp99YeAMYBqZA=
          "]],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Italic},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"G.Fortis\"", TraditionalForm],
    PlotRange->{All, All},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV0Hk8lIkDBnAq47YS0oGRI7utlWxIdp5CKbQoldoOKeWIMGL60aVNl5LR
Jcrxk7NQ5CpE2yEJ41aTMTlm3pf3LUl+kfb9/fF8ns/3v+fzGPgc2ug7Q0ZG
hsvk/01/3tEdILOJ4/0jtSzxn30cb8OKuCXBFkgwUvK0UnFAVsiHC3LBq/Gw
zy52o/ImrL/OuzAa5IF3MTtt6hX3IvkXB2Vp0B6keEU/bWdx4Rhu6tIfFIrW
RtOgaZlT0Jm3gOwLOokFuivOb/3CR0yg5iNRUALmBy/PVX2fgSit65lnfs5A
t8hI+2p4MQ4PP1jXNZkH7pOLEaW3H8OhZMYSqvk+XAIqBlBah4LR4NGnJ0ux
/3pHR4XPC5Td9fGLEFdCbQ7XZmZ2AwwPzEudSquBdedf2gu0m6FauXxNgVEd
AgWlFpWrBPA6toj/2v0faJq9kdWybUNbXUhNW/5zGCRs65ty7wD72QzHhvcv
4fdEPWS2TRcehIgzClgNqA7vvaKq1IPDKYbiqJ2NcFtGcWvH30IhNodnHdeE
o/HPx3xKhRiMfBFJjTUja+uXHwcu9SLw5J40az0B1KeVwm1yROjyvzUWadmK
CP/15QvD+7BTQ2mFmXcbvEQiosZZjFdJOrndvHbMLFo29E3lA9z7tipO5nRA
I9xiT33XB/C+V3XwWzuhw8/PNL7Zj7MTz5oMiC4EDxZt+HvdAO4XT5cb6/Sg
eZT7RfbHAOo2dDeyl72FYO32Ftv/DiLicY8bf+07hM0dnsPlDMGeVKnjhQkx
vD9DYbdoCOMTot1bzr9Hlv/OdQdCJXj6fGAkp6IXPXdSbk/IS5FUcnasPFSE
8EO5rnOvSrHmMC2fNCWCbtk18SMNAt+vBidaJvZBr91KO+IKgZ+zqkvq9cWw
U8mMDpYnkc3OUEnOFUPEKm/eF0bCYvLWOxN8QH/kzGiWiIT5swD7glcfMLxd
IWztqmGsoN3YH/f0I31V0YR8xjDKFFhXzOh+6MspEeyvwzgT58bJOjIAgcxk
ZJ3jCPaG3Pfu/mkQkrjx7CP8ERQ79OsopAyitX/uV2nbCH6KNF//yXIIvNkT
Lx21KVRpqhVp1Q/BNXDt+EM3Cr3pVXeXe0qwXGh61Pk4BdX40wbqpARJZ/4X
uPkuhROjhUccRiTY/eJa+UfGo5t7WiJoCV6nm2dduEeha6F5jPCzBBdNPPc9
KaCQkdclzpuSoOyQ30Hj+xSsni/JXKMmxQOZ6nzhQwq7vreYRFlIsVJXd4hV
Q6EwUO/XwUgpLq/Kd7drpvBqoWGo2n+keH9Jw6mK8WDj4lKraCk8wk3Ff7RQ
0FtqserMCSmyZnmzOAIKl8YcPE3PSSG3cppl20bh4FH/6ICbUtycHpewuyiY
xpe8ph5LYdLXbZ7Xy+x74Bz0VZbAgzm+9XkjFDjPzFP+nEXAtRqkLkWhp1Oz
4Q6LgHFGSvplxhrf35t6KhNI0BI2hNMUYpy4/UWaBLzyedo2nyj4vEv+K2Ax
gVT+/L/zxigsYo2sF7oSkHNXrOVMUqjWEfB+dyMQtGgJN5Px9iVl2Rc8CGj9
1lShOEWB735SznYLAfanW7NaGc9I1qq9tpuAkcmWy97TFMTmHBv3MAL9LhYn
DsjSSN8Wb/L0OgG7WH6tkTyNb4UNDqNJBJRt97IjGXuyFPYYpBBQ4yUb1DNW
KD6RfDyNQBnfXvmgAo0QlTB1u1wCfPvAqHuKNDg1nt9KKgnsiDNp0lOh0WM0
/02WkIDHS0fHR+o0fo/aQrb3EuiuY32UnU3jUgtfQU5M4IbTUs46xquPKTvs
HSRQSlfUtjLO6Zwq06cJHKnM9h3UoBF5vjf9hgyJubYj7G+aNDQ/Zh4+b0ii
sE/f960OjXeezknfjElE2x231J1H404F/TjAlIRxp93FXYytTtnOcjEjof5a
IO5lvE27ma9sTWJ9ib+2cD6N23aThXHOJJyOOaTWLqSxPz2tdcqVxHBHrOEU
Y3PW2q8H3UgEHzK1tNKl8aTpMmeDJwll79ixHMZiH5NG1V0kcnDvx1k9GovP
eRCXQkkETmRZW7JpfBwZV/3BJSH5803ofsblG1MsDkWQcBzYZJ3E2HnhEM8t
ikRiy5F93xkfLIyWVz/NOGep0xMDGkXt2UYJN0jouzv/ttSQBs92wzrZZBIR
mZv1djBenToaGHqLRJ5NTdIZxgK/P4o9Mhiz7y0TMv4yKVitcZeEGv15OMaI
RrU3zzemgISH/SfrfMaxz3TPjRaRCG13VWtlrBPv1yx4SMLlkd5OA2Maos+q
Y/blJOTUrrY7Mc71Kp5bXEkiOc2/O4hxWJXXSsMq5l9uil8iY9tF07sSa0j4
nDY7Vc74X+hen0A=
          "]]},
        Annotation[#, "Charting`Private`Tag$63664#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[1, 0, 0], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[PointBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQjQ4azNp4Xj2aYJ9w58ax71fX2SewNLOvnrvMXqF4
nvijG3vtOy4VPzVL32RfEclU9UjlqL3DzYX6/w7utt9hoPqea+Y5+5YpjMna
tw7aT7BcL+114pL9GeuHj/zWHrMP+XtxphrzdfuWHYtb5GJO20fs/nxCU+62
/SbvSUJJNhfsV4QucvGwvG+fU+//IGHZZfsZBk4/M1c9tL8UGqW+89g1+597
U99eff7Y3kGlWV2q96b9//YJvw3LntovmBfmaXT5jn1rrqtxmslz+56mK/cd
DR/Yv3rKNG/Npxf2KXniJoo/H9pfdm7dYdX4yv7MHJPyWXMe2yd9Oez/7/5r
+5dxXw9Gmj+1d/A+tdPn/hv7Gd6XX+V8e2a/eO2lg75y7+x/fmETMtv2wj4j
KXuf7b539htmTH4zO+qV/T2v/z/N/d7bLw+vy5i8/7X9rUeTsl8C+QCD0quA

          "]],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Italic},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"G.Magnirostris\"", TraditionalForm],
    PlotRange->{All, All},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzHk41HkAx3F6bB5Lgwc1bYpc7SqKp1DZ+Ywo0aOtSVmrUExLm02xT5ct
bZ6l7ZomyhUidkmHTWOy61oyGNe4CXMaM1/zSznWI9TaPz7P+3n981l77BSL
vURLS8tvcf/3XX98vjCaxXA56G8gNTzGiJj+suQk2YSNDYXt0xwmjhfdafMm
TOiFOzV5cPZhRKc+eAvZh/JqucbwdihsnUPtNpBQpBt84Su4EY3Xux1+W0ei
kRF1iuOZFA+zLhN3WxKP7ck0+Y7LHFSs1DWzIRwITbzHvKJy0GfOymfmPITn
U/eGuOnn8KQb6ys2FsHzrt6Tllk+9EyCer18SzA7fzpNL7Aapr7Ltxf0voSR
f9gLRWwd+ng+OjtWlEOSLQytcm1AVSc7RFNSidVttD94Ls3QxJVrrmfUYIW6
pdRatx3d9pcGGWW1ePZ6cGNGgwjtm1zMzmvVw8ftm+9l+Z34fX9RfLtVAxoT
BfXTgd1YMXP/YsS2JgzXiT/enu9B2tT5qsTLzVjCvpzayO/DjAHdpe5BK4ID
w6fH/QbwgtH9oTa2HT+zI9eoP7yB69Ygq10pImiox86vUobwlQfkh3I7wE4V
tefpi2Hz04Pd6+s7EeFUb8HdI8EtXqD3rZ4uVDC3V0R9kkDbhkNKF7php5qh
NlRIUXXgavdFi14weIpszzMyaDhdgSKHPpwzHeu/uVwO6w/ZvxBWP8a5LdKM
WjkE0Y1e3PAB0Ni/up4MVaCs8Nnegeg3GFeo0kqmFXhOM1oYuTuIZCnXIpc7
AvqVVq/4vCG4hP1YzrZU4pqFrtNw4zDsTG0bqFIldsXPhw8SMT4lz9ZxPUax
dWZd2uY4CSJm9DZbVY/iQB2t4zBNCrereqsCvFSwSX0U0HxPir0GPl06f6lg
3kLXvmEuQ2XmU3eNvRp0elPckycyGNi+dT+arYYw0n7n8i1yJLBExiG6BFdF
ArFEIEdPF/+MTgzBBEwFE/sUOPvPcHFNB0GiITr8exUYjSevrDeMwXK64Bk9
cgT841hvmjSGaGlFv/X7EfQGq3kO/WN4LTfu4SQoYXStjPN2vQZMb69//cxG
oa/92ezcWQ3OlNiGsTJHcedIFMu3XINCJ69cvqMKew6PXrFc0OA+39jxeJkK
iiPBHvUuFB7nVAyFfa2GUk1v6T5BoTarIKS2VY3Mw4Ui/ywK3DyG44lDBBXj
B2UvGik4S9gKwbcEkc113j80Uegwv5luG0TgQF95wEpIweTem6XSEALdhdNB
t5spJCedEwdEErybUziz2yikRP3J2RlH8LC1bf5TF4VUV7tJy1yCGAF//r2Y
glusX+GlRwRHErvXZEko9D2PDRksIDjK61X6SCmstK8V3n9MUHb0RkSOjEK6
eegj2kuCVIrn7DNCIVM7/eC8gMBtwEh2jVBwZ9Tof9dEUH094dimMQqDF1Q1
Zc2Lf8VDST2LXj3l4hgjIpjaxhSspShkKTuXkgEC1s36z0vHKTCs5/72HiIo
KmOXB7yjMBxiFZMvJli1nxjOLXpNf7Q4VEGwV5RXzJygUGmWmlKpJKDx+yZl
iw5mVe0xVxOMLpuUJExS+HhLqX1hjGCgYyLGbopCtnAZv5ciUC3tKxYs+j+R
npAT
          "]]},
        Annotation[#, "Charting`Private`Tag$63811#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[1, 0, 0], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[PointBox[CompressedData["
1:eJxTTMoPSmViYGAQAWIQjQ4cPor/+fV1sf0CLan5Rzr22G9g4A/1tt5h7xCp
eavB5YR9weH3G8QkDttLfPrWfcH4kr3AK3u1B0Wn7Jft3N0Y++q6/aKT5qVO
LRftu05Xxkk137Xn27d/tobLVfudd/Y+cVV+aM8luUHivM8N+7ysApe1Cx7Z
qyzmF76z/rY9c96PGXlHn9iz8LiXTb5+z/6u6O1u8aBn9lfbr3oVfn9g/91n
dbjc3+f2czXfmGheemSfcF/txPWql/ZNBa9sjrs9sb/zXdDG4Mcr+7IMTubX
r5/aT/Lgs1D489pevOdd+a7O5/ZP3r85XnDpjb1GomXvJY6X9jySsx7dyH5r
X2TodvD621f2AokOC6+IvLM/UB2k3Ppgij3DwS8Ju5PW20/obJFfsGmjvccF
r2XPzI/Yc7zKnnTG5ID9itOGX0wzztsDAK/9nK0=
          "]],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Italic},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"G.Conirostris\"", TraditionalForm],
    PlotRange->{All, All},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV0Hk4lAkAx/HB0nRIEoVqI92yrM3Rxs/VoWhFciXaYlPatDwTJqWUIwx6
1IhKZivHap8kJE2bI8IYBqMhZMz9vqwjlJpd2/7xfT7/f41+PuMZokqhUNy/
9r+eK+l3eIs87dNWyDmPk4/YV65O1alimENtqj/+gsoOvBLJZq8zHGBUeyTk
DMUNO3fpjcYzPKBXF/Wm9N8AJJ17JD3HCEbAx+IA7y+nsHFJzLFIRgSyv+Sc
YE/REdM/aHSWEY/3HtXTObJUFNRpq0QwMjFolNfs3ZaHB0N37cocCjC3zuaG
L7sU5vS4DKKgGItsf+C4mlfgtHnDraSRx6jymzqV+roG1dHOnduPVkA/N8XB
MrQW9xZv0OWmVKOv0H+PML8BlNgr9pcXvsTVJ6/F1VpvEK1+nqq3oxb8XU1a
x4JbwZ6Szfi71UPJo+vHneTiJTfT1zzlNaYKNK6xuzqQ3n7qr+n8JkRY2cw1
/NQJExHv87bSZoy3d3G62V2gCaOKNSStYF5ryWc783FTY29g08c25N2IDHpR
1APbhWZOaYYdqLcsVnExESD1thKT23iYXdrG9MrqhYvjcQcPu05sdh3YsuR9
HwICTsbO+HdhscA0utyxH4Lk+VXZId2QT1yw6ro6gPItu7fSE/nwTk5TTx4Y
xKRPi+a3rB6cz/SxL9MZQg5TOv685C0MyleZbCoZwm23As38ZgEsI5Tpt1yF
mKc7bUrn9yLbzLZb2SdETyijcll/H6gNnZ7OocNQM2uMmfn0DszwB/EVs8O4
SWWiQ3UAOouW3hVeFCHJVwOTxoPIFepoZWmK0W9RU8Sze48VWb1homwx9mVc
udZtPIQFtEc3arQk8HkVGyguGwJDN/f+ziwJltPZFhHWQkRdvBTO1pAi5bNx
jf9zIdaPqv9dSJOi5KnP0bA9w/C1StOOHpHiwicBdYozDLfRlLPKQzKonNvU
xjosQlm5WubLRhlsLjZebxsWoS59bu+dLXKscUvU9AkV41f9uPEdqXJUeek+
+GZaDPF+RxP3MTlUJeN2ZrESkG9ygx1dFVA+zvtAXyBFXoz/1X8eKlDkGHZk
Y44URfWFm7bPKTDvcEKLx0oZqBz+kg37CeiWhXvd+UOGg2XMZQvuEXibwRoI
sZCDe5x6Vl1BYK/ll5XpT+Xw47GiD2wlEa69NkbgpEBs4HFKUyQJpxhmT36T
AidubmQbPiGhE9b7bLxZgc6Q3Vmby0mIfQ3zHDkKrF1zf63tUxKJNvlBog4F
6N7LE7wrSbR+fChf36fAdJ3YNPU5iYO0ys+PRhRYU2xoStSRCI3kr36hTcCL
NSugdZGwPrZcRXMZgXQuPyqumwTVy08UqEegVDLGTeCTKPl+oHDOgMDv3QPs
jLckxibE5s4mBPwr7iXef0ciOmLKqcWKAOVyXX2tiIRrsNU6Q1sCBYfjnBvE
JAw8oueF/0jA1Jh2qVFC4sV3ylZNBwJjp41sWmQkKGNq3gdcCbhQgzK5JAne
4E5r1j4Chtvnq7aPkGBxk/Q/uH/9eGjCon2UhMufCwezPQmoHaBzuGMkdO+6
v5IcJPCb2Spr7jgJaXoGy8qHQNOMMqhtgsSzON6VJD8C6iUGuzmTJFJO6/wi
CCCwYQ9tpOUDif8Ay9h42A==
          "]]},
        Annotation[#, "Charting`Private`Tag$63958#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[1, 0, 0], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[PointBox[CompressedData["
1:eJxTTMoPSmViYGAQBmIQjQ4Snhxul4leaH/AUv6q688t9h8eMSReXLDJXsEo
PIZZ5aB9wqaAgJC/u+0vNLxYezX1mL3Cs1PtjlpH7O9omwhbSV6wF/jzt5P3
ygn7EnveygWfLtu/uM252jHjnH1PYtIh1gXX7SsaT7n+j7tkn1I039N6+W37
CJ3515W7r9p39K2TfvD7nv2pC6LWj1lu2tccKnxxyu6hfd0SYX6uB3fsn2zf
suXl/0f2x90DmqzjHth/2ZSgdiD9if0pod+/I9ke2c/p3tQhcPuZfeRfiaqD
yx/b53z+vdR62XP7KW/4ij5sfWJ/ROlKz02el/atL9mOnbV8Zn9dxVy4geWV
PV/oj3dl+57b/8yN1ejpeWVv+d8mY4PeS/uY6e+nZ856bR9xTbLgRvQre+XK
W54rud/YAwAArpbu
          "]],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Italic},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"G.Scandens\"", TraditionalForm],
    PlotRange->{All, All},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVk3k01AkAx50VKtfmjdaaUdiy64gtaZlvDaVsyrG1b9Nhw6rJkakkq8lu
yTFKlIQcuWkZPFbbugmTHLkacsyMmeGHnyKkNlr7x/d93+fP7/u8r95pfxcv
ORkZGceV/N+tnXKRAfHOdI67vWrluDv9tuNOtR16ZmD0lXz5QAGI+P6IRENv
N5wXLti4yR9GWOnoYVk9J+jEuc/vkz0FhWmjsEWaO6Le+1Kdl/zQwGmnztHO
41B/Rid7no3MYzRyhhaKQ3mJQqnkNjQZvO63tDtY/aLtWFVTKkoYCkYJ7enw
iLcxKWvlwsw8Z9xzMQ8fP/S94PlWIDkhfXNSSDGiu6R/TBRXI/b4L3a93WXg
08WugZYNuLDfQzwmeIJbi44tKo1NaAnmz7fZVeEpYSU/G/Ucb7Wzz218XouI
q6xtMGnHbORy8t8v6iF2W1V5sa4TJinqYfUfG7FPnFAqE94Fge0z4wr5Znjb
2auaG/bgnfFluo8cD9LlwMQb5b3Y/Y9oNefbVhw1oZRvOfkK8oPTd+K3tYH9
5HjvAREfn9PKupROd8BWg/vYmD0Arqs1ndrYCRvm3JEkpUFQHk2zuI0vIW4k
lb1ZQ9CtXbo+N9AFub3FdqtmhjGyZegid7gbrUYX+pcMBbDx0GZQF3vw8UQG
O3FEgIM1P9r6r+2DyoEruj/dEULLy11/+/pXCN0a42++TYSQwRYh14CPmxrH
gre/FiElRfZaulE/UmNb+19eGoV/qJVTgNEAZpXKgsOVxBj+rn1pAa8Rv3d1
S0C2GGssLDizjEGc7C3KEJpL0CE3P5fhNoSzSYse1c0S2M+Vx1n4DyNnnSPl
zBEpgk3t1XadH8FDg7P7InulMEjdWB5sK0Cuq36f7vExMHkfnO8+E+AvlUWj
3N4xRITx1+jsFeKedZDSu/3juFggMb7WIYTPnvzJ2rpx2MwNMFKcRGguWa/n
a0KgN2f5WfygCMN7xJt60gg4sJWtDpwaxe1PTc7xihN4IN3Q5DMyipumdl2B
XhMoqzhcx2SKMcC6mU3lTaCoMODPzVNiBCZP26tumkTg2nrFiiAJFDnW1OWr
k9D6pH7lqZwUfcqa/NruSdxTcxgMui6FVhVZXkmdguBWcaG66hgUHB1eVftO
Qdnss59X7Bgomr5pl0qnsNbD0WGr+jiGzz88+H5mCkPLvLvNyeOgpi+zos1J
cGpM2mhfEUgcLbSsZ5LQuXbi5GkqgThFbeeycySK6NFvMvWIlR+F6OT4kOiq
ItS/NlzZqWHKi/AjQanMOmpsSoCVZx3swCKR9WSjwGoPAYrK0q6aKySqS1a9
c/Ei0J2vYekXQcIpYPuNe94EypPuxxyNJCE089zQd5bAOhfNJHoUCYXiOsuf
/Qjof/G+cV00iR+KQkJOXSYwLvFm5cWQ4BfMKvpEEuDVTH/TcZ8Ek6mXUMgh
QKV8zixNIPHvVqctb24RmNyxpj3+AQnd/EIHVhwBollhp1sSCc/cMzFByQR+
s8z1EKWQWPg1gfY0hUBUw9VzDakkwg2bSv5d8aim5WiQlUaiIHtzDzuLQOj6
viLPRySsvVy8anMI+JTFsO0ySLTr/74gm0+gk8aQ0c8k4S7mhts+JlDgSlrI
Z5GYyRymhBUS+HQwVlu0wv8BsmlvXA==
          "]]},
        Annotation[#, "Charting`Private`Tag$64105#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[1, 0, 0], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.03648625981132181, 0.09925558312655092}, {
          0.0801679709868297, 0.17369727047146388`}, {0.12971767686407887`, 
          0.24317617866004948`}, {0.17235535349679276`, 0.3027295285359801}, {
          0.22307056053954322`, 0.3722084367245655}, {0.26793801731767, 
          0.444168734491315}, {0.31867346879753833`, 0.5111662531017369}, {
          0.36476716005251997`, 0.5756823821339949}, {0.4109823179302089, 
          0.6253101736972704}, {0.4594879892646643, 0.6799007444168732}, {
          0.5080543939104735, 0.727047146401985}, {0.5566207985562824, 
          0.7741935483870965}, {0.608703951135713, 0.8188585607940445}, {
          0.6574323112784654, 0.8461538461538459}, {0.7061201825469816, 
          0.878411910669975}, {0.7513520391932303, 0.9057071960297765}, {
          0.8024316461041028, 0.9305210918114142}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Italic},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"G.Difficilis\"", TraditionalForm],
    PlotRange->{All, All},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVkHs01HkAxTVSO8W2KVvR6WQzFZKQx6rmEiUG69kksmVDasykRCpvilKZ
lFfbtI3davXwKpRzykF5lEgSKcyTmd9XQhKVWfvHPfd8/rnnc65+EM8rmKam
puY2nf/7mWC+615LbybDzMeDX7CbadolzqoVmIHX7qooSmVC017X8IrAHpYj
reoRKe6Y/HR/NF3giQfz7H9kJwVi+IW6X4JgD6o3vNbyjeNisKrwzHFBBFgZ
bNr+qDgcMJ8yiBEkQmhID/kr5BwKB28MRwv4CBfX7F/gJMBKBZNmFCDEIa58
rGlLEUqWDmZpO91CyZ2ioTJ6BRLDHU/l0UrBkimffTZ+hBz/siXJ1eVoUHe+
OCyugYvS4WOYSRVMI3p3nwh8CurUmJ7RxGNYVJrRSrWbED324zIHdg0yva8d
4xQ0Y9u4RSsvvQ4bwwrWbjvcivMJijV06ikUouAn1qZtYLwtMtY3aMSkc7zK
98krhGeXGMz2eoZj7KuJhazXWPPWocGvqBleGeV+EcoO2HyQaxlLW5AdW+Pr
GNyJHket+PUGL8HPvN429rkLX2odIx96tKHNKo7tcLQbtrdSHqr2vYLaZI/m
yTfvYN2huf1rbjvkpfaiYlYP/MOubC6/9xrah+i/NAl6scEuKmXVQAc4tG6S
n9SHyAZOrUqnEwHLGGnfTURorzzgnWPahSz9nePPG0UYIqU2st1vMZbZ4unM
FcM8ncYbie1GWB/nbpG6BM0dPGHIpXdQjY6v3HRBAoN9DGN+3XtMbHU9krha
CuEeyczjvT3opr36KCiWgtvyKU+L3oc1EX9M3YQMlU9nreNf7UPYnHpZRr0M
OiN/cj8Zi7C8N4hibpbDA2/emNeJcJATJBXVyHG1+pLCw0sM6YobrS1W/cjX
lcQI34uRLem04//dj8PZ7etbIiWQmCfbuS8awO9bXXK7Z0iRX9BU4hg3AMPF
e1fW5kuxUE9XxVEMYPYy2q7ThjJUXw9a4eqsAP/bWu3U+zKcGG2tCihQYOKb
aninmxy7rHTu3FRTItLM99hP3XLkVi6ee9lbieZT7ibXIvshzqMxpm4q0Vbe
ERg8dwB9F+TuW74oQS2R2NBzB6Bnx7JfzaQgFmRtSlunQAXXUhKfSoGwG5Ty
RwpY2z73+1hLoUBx5ucYFyXKPtz7wvxOwebKKEcuUuLBotgjmtYEfSm9Byx4
FDZGaxSL9hGEXMzwL4ygkKDLs6gIIxgs+JWlH0lh0/bO0Iz9BJM1WUbzYigY
5fwrseQQ6MzYplAmUahnOq1K5RG4xBaHCLMpzGLwehZGEZQdSdwz/xGFf9wi
NCeSCGxT13qmVVPYrPaiqC6ZoPpit52qhoI/y2hmZgrBizLL5YP1FKYKRY8Z
JwkGhhU9DS8paGSykt3SCZZyvQISZBQWD8+1PXeeQBirYo33U9hrHDTok0lg
ePb2Bq5y2m+qwlOPT2B1e5ZewBCFVeFBJjcuEHgqH3ZZT0z/drB0XdUlgs6J
0Ma7X6f3eRqc+GyCQLrOA8YUhWsaO3Y45BBwVvNyF6gTsL59dWjKJRixXpp2
WoNgZ4Cbw9k8ghinxugZPxCIfASjv+UTqLGjQo/OIZDKPvhoXyY4GbKCPaRJ
EDQPoe3T/B+H1XTa
          "]]},
        Annotation[#, "Charting`Private`Tag$64252#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[1, 0, 0], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.0300994266577026, 0.08374221728545628}, {
          0.06313446609847473, 0.14651756147874728`}, {0.10741085633871061`, 
          0.1972832010289256}, {0.1489395464206822, 0.2420690432741892}, {
          0.2055388290120389, 0.3257319196736166}, {0.26217986996446374`, 
          0.403406647095915}, {0.31611496911969206`, 0.46911342823616864`}, {
          0.38678681939091264`, 0.5347700993431408}, {0.4532536027026014, 
          0.6034333724469982}, {0.5127467397159597, 0.6721175247313893}, {
          0.5724277893541235, 0.7138550066187002}, {0.6306305930104856, 
          0.7675729622963758}, {0.6860648173280497, 0.8183051951577005}, {
          0.7472867504896169, 0.8390799797889534}, {0.8126093547080464, 
          0.8718185348661436}, {0.876578988027878, 0.8985731168023117}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Italic},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"C.Pallidus\"", TraditionalForm],
    PlotRange->{All, All},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV13k8VF8UAHC7ylKSSsoSSSJryHaQipIsZf9JIZJUtqgsRagkydaORInK
PqGRRCVRZK0UM+/NeCJEjbL8jj/mM5/vvM87b+659557ntzBY3bePFxcXLP4
mf8OrBdN2v7Sxrgp4m5NfriXca5bZjZP7SYItGgX9nptBocVIjNr6cbQTu46
59toB7sWjInfoVtDkLN27+NXB8HwVIHtZbo75PREm7jUBcJmrfjRWHoAhOc7
+r6oOgfFVyZro+mRwNiQ651alAI/nxfmR9KTQDxHWNfkWg6oQpbZC74sgAEO
rV6mFDQMd/Gfb84Hv9BG1Y0rauCeVlK57tEnwLO+MSDd4SX03XUYLu8phcZ+
Msu/vxFSV/cvW1tRCTrXBo3led/B7Xs9v62Jatgeq3nAZ38rjIi3+oRzvQAB
Sy75U68+gufHx+4TVB2IXzGyZeS3A09qQ0nrbD0MvQrz23m/AyY/Oovt/dmA
v6v6TgZ2Qazo3iHxztdw9/6RlfHKPWBoc36tNvkWaGOCDwY4vWApou010/YO
RqNoUndvfIHoVkne9YPvoflynHeMTR/YJXuvSZxsBYcUzx9WP7+B4aEVcrt/
foBL2/5rsS/5Dsy4FQdjOR9h5Tu3lhMh/aDr7aC0ZLQNaMJJBx8oDIB0o/oa
q+l2uJ2gt2ymdwDsFemt93k7wKMo5tzBOAZoml8U3DvVAV/4JE+dkmFCHnPs
aAlvF9AuBPgL0ZnQYJbp7D3dBYUXPLpldhGgkTXGozPaDVCf0U+2EKAZTfZW
cHqgoDdTKdGBhL41q/QSf/aCU/oGKfMWEqSNB+vF/n0GV5ZASYIFCwr/OyJS
zv0V9k5fGZ+lsYCpr/Kl8PdXcPI8WyorxYbiGwk9e7m+gYq2u/TGSDYo0eTd
bDnfwKlspXdxOxtOUnot5SHfQaz0sPAiuUFQqCrivzn1HQKKBN8WHx2EPHZd
VEFwP5yo1AnyfDwIQd3yYkv/9gPfv6UXxYcHQWL9OuJe6AAMa7T33pGlwH1y
LuPV6ACYufM4Xrei4FaG0unO8QFQMr/TYbmbgt4ttu7siQFoUBTqnUI7RuYo
CE/h9QHHYKc9FNgIbiu252ZAssbzkcV2FGyVvNg0IMaADs3Kvz6OFCgZLZvh
0mKAea3vsZoDFIzFKh00CmEAba7u3e9gCgpyXUc2nmTAgfFUgagQCrxeJZ1a
Fc6A9cNTnQKhFHTzTqb8OcMA0X/hehInKaCfq6svjmXAljC7WZVwCi5Fu6xT
TGXAao5XmkUEBevOJLJFSxkgKLpkTO08BX03a4NnyhjgwafQV4DOrB7n+lHB
gG6eJo91cRQI/3OSfFvFAJmVzYqS8RSMh6/bGfMSn5f7oPxfAgW1J+mP/nxk
wEnT+r7CRAqcg0YDvo8y4FhKpHvtNQpWNkW7csYZ4D7+Q0EnlYJOWTGLJZMM
SE/aH1CI3tuiIWcyxYDR07YXM9IwXxuC2u9yM0Fb2Zf0yaBg+7dJ3f1LmSDc
4aE2doMCzV3/uPq0mMDxjOLLy8Z8ZV8antzMhIDdIRtFcih4ypHqFdFjglbQ
sY4gtGqeYamRIRPuBB0vgXuYb+5I79vmTBCyuJ/8MZcCmUquJrd9TFCD3q9f
83G88gLXPocyofLQierMIgqavolVD4YxoUXywaMRdPytNYw/p5hwtOyQvPlj
CniWb9ZaFsUE/azTD4fRfxZ4tVvFM2G1Hd8Sg6cUDIzUidMzmDAlfXV7bQkF
z6oiUrNoTFj1X6bz0UoKQk9eqHlcxYRhrmb9MrS2dhqzpoYJFonx9/6iHxcV
ave8YMJl53ShOBoFuVmfP4m9ZcL+lqU6Gc8oSI7bIhHTwwQpufiJnGoKDtlN
pnn/ZcK0338rPGopuJso5GMzzQTbiFjVVHR3o5yewSwTrNZ29b5GWxpY9y7h
IUBPYe6v6gsKVBTypWsWEsAQdLGdRI9POuUvlSQgwdrA4fhLCjaqHwubWUWA
1SWpb7fRXn7nLdmrCahwWT/XhO7oKx56LkvA2eI6PoV6CmivF6kfViKAMuZW
/IiOvF5Dq9UlQKTn0YsVDRRUtrddKNhCgKnJthpj9KjIoEuaAQFS+ov2eKMP
nJOY8QMCGojl+sVo8yMBpst3EDC82kDRvJGCRUayTf4OBCQueuLg8Br310md
m45OWIducTeEos8UW/mbuRBw+kVUUzp6eF246Ep3AvjrZm90oD+IttnVexMw
lC1oZ/2GgrTvMZ8lQwgQZJivVHlLQZvtH+FNJwmw7uWXt0AvqfczNgtHz8SV
eKIT79tm+0UQENL4dv91dKyfjE/1eQLcvW1/zaJffk7JbI0nwKtKXGFFEwVc
uwWaGBcIkDNI79mEPqM2rCKchOOr/dzmhg6eqBp3SyfgQYfvbAm6xHuTwolM
AvwSVPa9Ro92Zu87f4MA9qGn6p/R/s8SaEV3CBDI54Rwv8N6oTw9WJdFQMGC
59/E0eybx6Q6cwjgSzdtWYf2jHSInM0jYEDr0hYLdNbPt0+WPiTA09ymwgnd
52HUr/iIgDvRHZW+aJetCuZ7nhCgf0bWMh5tt2B8YVYlAYujabl0dHK4t0HZ
MwJsRiJ3vEO3UN3+b6oJ2JHAf6wLvfN9betoLQEeYG81gk4w1uLmf0lAtNsq
nil045M8TclXBDjfzzbkbabANOVymukbAjZVjcJydCQv9+t9Teg42gIZdE1w
MOdwM67PCBOH9ei/BGtDJJ4z9tkJSmpoPUdX15QPBISNJkfpoEPftCTmtRHg
eMTZ1QhdtsWMXvWJgBGxgeqt6PGC8p8tnQQYMJWzLdHqqzfIMbpxPQ5oCe1B
B1y+Zfenl4AZoZkpe3Th7OJYoa8EBB6IO+qEpo7FlMt8I+DuQKu3G1qp/zep
1U9A7JWegf3N8/vRb6UFgwAZ33vMg+jc+q+WbgQBwf6qR7zRA9q2p4+zMB+3
Tob6oGXyXhXGDhJgzjkrcBjttkKvL3OIAHqUlZQf+kbCo8VFwwT80uwqm3f3
lLRp3U8CvoqtbZ/38iMpgR1jGG+1aui8937hzx38RUCvHef2fLyU3eEdM5M4
/rKYnb7oD/QfAks5BNDMWk8fQouqe+gp/iVgy3Svhhf6tXTf0hXTBEgMJ989
gI4WcRsWnCWgy7A32x2tP93zmjNHwJmhCj1X9C/KMWeQm4SFU4pejvP56uk4
08tLwilvZYX5/B16Y+/4jp+EdvW6MOv5/39/j3DRQhI0mA++zc/H1dT35G0h
EnSbp8bm52tnzK66JBESFMT7MnXRzz12hB4XI6HouUfuhvn53dNgc0CchJ1y
cwvWzs+f8daNdhIkNDPUeVahc6Tgu5YkCdHnrUsWoF0XPa9SkCKh1Ev/8Byu
v2VT+mkSa0hoynlWNomO79TZ+UeWhEcGgQv70SYNZQrstSQEpz9a2on+W6o5
161AgpxN2NMmtP/VTWVVSiSofH/3sAS9Lrow6ZEyCRcr7Pjz5vdTgPLhWyok
vB/yn8xE21gpSkeqk8Ab5HotAr1ZUDrBVA/HPyHbaIoembx5UFOfhKo6s0YN
9AOmpJG8IQnKI39c5NCrXkqM85mQUOm52mwO9//sGRG3NztISKnbLViBrjxy
SeeZJQk74hYV5qCPuywUK9hFwveHLkQSmqHL33hpDwn1IuUSh9BvxqfV9jiS
YGVhd3Qx+mz/qUUmzjgevoIKDtYv/Q8cprorCePSaan96KKiietL9+P1E+tE
S9Apvj94Ow+RcCBhE2c32q3vc5dbKAltZwfyT2A9XabVMbw1DO9/n9K6F90c
38K78RQJ9mv4k3XRBhp1alMRJHQ2qH3+h/V4VWxefNp5Eiij2zei0D0bTui2
pJKwpan7eRDW++RIv93l6ST47Hx4wgZt0e7peSsT739vQFdB0844XPG7RUJo
X54cE8+LzFYDlkAuCS8V08Ss0Q4hAhlQiuvBvi1N9BWu96a5QsVyEqoF6zuY
eD41Sk+9FKkkQa825HEVWufN0MjnKhImdOWUvdESUh+3h70kIcwmeWc5nnef
Xtz8/fQjCXlrWtXM6iiwFdZwWDtKwkOl1kuidIyfGd+sOU6Cx5fH+u3PKXgn
32e2dQLzfVXweAZ6m8ElNS8OCfRZ+QBp9BY/YkEeFwsWsRfQFGsokHtzvXqD
GAtcJs6dk63CfieGR05DkwXVv3THaeXYHyx2zjDVZsHQe93jAegjN5+I2Omw
wOrh02B5NFHi9jdQnwUFniJiiWWYz/6K9jIzFrSRgRmOpRTUwZE4PXsWfFIc
6e3CfuXqv/YhCGbBncv3DSMeYf/Dt1lINZQFKhzFyxvQPKLpyqvCWNCr0xXU
UUBBoKzT4YnTLEhQf8Wrgt677Qv5IIYFxhIfVD89wHp0hdkvdo2F/eKTgiV5
2D+vnexiFLPAvOvyDv0szN9Ghz8fSlng3zD4X89d7L82Vy6nl7OgOD54URg6
Ykf4vsxnLEhOWK5Ydgf7cf+ZNqs6HM/pRJ/1tzE/Ffwt5R9YYLreRPzvdQry
LJe/iv/JAu7URhEb7D8jz0kbPR5jwYTluHhHCs5/tWLFp18sWH7aNN0ZLaCq
+0COwwLSeufiA1exPi1xSqzmYkNNDX/74SsUKHZd3/tTjA0mxfLZBy9hfK81
hIM2G1Jm/jmOncP4t9e5R+iwwVcyY8Ab7dCp2nVPjw3+T/cN9pzF+BbGb0cN
2cBjY3TkRTTG37i/6OI2NhzcV2ESH4nxx7NC6A5s4ITt0ZzGfn1W+eEI04kN
L3asjfJFd3oW+wi5sqHk6kqLT2EUxHXUOTvtZ4NKxjHrAuz3SdqA0bgPG+x8
X6vY4PsBfYyqWOnHhuQlFS40fH9IV/6lBv5s4NJ+wyeL3n6Ld23icTb4/XB4
PxxIgXSH0M2SQDZ4nW0fskf/Flm2rCeYDUlXg+KencDzfPvqy3OhbGCv1r0t
jc6PUhBQDGfDcXlp9ZjjFPwPnnpHoQ==
          "]]},
        Annotation[#, "Charting`Private`Tag$64399#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[1, 0, 0], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.025107604017216456`, 0.12352941176470567`}, {
          0.057913033881469955`, 0.22647058823529398`}, {0.09814038185630736, 
          0.33823529411764697`}, {0.1518044365964022, 0.41764705882352926`}, {
          0.211400507670235, 0.4647058823529411}, {0.2521520803443327, 
          0.5205882352941176}, {0.3060644520472351, 0.5735294117647058}, {
          0.3600871868447191, 0.6147058823529412}, {0.4084814038185629, 
          0.6558823529411764}, {0.4661461207372253, 0.7088235294117646}, {
          0.5258249641319943, 0.7470588235294118}, {0.5835172718243018, 
          0.7970588235294118}, {0.6376779604900122, 0.8235294117647058}, {
          0.7029853217084208, 0.8617647058823528}, {0.7647886546738769, 
          0.8735294117647059}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Italic},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"C.Parvulus\"", TraditionalForm],
    PlotRange->{All, All},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV13k8VO0XAHChokINlUQUWRvaLHlxhESKQoVsWd4okaWUEPKza7FE3qxJ
pChLJVFE2ZcIIVnGzNw7twiVQv2O+Wc+35nnc+/zPPc855y72cnL3JWbCz9L
uLgWvxM1nyWv7rTQedweSjducdXJU2x0u0HfCUFOcm9nF/RB4+/9t250Pfjy
t97h67wFhLqnfLekm4P5m6GfYnPOcG+TkIAJ3QnsBIP7k376gvqvJlFDug+k
REzPpk5ehRBmfoY+PQzE2JecCkYTYeunlJN69AR44Nxt0vb2LpQ8dWr7PpkD
/ZTwmjbbMogIlByWlnkISXp/XrkTVeC7dOjC9aQSmBvc6GUZ+QZezx3lYV18
BsH0bHF5+wZgTw4bF/K/hIjrzY476lvgVtOKZpng1yDzM1Tfo7wDBgQltrM4
tTAvNhh7/Mt7uPZeY+qzSj2oCn1MfzXZDe1nFZ7V574Dw+jvSxeEeiE4Svrj
yEQj5Oq03jw33weHk9dqequ0wJFq4UjPzn54fGkw/UtmG8T2dKsPVQ/CK89j
Kod9O4C/r86gPXAIPFcprJEq7oSIwmMXdssPg/Jd/wSF8fcQ+U3gUPXSEbj3
64Ce6bJuoM4LZGm0jsBYZZQvAR/AaGP6w+b0UejTNunKdOkBUznufUrWY5Ck
dLGsJbsX1mefPK0tzoCTtM2quz72gShNdrC0iwHjz00ZZXMf4VCrU3K+/zhs
b2aKPFIbgIUkx4MJm5mwM53H77XtIOSf2mPd+5wJ+9zu+AgEfQKxUq12TUMW
SGVmTnWUD4H9BLt0uJcFT5Llsos/foYjrTL7o6zYwDsf58YdOwwnQ403Cgyy
oULBoMNYdgRKWi+TckcJMH6m3b7p2Qio7iOmZqoJqAqgBFUsR4G7I545qkDC
qoxP4y3MUbi150i4QwQJjKq4uMgLY5CVQ/xR7CchS/ibbxCNAbXZ8kL/0jmg
3pgyxZXLgOMv9b91+3KgpGz6yau949BOimmaPecAH1cC36oP49AVElnXP8kB
1v6vyuddmfA3NEjwxGYKhuJjXrNOMUH3xdzxTVso6OmSNbc5zYRNrN1SI+g6
B4fz4MWE+5v6trnKUJDl31HJf4kJ87yjaqfkKLC6X2KUEceE0iIeQQs6BQ3L
/J3elTLh6IXghkYNCgrq/yZv4GbByZ4jnrtMKZBa+8vOiZcFlhe3xDWjb7lM
bS1cxoKpv1Z7nM0oCOMZL9dayQLZ1z/33jxMge3epg8OIiy4yju/km1Oweqq
pLV5siz4fUfyashxCi6WKSTvNGEBsaprwdaRgq880naXD7FguYsjHwvtaiG+
tc6MBW1ZFjnnTlJgPiVYftSSBdbNZ8LDnCjYtn2m+6IdCxwZTkuyXSgYLqwW
eeXFAkVZj6EGNwr237VIMkliQTWblKk7h/N9Z2Zcf4sFZm+0LxzwpoDBMfmj
c5sFGbpH9TvQIbsN3HZmsMBf+v3hfh8Kntfv1tqQz4I1MTx72H4UyLPXMpiV
LJjoN9DhXKSAj963K2yMBfti94pfC6Hg2JFu9tw4C9Kq5Jk8oRTknu9IP89m
QXFCt9IltG51w3L3LywQ3hqg6BSG6zerGDD7yYIacn6GHk4B2zvtqsRKNtT/
Gq5+GInP46lt1/OdbDgtKy27/xrerytlTlaVDdYGVjcfoI0m3ksnq7Nh51PR
IIHrOF7O2M9biw1Zyf/0dKIbU1XXKhqywUmf/7rlTQqaAgSP/2fNhts2dWJ6
SRS06rzuDwphQ6V/RVrVbQoET8xxU2FsaKRZr1+TRoGpv5qSzf/YULskXMQF
3Vb88LJaDBs8Bi7f4PsPLXVbfCKRDQ+Cpq+Z3KGgg9vH3vE+Gz4EcedVZFDw
/q30qF4bG0Y9MrXU7lKQQFXqRnaw4fKNdfvOo4/QLDOb37Mhh5E7VIrusAu3
texFb1per5JLQfsMo8d1mA2WH0fst9yjoGVLXnPUFBtuuk++ncqjIM5IR7F1
hg0St/qHFe9TYOLZE7XmJxv2TA/EOqGbKpYZps2xYSPIJHegGw6fel3IS0Cq
RLPf/XwK6oPly9vWEeD+3dtN9wEF4bmvhYU3EMBUbE/0Rhs0Wfkc30jA9A39
wznourXRKsOSeO6/egdyF1JQ+5Ao+CZPAPc3RnYVurr/QYbIPwS4rpbZLPmI
gmAu/QUrbQJ6TGfsjNHasgMn0oGA3qoBJV/0S++VG2QNCAinTwbUoyv5PBLV
DxGQZKHCdCnC+FOjR9k4EBD3Ytm3a8UUmO1o6Go/ScDW33K7y9FMJWfJfS4E
sGPGZvrRIptvP1VxJ4DKVJiQeUyB98ql47yYccmUb29L0HzLsrYHnCegy3H8
Rzc6i+ufwAl/AlgBvrk/0G3fzwn3BxIQk2N/UeMJBYrDg3uLIwhoeXWO5ym6
pt8/XiaagKU0dalutNUH2sfbsQS4lae8+IaOaDI6F36DgMIJOTelEgrGysoy
rNMIoO8Mz0tFBxSbkW13CHgmIPG4BE17QKoaZBJwRvOwegtaN1OqVTmXgMOR
/6teQN+JjpvjKSKANqH02KaUgl3hcvsvPcb1WaTknUM3BdcmfC0hYJI/XSwC
Pes7q/DxGQG+7v6Xi9FH7V2simoI8P9xSmoeTVn9vStdR0A24x6PYBk+b4u0
idS3BMxIB7tIokuMOiKuNhMgdmshQxctuEur3OoDAQ5GGj8D0ffovVxtvQT0
vTJ6F4PWkvc5qN9PQEDUtEgq+oxE/hj9MwG6AqIKT9Dcovoqd0cIcG68OfES
nUYbChBlEFDcc29XA7phuQiNhyCgnnFn9ye0A3ex3UUOATfGr3xjon/MGxd8
+YLxob6gNImO/8mYcZok4G6/CGMWLTN1RbdvigBO29sNS8oxfiixuEPfCbAX
EW7lQ5uzyntrfxLw+8GvBSF06CDH89E8AU+ak/vE0anDY5OzfwhQZ62R3YIu
Ygz4GCwh4UAAc4kcup7dNXOdhwQqXNhDCT1INV8YWEqC2PLbLiroqck3s7J8
JHRx+XN2ovm/Vwb4rCBho88jLjW01K/S+apVJEzaaOVqoNUWCoP5hUgwr5Tu
0UQfXJLLdXQNCZDofEsL7bz0TliWMAkVo3MMbXQAfxIvtZaE2gKqRgd9QyAu
Ql2UBCu2Kh3QeWvC+a6KkXAxo1d20VVrA2PaxEmQa+ksWhzfvcFvlZgkCc7e
MvWL1yMlPK65biZh27V298X7cW1xWf1EmoSQLV13FuezXtY2YX4rCU7KKvaL
81VWtBQxkieh88nYI1W0gfLBW4mKJLQ9nIxdXK/NTgPRz9tIOCp5bFYZ7a2m
laaoQsIZfpFpRXSU5m7xCztIEDqjGCiLztDZllGziwQdg9uJm9FlejJSAmok
/E5y3LP4PJoNxXOsNEgwsAs5uw49ekBEJlcT9zt9VmU1etZ0Vd6EFglBlo0h
/GghC175f4AEj6tTDtxo2ePzBRF7SSAU/Fp/Y3xYOFCPJAxJiPkUYkGiTzsz
VNyNSCgiV3qMoENODT4pO0CCndcErQ9d5NVSbmJGwr+fX62sQ9f51qmnHCGh
sumhXQV6wP9lxagFCZn0Ke0iNF/Iw6pLVrg+m4iCW+hN4blQb0NCqvSH3Yvn
QzXqTs1qOxIeuwSaBqGdbsTV3z9JQuSh7m1O6JdZHq0fTpPQWlGQLIt+n+ti
tvksCVXwMnEdmsi37fTwIkFLW05qGXrdk4MfePxIGMlYxhjD83yuZtunHUEk
1M2T69PQEfUyDkFXMP6gJmoxH6Q3io80hJKw5NdEpM9ivuhcNb7Yl/l1Hdth
jN46SlHx10mY3nJg+zfMN8pD0qOtN0kY5zoY3Y9W67fpFUgiwYImfP4N2uh9
Q018Kgn/tU/yJqFP1+beis8mgVlKLt2OfpxjqxtfSoKtdF+cBebDioxE1dZy
jH8NOk0NXZvWpCjwnIQ/ofsVRdFdCRpr41+SEF3UTBvA/PsjTISMqyfB0ptW
fwKt5dySGNdLQnv67SIjzO/7HHiiWz6SsJSz11EGbXpCM3jVIAklZ4pz/2K9
cLDId4sbJiF4ef94GTpMP1w7jiChJf+ssRj6nbQWK3aOhEMJ15I7HmJ+YBRq
xkpy4APXs72cAgp2lo+Lz2/mgK5zLF85mhYh+ddDhgP7g1pMg9FdcolvTBU4
INOXZC2EtjwTcJC2iwNbFXTclLCeHpsysr9tyAEVjWl3E6zPNlzM0PtnORCy
gvVHMYcCzU5JF9FzHDBxNC9lZFMglmNtGO3DgaKziqx09IB+64oz/hwwLpZq
FUTbRpYlKodyoLZ1awKZSYG94NV75UkcqPNP4IpJx3whLtX4ppIDv69893RL
xf398XRkRTUHRLOjBtajt3Qe+n3kNQdaYuX63qbgefrfZaXhOg5MVUWFSqMd
J3ri51s5oJfcl9SbjNevjTdXHebAjFBRlWIiBdZucwN5vJh3VLeLBsVjPdZL
mPmyDOM4WitiE1pUQkFAlR/zeJ5l+Ks4Cvo6j+m8EcB90MnfzoU+9k9J1ud1
2OcNDxoHxuB+Cbq7iirg+MnLwQ7Y35mV9XyNPoR1eO/NyU7sHwMj+npFsG9+
8TT+uRX6gVX/60zsm6cmln8fukIB78KnhHLsm+uKzjcTwThu37jaCPbFTDu1
r7OBGM+908EaF7AvDju4cgH707lfq4VY2IfljTbfvYP9r3wLbdYb97V6IGRu
DfpYhsjIPPZdP1JL30V4YfzqiZbSChbfGxKqPD0p+DdW8rgOnpPhTaqSGh4U
dIorZya/w7hwFnrx+BQFf76qREk14XUzsqwl0NtqdngXtuA+phefjf4Xz6Or
qn5NJ/7ONpx2cMV4LtJiUQNY54tt/JY54/kJ0enwH8I+YmX/M0/s51PMdSu4
Ryi4ptTr1YPrmvqhHyvKxP+fH9DOxfcBycZ9fnfZWMdlasxXoA/+t99OmUNB
ztHyQS8HrBdnjQ0rvuB+H5Ab6Lan4D6YqBhMUuDJs950D/r/uUFe7g==
          "]]},
        Annotation[#, "Charting`Private`Tag$64546#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[1, 0, 0], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.03472045536575408, 0.12598886436656542`}, {
          0.07867721455324328, 0.245445454921986}, {0.12695332146005756`, 
          0.3195666451685437}, {0.1935126947404544, 0.3935694971214214}, {
          0.2506937582466997, 0.48381427988189873`}, {0.31533013425479406`, 
          0.5643020703284485}, {0.3874691580822094, 0.631796316128918}, {
          0.45590419331743637`, 0.7025507819202756}, {0.5153396013182885, 
          0.763654759862018}, {0.5769820184962753, 0.7988544853171766}, {
          0.6422337536315061, 0.8372670954457511}, {0.7020951794896069, 
          0.8692421023981258}, {0.7658025998923121, 0.888247232363157}, {
          0.8386989887992804, 0.9039566408491959}, {0.904329406474288, 
          0.9164768323205552}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Italic},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"C.Psittacula\"", TraditionalForm],
    PlotRange->{All, All},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVj304FHYAx9W8VOaIpLrKS/JSnRUeHXa+8pwSkTOxea468lIRvV1DbG1E
NI+krmLmtWJqpS61VtchOnnJyx1XuLj3n2rtaUw6q9kfn+fz5+f52MakhMXN
1dPTC57lfwfaaKbcC1k+fr/Fe5l+YPswYnTZmdT1mJR4nhwo9kLK4aL4KKov
rl0x4HadDcSpdPZgADUUwVNP/cyLonDuY5OpL5UDp4NJO54U7EeJcKLem3oQ
9V1eHlty01FmS0n3pJ7ARZ8yCSs9H9Z9y6Lp1DPYq2NmJXFKULwvzKZSVIEI
cdX28U31ECQl1OW9rcWfMn07PSs+OC1BLk3HbuLLW9wIadh96FIe0A538mE/
ZeFSmCHE+ArJ9CLpPewOz+Wz81pwJLEtMcnrIWQCcaxI1Aa3qpjp1Y+FcBnx
b18+3o5IU49qSlszbBcV3vAVdSKgc7Kc9fdj+PFrup9InkGRNz+rQNeGYwXH
vxkO7YWbSc3BgmkRfg6g7ttT14fQ0TUNGrsONNbuHJi3RAwrvoHUy7ELxg3N
pokJEtQPdrK0Ec8gD9vqXtExgHSOyat1gh6s3cpkq2ylOLJjl02MoBfWnfr8
1Kjn+Orw6u+Z4j5Qpnor/a68wKnCxazqwX4MG90McZQMoVqcue3GX2JEpvSU
T1qO4FKGU3CZ/gBoFQnclK0yKO3/FRoZDsK+PIZ+IfolLCe37LJeIYXZ8wxP
A/9RlLY+SL5t+xz+y4pOz3SMYub90Wxn2xf4Npqy3Cp4DMzw6pZtHkP4yVWb
XCAZw9gNHfc1fRglQ+rmkyw5Yt2esjxZI3g7v3vATSxH89Jh172xMsgCHYWt
oQpw9ZbkWsS9RFu/Gb+qSYFTRnFzGxmjUN4MUMTTlfhE6U+veDQKoeNE0XC1
Eson8kmdzxhawqWf5i5Q4cG56wYu7WOw3hy2aQtXBUG0yfaVgXJEvhkR6g2o
wPdzoqkkcrBTZ3JdvdUQr5Iy93+tgPkXP6T68tSIbnTezZEqYOf/ZtO212rI
2R4U2h4lCg0TPxls1qDgM+k/d5VKNC70z+fwNFgrcD+69NBsh5n3sJlosHGN
28SrDyp8vkDEVGzU4gCv7XrGcTWkOXs/HMjUgrfYckZhqIGDX3vahlYtxnnv
s+bnaaCqv9beqk9QL8qkVMzToud8Z4MKBByKgGZSrIX5MWXl0QwChBfn0BcR
/LryburFBgKxnzYwbTFBm9mBnd/dIti/gWF6fwlBlCBoTuxtAh5Fc8F7BYE2
KCvH5Q7Ba5FXnY8DweX1QznCewQlDHkHk05QZOOyW/qIYMJhw0IWm4Bewkke
7CLIt8yRFO0iCNLR6He6Caz1hy71cQikVvZNZ58RBI5l24XHEezIyjcL7iWo
LJW6RSYTvFvle1kgJggxOxGx88Rs53TIlfNDBMqP4mW//EiwruZqTMowQdob
55eybALXVGdZwAhBzdP+BE4eQV3YVXOdjECX7Zi25yyBW+/pQ2w5wZkjGYya
cwQ/tK5xdFcQOMT0zlHxCAK470qNlQRhOJ4fX0rgZTTT/Ltq9pvWE3K1jCCe
MLhn1ASZy1dbaMsJjHNr1fEaAnPj9EGnKgKnUW8rhpagdrq7dF8NwR8TU4YW
hOA/ug1qAw==
          "]]},
        Annotation[#, "Charting`Private`Tag$64693#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[1, 0, 0], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.05775016070280681, 0.0977030212127703}, {
          0.12060852796228816`, 0.19544032569102177`}, {0.18098135847439445`, 
          0.2864495393186197}, {0.2415256053139061, 0.3606813799014357}, {
          0.30203556888793637`, 0.43826869509320754`}, {0.36654810370687807`, 
          0.49910434968930795`}, {0.4298864366830941, 0.5498650096421684}, {
          0.4893936147418041, 0.6005999571459182}, {0.552663381187058, 
          0.6580715663166916}, {0.6070280694236125, 0.712127705163917}, {
          0.6603556888793656, 0.7426869509320762}, {0.7151317763016927, 
          0.7564773944718235}, {0.7644568245125347, 0.8037883008356548}, {
          0.8013199057210199, 0.8208142275551749}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Italic},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"P2.Inornata\"", TraditionalForm],
    PlotRange->{All, All},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV0Hk41HkABvApxpkoUZGeZXeTO5Ra4WWURhIiR0Y2+9hEjnnKbK5SpEJl
ZVOzuubR9KSnHIXHONKxlKTkPjKOmfn+lpVr3dfO/vE+7/P5632eVzco8lDw
ShqN5irN/x0yaiBcFLvZlYaPOjsHB9ixFYdsyxkmqPjVSGbdlDV0XEbYcQxb
cI+7Rg39ux8TYWNp/gxX6O8Ljx0fP4Kj8eO3XBgBMJzk8o1HQpEle+qeIyMc
fOawUimJRT7zOQ+MBHiHXe1obU9FRahnri3jKjIjPsxql3Ox5XnaWYeEu/Cr
FEZXZz/BuLr+PUM+H55LmbGv3F/gSnPZ44vUU3gYMDUOZwtwwjcxw1xUBDeF
gC0JvGq4iOYzujNKcK1hwUpQ8AZyZxtrmekC0LddEiWP1OBr5/INnegq1L1f
bUNfXYcyw6RDPiqvoJqRZ5dO6jEaYclJlH+DAFO16KHhT5B77VYh3/sWd41N
TbN8G5HH2eDqmF+DPXYP40VPvsDaYnWM8OE7qGmJhhvVm/F4IbK2I7YOAod3
RqP+LaA3LBVs/60ex/mFMmalrRihWYsdQxvAFl5iXZNpB+vB6J12nc+o2s7z
GTLvQMlfnTeh1Qg+qU+5zu7EubG5+y30LzjioWq5KasLL+8XzmjTm1D4IPML
u6YbNYlV0RXLTWDz8uO4g19hE7JCNv3vZmRc1k2JnejB1qZOoTJpQVT5btoP
9F4k7x2sFzS1oiSH8wsrqRePKDfhm/I2qOx1tgqd74W96gEklLZDR29jT0pM
H5i2ZwuCeR2gjB+meg/1oeabU+TS/U5o+b8+xQnqh3JjsOcYtwvaHmHLek39
qBYImOrJ3ejQsQw8sWsAQ/r8NHHiV/QEGvWt5Q3gYk6tUHKyBwd/vNP+gSaC
xAF+DC8hJMruxQt+IgQWb1F7pN+LRL/0M49LRLjwkRn/NqcX3ecswp0UxTim
b6Uq0O6DGn9s54OjYkwnVxnuy+xDz3xUQFCeGGNzY77n5frhcJE2PDEqBr9o
9OmN5H4U0Q4q+P8kgXpEaprtXD+2bvvTQSlGgt1hI9dfxgyAG22m9blMIv1z
mf9tagAKss8idSYlUOTmORWHieC+TW89dyuB/OR3Kl6DIsikaHaDRVDpacFK
/VmMPPqBd6mXCVrrvlWGN4sRJ1nZzSwgyEviOBkckkAm1ziU2UZgZX/bJ75W
glxdbfuGaYIqc/Ndl99Ld42DF71nCJy+f78h64MEv9+1jRJK7S032/HkkwQm
Jbc5I7MEnHpfVlebBCHFS/RVCwSlvhuOWVMSTE3Eme2kUdjFzg6dUSCIYjs+
PaxAoTrIzEVWmWDG48imFqmZXrVGaioEBreX7b0UKfjunP5Hfw3BNf/JPA8l
CjGL3pE+GwkCC66ucF5FQXBF83SJAYEml11moEaBEffM67URwUFxxPlcqetO
Ou1oMCGwzJ5b2ryGQqcbZ0psTrBkWqmlvpbCnEbrGQ1rgmzTkeZpdQoX5CP8
dG0IDPMDnaPWUVCapVub2BEcv3n0FCW1VveO+T0MAtEteapNgwLv48cu9z0E
ei8KLdw0KRi+DK5gORGoWA1a1EhdVLCYE8Ik4G0upGzWU9jN+yPh9H6C/nA5
r+dS/wfi52Wo
          "]]},
        Annotation[#, "Charting`Private`Tag$64840#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[1, 0, 0], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.05367066895368788, 0.12398799313893605`}, {
          0.11243567753001726`, 0.23769296740994772`}, {0.1949571183533445, 
          0.30512864493996483`}, {0.27550600343053167`, 0.4034819897084039}, {
          0.33936535162950254`, 0.5069039451114916}, {0.4136192109777015, 
          0.5691423670668945}, {0.4730017152658662, 0.6209948542024004}, {
          0.5523499142367068, 0.6729502572898789}, {0.6202058319039451, 
          0.7093825042881639}, {0.6764665523156088, 0.7406003430531727}, {
          0.7278387650085761, 0.7614837049742702}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Italic},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"C2.Olivacea\"", TraditionalForm],
    PlotRange->{All, All},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV13k4VG8bB3ClhZC0aFOJfrZSylJJvoRkXypLVKJQlogKISGVpSR7FBVK
JVnKUkQvCaVkr8TMmWHMnJDKUnif/prrc10z55znOfdz399Z63jS8thMPj6+
+TP4+P59Xvr82vBQuIVmhMCe8gnR45oKM7YbRIspYVxaqMrs727ccQvUOi6m
hW8SWmunJ6zQLbn6hbWYOcK1UsUejDkj8M/3cVMxB5Rl7I6U+nkGDa7tyYZi
XrjpcVNfjhsBn9tGrnvEQpAqoiO3szMRb8pmm+uLxaLY/HqaW3E20leUzNar
yABDouXWtM1zVD4qcf2v5z6Ez3eXcdZUQeKnTnqSez7u3uuM2LevFrS6eM7N
yiJMmknLNH5sgPKGq8qVdSXo+Zjygt/5A67VDvUckXuJHOm92gtmfUL9ga93
GktfIdVbaHznhVZckk0Q9yurhomO3ErZqnY07ale4cT+H1bp7l9/aVUXLLGr
5yBdi0+zbmzo0vwChZ7TM6QH6sCvLuf5UqcbMa2rC2UXNqAgLmryoFIPFDJW
yGgseQcFOrLHV7oXlpVR8rE6TVjU/ZDzXpIBV10b3fbCDzh0J2RYW5SJ14vi
93kWfsRFt9HWsxQTx2LmKWbVNWNJjVzQsyoK97wV2E4NnzC/qnG8OYIFWb6L
LtXMFrhUnshZb8lGm1Op+JzRVrTuc/HyFe3D2i1J2R9H2yD81edt3bM+FOY+
mdKY34Gk3xVOEo79YMR4b1Va2AnD46nvk8b6ob5b5JaAWBda0Nq6I4yDjvvM
xpD/PiPxTN3efNEBLDrj9CVE9gu+69wvcbsygHh6VZEkvsL00SbDDfxcQL2g
NMuiG162OoLOXlxcHh68XWDxDV2ny3oXvuMiSl4l54lyD1K26EdekeUhQ7Tm
u0FxD87qbqm+eooHo55d76xUelHvfHuRbiEPDGMTrWC1Xjj7czINingIKLUu
zNrWi8DDblGmxTzcj3NP+anRiyXZ4l5Wz3mYpZd4LE6vFzNXCYUcKueh4gFn
8p1VL8qfupWZveZhi0/sRj3/XhSdEUp51szDsjnd15QrelHoWTOZMMhDeM2D
hWqveuFk7pnmNMTDcPjphG3VveAsz3qoNMxDPb/IzZ21vQg4+mLl2x88BM7Q
yNZ/34us9uu7Rn7x8O1vygu77l6sVevI3fCXh+yR/ZywqV6UfWpmKQvQUOl9
t6tFkwH/6+dnx6+m8WuJwuyZ2qQO7BbMMV5D45lhxJtNOgwILJl/iF+SxrYi
TeMofQbsrM0Xe62loXHpyf5d5gwYLhtK0V5HQ1fxumv+EQaMo9IEa+Rp7PPf
dzU6nIE+1QcBJio0luTlm5dFMDD4q911iLiNIbyo/zID97N88uJUadgY1yTp
xDCg2DKMVjUa9mvUMicSGAjxEAy03E7jaM3SItccBoyuZ9koatLwEfvcqVtP
nj/9+t2j+jTmpYw9NGlkQGckdA2HOENSPNjqPQPKo2cFPPbQaNxkIeXaTK4n
6LHWx4DGOtM3J6K6GOiwDjvpZ0SeJ7Lwz8cBBnxuOgS6mNFQnxW96rAQEwcr
vtq0W9H4EPVg0EWEiZoO3dMG1jScF72p8iLnZG/mk6ky4htSM51DFzHRrRFr
k2ZDg6fll5e1konH6UFyNgdopAcdBW89E1vnCG4vOkiDb1TjiL8xE/w+DIkp
JxpaW55NnjVlYn/l8wm7ozQueGxKPWPORMIFPaNS4pnU2k8++5igXCJ1Tx2j
MevjHD1PeyZelJcmfXWmIfjwg5yTOxPmIXmvUo7TMGQb1BzxZCJ5vVD9d+LI
ta+POHgx8cFYcrfOCRrCycWpB32ZEB32SRwgnn8xVdgmkJz7V6+StrjTWHj4
6JBxNBPCQUMS9z1pWKZ+jTa6yoTRpRaLn8Q3Wq3kDWOZCJjrPY6TNBYbGzjq
xzORdfxTRiux+PaNLdppTKgU7zSf8KKxYtHYc7VHZP3H72+W96Eh/SbqvGQj
Ex9126YkztIoOZtgZ/ieCbmaan97YlO521t9PzAxEnPa9Cax35WCwTctZH/H
FGcv9SPv06jz8MmvTMxRGciZ40/D94OMVsV3cn/EVtcGkP24oCTRP8TEMv3e
zj/Etzarj4mNMDGdOGaodI5GXZxJ/rFRJlYtCFBPIl6131dShI/CU5c604OB
NGo7q/jsxSisexRnXB9Ewy6y4cvFRRQK1Pfw/SIeUm8tebKEfF/sfyJrgsn6
0vq9+FdQmJMyX82b2POQaG+uFIUZIoPlIudp8Isuf9myjsLKb207lYmTK6VS
pmQoPBgPX25DXC2pZmG5nsJSAZXu28RLmfZV48oUDCK/psmG0Hh0wzldWo3C
0O1Rnj7xLl0vf5NtFISn2hNdiN2zwjZnalCIv8EdvUf8yiU3c48ehQnpQ4NL
L9DYv6wo6JQ+hc1BuSLKxAN1L23TDCi0r3550YR4scJHsSETCud2qIaFELvy
Ri8kWVEQ7/Iq7CZuHqz2SLOh4JLXsHGEWGMkxjbzAIXbcXbL54bSEJuQ3vzw
EIWayBUaisSBk98l8h0oFN8y8AUxm69MoNiRQnT145UWxGVzzXsqnCkMb19S
cop4ndDKxteuFM7HLHscSnxtPvt53QkKv4fMxeKIjy4JvNbsSSG5z0H2CfH7
Zfrn2r0o/C9gW+cL4m0SC12+nKLweZXexFtiEen7muwzFMpuTF5hEPvJ+Chw
/Shccn4wRhMz5DXFhwIoqBtEto0RGysKzvwVSKFtR4Y0fxjpf0ot9HgwBRtN
7jdhYkmV251TIRSqzd2ExImjtp6o4Q8j++Mjmb2a2EGTL13kEgWvPnn5jcT1
2g2XF16hELA9WEyVWEUv0XdpFAW3m3OP7yC+teeIg0QMBV2R2k3axILGG4zX
XiP1c6302G5iX7PRrTLXKTySZMwzIu62rJZef4MCqrHGjHiPVYyoUgKF5z7N
dyyJC2xt/qgkUViimpqwn1jioHTf9hQK9nOSRq2JIxy+N2veJPvfV1dnSzzk
VFqhk07hTscmQTtiO5fw3D23yfvsbCj559oTZokmmRQiBtLa/1nJc0Wo5V0K
e4XuHvvnVG+Wh3UWBUGNbscDxLNO59va51DIDjRtsiH29Dund+QBBYV3I7lW
xJ3ndm92fkjen+L7X3uJdc+LrXJ7TIGb/vWJOXFe6BcBrycUZFdLdRoTL4vI
+en7lIJx3k3vPcShV071+BdSsDY19Nch5kXvbAwupmA0pTi0k9g6VqAk7DmF
/yp2t20lrr7x6e7lUgr9MfHrNxNvSLp1LaacQpzH0iF54sTU4+fiXpLzfbBJ
WoqY75aKS1IlhXT7F7XLiU9kTlumkZwz7dbdsYC49V69ZuZrCnuiVA/MJc59
6CD+8A2F2PHQ3B+kfhY/WT8z/y2F63v8/fuIgwt+00UNFPxy7j3/TLy3NLqm
ookCX0LqhWriv7Ulvs3tFAY28htfIS7H4oyZXRSWVfrs9CMOKDnZsOULhY/n
Poc7E489kJG60UOBGRC7RJt4JDq+aS+HQsy1WM3v5DwWzB6aCONSWBxe9q2d
2CvYSKaIpiCd9bntFfH3kzODFv+g0OfO/yb23/m39FJonaAwspCTJ0f8oKFh
/+xJcj+3xmnhf+dfV/aC6jSFHcPZ2UOkn7BVu9sT+FkouKD9u5i4d5nxRSth
FtaUCqdvI+7olu1pX8WCaOgfgdWkfyVZhwkJSLKQcdeidJT0Q6sP3WrbpFgo
G75V+YG4pSohJlmGhbhFa96HEDfd499hu4mFGo/iHx1B/+rvW0KXFgsIVD9w
nPTji0z1qnk6LIQ485/YRqxrn8hT12PBOOh10xziKhMTnZsGLIQryadnkn7+
Qql8yM6ShaDHkWgi/b/wd6LRVyfy+xnZd+aReSEhbarN78zCrmFL+Q9knkSY
zd4q78rCCsOVwgnENvd9pE67szBv6xRLgvivrfm48GkW+ieFuevIPNr9UjBH
g+TeNJiqi5+m8YTzKs3xMtmfV09DP/qS+hX3i7scyUJ3rpJsNDHXkx3UcpWF
U2Uh4dNk/sVKvt7nnkR+X3s8tvsUOR9hgTPT7pPrxx2mg8i83JWvPFaVy4J5
lv/oRuJHXwbovkcsvJd8cvAbma/Bqradyk/J8+1119QklupTzW8oJeu7t8ni
pweZB4aDB//Us+D4p7Nc243G9ALH0gM0C8L+L7OOkPygGdtVYTfIgumgFXsW
caDo3v/ZD7MgedsyOYfkjTER3aZDv1hwfehlziX55Mc8GZbjJAvJZ/TF3B1J
PcwaWOAmwoZX++FWy8NkHo95u55TZON39Q6XYpJ/5vkNeARuYqPnhETLbmKD
UUefoM1s7DM+XNBO8lLtr73B51XZYJcLvR4l+aryh2p82E427ptMq2zeT+qZ
N14ZZcJGxg4LuysWNFJ6LixN82DDXTvj6XuS3za0RtrXnWRDKVbNW4e44u2N
zJ/ebDROr7nynOQ9qiBrvckZNqK1eVXpJA8qXXyLqWA2FMxOWDvqkfkvL+bq
EMvGUNxfsUYtst5TGSXrCtmIf+Ffs3YrqdfZlbaPx9hQS277r43k3QrjK3lF
E2xoLd48V5FYJn4v/4u/bOSvd7YKI/l4VKr/UT1fH+o3OGhuJPk5WUuMr1+g
Dz1nb6gESfzrf07ZUsv7cHXzaOm0OMm3P+aOJG3vw9iWQrkkIRqO38yjQwP6
MOUxmSA6woNv15mH5wP7oLXt+IQeyfeXWtPqA4P7EK/o0HyO5P9HDf0CZ0P7
EJgy+IVF/i/8fh5y0S2yD5Zn4u0LeTxExuYH70vtw5DO79kqbB4KtBd4y5T1
YdmmFTMaO3jgv9e0v368D8J6zGSrFzy8eenGzwjrh/if+E+CZ3nojLbPfDmL
g8C8t5EiijwUVeXNmJzDgVbOmYq89Txc/c3nqCHIQcuhSk0zBR50HbKkykU4
8Jq37r+r5P9UvvL3uyXiHPjtVb/CL8VDRNf57EI5DmofpeY1ivOgLHf34QNj
DjQCFTw7prmYf/CXEMeUAxkzM1WnKS76r+u7y1lwQPWIGtB/ubj1h7shZz8H
jVpHrabHuZjXpJJ37xAH7j9sBVb+5KLndG3+bS8O2BL+b5X6uSjPXSb27RQH
jC+2B/LZXCR+O+G9+jQH+XZtWzexuDAyEN2S7s9BRcKdDgUGF88kbApTQznI
+3Pp6fIvXFy3yF3UFc6BWsHunBtdXLhH/PVZfomDaNlMjnAnF1JDGSrJUeT7
pvL7Jlu5mFw3Et8eQ9bLZx3o28JFh63eL/FYDsS9JYcHmrkouJq03yqOg9CM
iwUOH7mIec0pTojn4NXViFetTVz8H2Vhm9k=
          "]]},
        Annotation[#, "Charting`Private`Tag$64987#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[1, 0, 0], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.005606796116504942, 0.12038834951456301`}, {
          0.03221952535059325, 0.22524271844660193`}, {0.06597087378640754, 
          0.3126213592233009}, {0.1026941747572816, 0.3825242718446601}, {
          0.16695792880258886`, 0.4737864077669903}, {0.21477076591154254`, 
          0.5456310679611651}, {0.2818770226537217, 0.6310679611650486}, {
          0.3464212513484357, 0.6970873786407767}, {0.41382955771305285`, 
          0.7553398058252427}, {0.49514832793958996`, 0.8116504854368932}, {
          0.583433117583603, 0.8660194174757282}, {0.663643473570658, 
          0.8970873786407767}, {0.7341963322545846, 0.9223300970873787}, {
          0.7993878101402372, 0.9300970873786407}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Italic},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"P.Crassirostris\"", TraditionalForm],
    PlotRange->{All, All},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}]}], "}"}]], "Output",
 CellChangeTimes->{{3.781684578677567*^9, 3.7816845991901426`*^9}, {
   3.7816846542628703`*^9, 3.7816846626040926`*^9}, 3.781685609425373*^9, 
   3.7816857124298005`*^9, 3.7816858054344215`*^9, 3.78168603184523*^9, 
   3.7816863110147824`*^9, 3.781687877248479*^9, {3.781867683863735*^9, 
   3.781867691648074*^9}, 3.7818687025904446`*^9, 3.7818690524815454`*^9, 
   3.781869396852891*^9, {3.7818694322645597`*^9, 3.7818694588735256`*^9}, 
   3.7818694902915244`*^9, {3.782050630490823*^9, 3.7820506436919856`*^9}, 
   3.7820507615110054`*^9, {3.782050807987706*^9, 3.782050826009673*^9}, 
   3.782051648354683*^9, 3.7824723586035643`*^9, 3.7824730219897966`*^9, 
   3.785578287559286*^9, 3.7861915421251745`*^9, 
   3.7861924238871145`*^9},ExpressionUUID->"392bcdde-f93c-4420-9087-\
1b0af12af8e0"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"labelColors", " ", "=", " ", 
     RowBox[{"{", 
      RowBox[{
       InterpretationBox[
        ButtonBox[
         TooltipBox[
          GraphicsBox[{
            {GrayLevel[0], RectangleBox[{0, 0}]}, 
            {GrayLevel[0], RectangleBox[{1, -1}]}, 
            {RGBColor[0.857359, 0.131106, 0.132128], 
             RectangleBox[{0, -1}, {2, 1}]}},
           AspectRatio->1,
           DefaultBaseStyle->"ColorSwatchGraphics",
           Frame->True,
           
           FrameStyle->RGBColor[
            0.5715726666666667, 0.08740400000000001, 0.08808533333333333],
           FrameTicks->None,
           
           ImageSize->
            Dynamic[{
             Automatic, 
              1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
               Magnification])}],
           PlotRangePadding->None],
          "RGBColor[0.857359, 0.131106, 0.132128]"],
         Appearance->None,
         BaseStyle->{},
         BaselinePosition->Baseline,
         ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
           If[
            Not[
             AbsoluteCurrentValue["Deployed"]], 
            SelectionMove[Typeset`box$, All, Expression]; 
            FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
            FrontEnd`Private`$ColorSelectorInitialColor = 
             RGBColor[0.857359, 0.131106, 0.132128]; 
            FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
            MathLink`CallFrontEnd[
              FrontEnd`AttachCell[Typeset`box$, 
               FrontEndResource["RGBColorValueSelector"], {
               0, {Left, Bottom}}, {Left, Top}, 
               "ClosingActions" -> {
                "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
         DefaultBaseStyle->{},
         Evaluator->Automatic,
         Method->"Preemptive"],
        RGBColor[0.857359, 0.131106, 0.132128],
        Editable->False,
        Selectable->False], ",", " ", 
       InterpretationBox[
        ButtonBox[
         TooltipBox[
          GraphicsBox[{
            {GrayLevel[0], RectangleBox[{0, 0}]}, 
            {GrayLevel[0], RectangleBox[{1, -1}]}, 
            {RGBColor[0.471412, 0.108766, 0.527016], 
             RectangleBox[{0, -1}, {2, 1}]}},
           AspectRatio->1,
           DefaultBaseStyle->"ColorSwatchGraphics",
           Frame->True,
           
           FrameStyle->RGBColor[
            0.3142746666666667, 0.07251066666666667, 0.35134400000000005`],
           FrameTicks->None,
           
           ImageSize->
            Dynamic[{
             Automatic, 
              1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
               Magnification])}],
           PlotRangePadding->None],
          "RGBColor[0.471412, 0.108766, 0.527016]"],
         Appearance->None,
         BaseStyle->{},
         BaselinePosition->Baseline,
         ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
           If[
            Not[
             AbsoluteCurrentValue["Deployed"]], 
            SelectionMove[Typeset`box$, All, Expression]; 
            FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
            FrontEnd`Private`$ColorSelectorInitialColor = 
             RGBColor[0.471412, 0.108766, 0.527016]; 
            FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
            MathLink`CallFrontEnd[
              FrontEnd`AttachCell[Typeset`box$, 
               FrontEndResource["RGBColorValueSelector"], {
               0, {Left, Bottom}}, {Left, Top}, 
               "ClosingActions" -> {
                "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
         DefaultBaseStyle->{},
         Evaluator->Automatic,
         Method->"Preemptive"],
        RGBColor[0.471412, 0.108766, 0.527016],
        Editable->False,
        Selectable->False], ",", 
       InterpretationBox[
        ButtonBox[
         TooltipBox[
          GraphicsBox[{
            {GrayLevel[0], RectangleBox[{0, 0}]}, 
            {GrayLevel[0], RectangleBox[{1, -1}]}, 
            {RGBColor[
             0.30244114285714285`, 0.13298085714285715`, 0.6794237142857142], 
             RectangleBox[{0, -1}, {2, 1}]}},
           AspectRatio->1,
           DefaultBaseStyle->"ColorSwatchGraphics",
           Frame->True,
           
           FrameStyle->RGBColor[
            0.20162742857142857`, 0.08865390476190477, 0.45294914285714283`],
           FrameTicks->None,
           
           ImageSize->
            Dynamic[{
             Automatic, 
              1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
               Magnification])}],
           PlotRangePadding->None],
          
          "RGBColor[0.30244114285714285, 0.13298085714285715, \
0.6794237142857142]"],
         Appearance->None,
         BaseStyle->{},
         BaselinePosition->Baseline,
         ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
           If[
            Not[
             AbsoluteCurrentValue["Deployed"]], 
            SelectionMove[Typeset`box$, All, Expression]; 
            FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
            FrontEnd`Private`$ColorSelectorInitialColor = 
             RGBColor[
              0.30244114285714285`, 0.13298085714285715`, 0.6794237142857142]; 
            FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
            MathLink`CallFrontEnd[
              FrontEnd`AttachCell[Typeset`box$, 
               FrontEndResource["RGBColorValueSelector"], {
               0, {Left, Bottom}}, {Left, Top}, 
               "ClosingActions" -> {
                "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
         DefaultBaseStyle->{},
         Evaluator->Automatic,
         Method->"Preemptive"],
        RGBColor[
        0.30244114285714285`, 0.13298085714285715`, 0.6794237142857142],
        Editable->False,
        Selectable->False], ",", 
       InterpretationBox[
        ButtonBox[
         TooltipBox[
          GraphicsBox[{
            {GrayLevel[0], RectangleBox[{0, 0}]}, 
            {GrayLevel[0], RectangleBox[{1, -1}]}, 
            {RGBColor[0.24882857142857143`, 0.264202, 0.7825611428571428], 
             RectangleBox[{0, -1}, {2, 1}]}},
           AspectRatio->1,
           DefaultBaseStyle->"ColorSwatchGraphics",
           Frame->True,
           
           FrameStyle->RGBColor[
            0.1658857142857143, 0.17613466666666666`, 0.5217074285714286],
           FrameTicks->None,
           
           ImageSize->
            Dynamic[{
             Automatic, 
              1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
               Magnification])}],
           PlotRangePadding->None],
          "RGBColor[0.24882857142857143, 0.264202, 0.7825611428571428]"],
         Appearance->None,
         BaseStyle->{},
         BaselinePosition->Baseline,
         ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
           If[
            Not[
             AbsoluteCurrentValue["Deployed"]], 
            SelectionMove[Typeset`box$, All, Expression]; 
            FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
            FrontEnd`Private`$ColorSelectorInitialColor = 
             RGBColor[0.24882857142857143`, 0.264202, 0.7825611428571428]; 
            FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
            MathLink`CallFrontEnd[
              FrontEnd`AttachCell[Typeset`box$, 
               FrontEndResource["RGBColorValueSelector"], {
               0, {Left, Bottom}}, {Left, Top}, 
               "ClosingActions" -> {
                "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
         DefaultBaseStyle->{},
         Evaluator->Automatic,
         Method->"Preemptive"],
        RGBColor[0.24882857142857143`, 0.264202, 0.7825611428571428],
        Editable->False,
        Selectable->False], ",", 
       InterpretationBox[
        ButtonBox[
         TooltipBox[
          GraphicsBox[{
            {GrayLevel[0], RectangleBox[{0, 0}]}, 
            {GrayLevel[0], RectangleBox[{1, -1}]}, 
            {RGBColor[
             0.25352657142857143`, 0.4149942857142857, 0.8102747142857143], 
             RectangleBox[{0, -1}, {2, 1}]}},
           AspectRatio->1,
           DefaultBaseStyle->"ColorSwatchGraphics",
           Frame->True,
           
           FrameStyle->RGBColor[
            0.1690177142857143, 0.27666285714285715`, 0.5401831428571429],
           FrameTicks->None,
           
           ImageSize->
            Dynamic[{
             Automatic, 
              1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
               Magnification])}],
           PlotRangePadding->None],
          
          "RGBColor[0.25352657142857143, 0.4149942857142857, \
0.8102747142857143]"],
         Appearance->None,
         BaseStyle->{},
         BaselinePosition->Baseline,
         ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
           If[
            Not[
             AbsoluteCurrentValue["Deployed"]], 
            SelectionMove[Typeset`box$, All, Expression]; 
            FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
            FrontEnd`Private`$ColorSelectorInitialColor = 
             RGBColor[
              0.25352657142857143`, 0.4149942857142857, 0.8102747142857143]; 
            FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
            MathLink`CallFrontEnd[
              FrontEnd`AttachCell[Typeset`box$, 
               FrontEndResource["RGBColorValueSelector"], {
               0, {Left, Bottom}}, {Left, Top}, 
               "ClosingActions" -> {
                "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
         DefaultBaseStyle->{},
         Evaluator->Automatic,
         Method->"Preemptive"],
        RGBColor[0.25352657142857143`, 0.4149942857142857, 0.8102747142857143],
        Editable->False,
        Selectable->False], ",", 
       InterpretationBox[
        ButtonBox[
         TooltipBox[
          GraphicsBox[{
            {GrayLevel[0], RectangleBox[{0, 0}]}, 
            {GrayLevel[0], RectangleBox[{1, -1}]}, 
            {RGBColor[
             0.2888631428571429, 0.5431845714285714, 0.7666072857142857], 
             RectangleBox[{0, -1}, {2, 1}]}},
           AspectRatio->1,
           DefaultBaseStyle->"ColorSwatchGraphics",
           Frame->True,
           
           FrameStyle->RGBColor[
            0.1925754285714286, 0.36212304761904757`, 0.5110715238095238],
           FrameTicks->None,
           
           ImageSize->
            Dynamic[{
             Automatic, 
              1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
               Magnification])}],
           PlotRangePadding->None],
          
          "RGBColor[0.2888631428571429, 0.5431845714285714, \
0.7666072857142857]"],
         Appearance->None,
         BaseStyle->{},
         BaselinePosition->Baseline,
         ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
           If[
            Not[
             AbsoluteCurrentValue["Deployed"]], 
            SelectionMove[Typeset`box$, All, Expression]; 
            FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
            FrontEnd`Private`$ColorSelectorInitialColor = 
             RGBColor[
              0.2888631428571429, 0.5431845714285714, 0.7666072857142857]; 
            FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
            MathLink`CallFrontEnd[
              FrontEnd`AttachCell[Typeset`box$, 
               FrontEndResource["RGBColorValueSelector"], {
               0, {Left, Bottom}}, {Left, Top}, 
               "ClosingActions" -> {
                "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
         DefaultBaseStyle->{},
         Evaluator->Automatic,
         Method->"Preemptive"],
        RGBColor[0.2888631428571429, 0.5431845714285714, 0.7666072857142857],
        Editable->False,
        Selectable->False], ",", 
       InterpretationBox[
        ButtonBox[
         TooltipBox[
          GraphicsBox[{
            {GrayLevel[0], RectangleBox[{0, 0}]}, 
            {GrayLevel[0], RectangleBox[{1, -1}]}, 
            {GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}},
           AspectRatio->1,
           DefaultBaseStyle->"ColorSwatchGraphics",
           Frame->True,
           FrameStyle->GrayLevel[0.33333333333333337`],
           FrameTicks->None,
           
           ImageSize->
            Dynamic[{
             Automatic, 
              1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
               Magnification])}],
           PlotRangePadding->None],
          "GrayLevel[0.5]"],
         Appearance->None,
         BaseStyle->{},
         BaselinePosition->Baseline,
         ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
           If[
            Not[
             AbsoluteCurrentValue["Deployed"]], 
            SelectionMove[Typeset`box$, All, Expression]; 
            FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
            FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; 
            FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
            MathLink`CallFrontEnd[
              FrontEnd`AttachCell[Typeset`box$, 
               FrontEndResource["GrayLevelColorValueSelector"], {
               0, {Left, Bottom}}, {Left, Top}, 
               "ClosingActions" -> {
                "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
         DefaultBaseStyle->{},
         Evaluator->Automatic,
         Method->"Preemptive"],
        GrayLevel[0.5],
        Editable->False,
        Selectable->False], ",", 
       InterpretationBox[
        ButtonBox[
         TooltipBox[
          GraphicsBox[{
            {GrayLevel[0], RectangleBox[{0, 0}]}, 
            {GrayLevel[0], RectangleBox[{1, -1}]}, 
            {RGBColor[0.513417, 0.72992, 0.440682], 
             RectangleBox[{0, -1}, {2, 1}]}},
           AspectRatio->1,
           DefaultBaseStyle->"ColorSwatchGraphics",
           Frame->True,
           
           FrameStyle->RGBColor[
            0.342278, 0.48661333333333334`, 0.29378800000000005`],
           FrameTicks->None,
           
           ImageSize->
            Dynamic[{
             Automatic, 
              1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
               Magnification])}],
           PlotRangePadding->None],
          "RGBColor[0.513417, 0.72992, 0.440682]"],
         Appearance->None,
         BaseStyle->{},
         BaselinePosition->Baseline,
         ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
           If[
            Not[
             AbsoluteCurrentValue["Deployed"]], 
            SelectionMove[Typeset`box$, All, Expression]; 
            FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
            FrontEnd`Private`$ColorSelectorInitialColor = 
             RGBColor[0.513417, 0.72992, 0.440682]; 
            FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
            MathLink`CallFrontEnd[
              FrontEnd`AttachCell[Typeset`box$, 
               FrontEndResource["RGBColorValueSelector"], {
               0, {Left, Bottom}}, {Left, Top}, 
               "ClosingActions" -> {
                "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
         DefaultBaseStyle->{},
         Evaluator->Automatic,
         Method->"Preemptive"],
        RGBColor[0.513417, 0.72992, 0.440682],
        Editable->False,
        Selectable->False], ",", 
       InterpretationBox[
        ButtonBox[
         TooltipBox[
          GraphicsBox[{
            {GrayLevel[0], RectangleBox[{0, 0}]}, 
            {GrayLevel[0], RectangleBox[{1, -1}]}, 
            {RGBColor[0.6215634285714287, 0.743557, 0.3500992857142857], 
             RectangleBox[{0, -1}, {2, 1}]}},
           AspectRatio->1,
           DefaultBaseStyle->"ColorSwatchGraphics",
           Frame->True,
           
           FrameStyle->RGBColor[
            0.4143756190476191, 0.4957046666666667, 0.23339952380952383`],
           FrameTicks->None,
           
           ImageSize->
            Dynamic[{
             Automatic, 
              1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
               Magnification])}],
           PlotRangePadding->None],
          "RGBColor[0.6215634285714287, 0.743557, 0.3500992857142857]"],
         Appearance->None,
         BaseStyle->{},
         BaselinePosition->Baseline,
         ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
           If[
            Not[
             AbsoluteCurrentValue["Deployed"]], 
            SelectionMove[Typeset`box$, All, Expression]; 
            FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
            FrontEnd`Private`$ColorSelectorInitialColor = 
             RGBColor[0.6215634285714287, 0.743557, 0.3500992857142857]; 
            FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
            MathLink`CallFrontEnd[
              FrontEnd`AttachCell[Typeset`box$, 
               FrontEndResource["RGBColorValueSelector"], {
               0, {Left, Bottom}}, {Left, Top}, 
               "ClosingActions" -> {
                "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
         DefaultBaseStyle->{},
         Evaluator->Automatic,
         Method->"Preemptive"],
        RGBColor[0.6215634285714287, 0.743557, 0.3500992857142857],
        Editable->False,
        Selectable->False], ",", 
       InterpretationBox[
        ButtonBox[
         TooltipBox[
          GraphicsBox[{
            {GrayLevel[0], RectangleBox[{0, 0}]}, 
            {GrayLevel[0], RectangleBox[{1, -1}]}, 
            {RGBColor[
             0.7306125714285715, 0.7364672857142857, 0.2882132857142857], 
             RectangleBox[{0, -1}, {2, 1}]}},
           AspectRatio->1,
           DefaultBaseStyle->"ColorSwatchGraphics",
           Frame->True,
           
           FrameStyle->RGBColor[
            0.4870750476190477, 0.49097819047619046`, 0.1921421904761905],
           FrameTicks->None,
           
           ImageSize->
            Dynamic[{
             Automatic, 
              1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
               Magnification])}],
           PlotRangePadding->None],
          
          "RGBColor[0.7306125714285715, 0.7364672857142857, \
0.2882132857142857]"],
         Appearance->None,
         BaseStyle->{},
         BaselinePosition->Baseline,
         ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
           If[
            Not[
             AbsoluteCurrentValue["Deployed"]], 
            SelectionMove[Typeset`box$, All, Expression]; 
            FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
            FrontEnd`Private`$ColorSelectorInitialColor = 
             RGBColor[
              0.7306125714285715, 0.7364672857142857, 0.2882132857142857]; 
            FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
            MathLink`CallFrontEnd[
              FrontEnd`AttachCell[Typeset`box$, 
               FrontEndResource["RGBColorValueSelector"], {
               0, {Left, Bottom}}, {Left, Top}, 
               "ClosingActions" -> {
                "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
         DefaultBaseStyle->{},
         Evaluator->Automatic,
         Method->"Preemptive"],
        RGBColor[0.7306125714285715, 0.7364672857142857, 0.2882132857142857],
        Editable->False,
        Selectable->False], ",", 
       InterpretationBox[
        ButtonBox[
         TooltipBox[
          GraphicsBox[{
            {GrayLevel[0], RectangleBox[{0, 0}]}, 
            {GrayLevel[0], RectangleBox[{1, -1}]}, 
            {RGBColor[
             0.8241045714285714, 0.6995635714285714, 0.25042971428571426`], 
             RectangleBox[{0, -1}, {2, 1}]}},
           AspectRatio->1,
           DefaultBaseStyle->"ColorSwatchGraphics",
           Frame->True,
           
           FrameStyle->RGBColor[
            0.5494030476190477, 0.4663757142857143, 0.16695314285714286`],
           FrameTicks->None,
           
           ImageSize->
            Dynamic[{
             Automatic, 
              1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
               Magnification])}],
           PlotRangePadding->None],
          
          "RGBColor[0.8241045714285714, 0.6995635714285714, \
0.25042971428571426]"],
         Appearance->None,
         BaseStyle->{},
         BaselinePosition->Baseline,
         ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
           If[
            Not[
             AbsoluteCurrentValue["Deployed"]], 
            SelectionMove[Typeset`box$, All, Expression]; 
            FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
            FrontEnd`Private`$ColorSelectorInitialColor = 
             RGBColor[
              0.8241045714285714, 0.6995635714285714, 0.25042971428571426`]; 
            FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
            MathLink`CallFrontEnd[
              FrontEnd`AttachCell[Typeset`box$, 
               FrontEndResource["RGBColorValueSelector"], {
               0, {Left, Bottom}}, {Left, Top}, 
               "ClosingActions" -> {
                "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
         DefaultBaseStyle->{},
         Evaluator->Automatic,
         Method->"Preemptive"],
        RGBColor[0.8241045714285714, 0.6995635714285714, 0.25042971428571426`],
        Editable->False,
        Selectable->False], ",", 
       InterpretationBox[
        ButtonBox[
         TooltipBox[
          GraphicsBox[{
            {GrayLevel[0], RectangleBox[{0, 0}]}, 
            {GrayLevel[0], RectangleBox[{1, -1}]}, 
            {RGBColor[
             0.8849417142857142, 0.6205167142857143, 0.22512285714285715`], 
             RectangleBox[{0, -1}, {2, 1}]}},
           AspectRatio->1,
           DefaultBaseStyle->"ColorSwatchGraphics",
           Frame->True,
           
           FrameStyle->RGBColor[
            0.5899611428571429, 0.41367780952380956`, 0.15008190476190478`],
           FrameTicks->None,
           
           ImageSize->
            Dynamic[{
             Automatic, 
              1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
               Magnification])}],
           PlotRangePadding->None],
          
          "RGBColor[0.8849417142857142, 0.6205167142857143, \
0.22512285714285715]"],
         Appearance->None,
         BaseStyle->{},
         BaselinePosition->Baseline,
         ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
           If[
            Not[
             AbsoluteCurrentValue["Deployed"]], 
            SelectionMove[Typeset`box$, All, Expression]; 
            FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
            FrontEnd`Private`$ColorSelectorInitialColor = 
             RGBColor[
              0.8849417142857142, 0.6205167142857143, 0.22512285714285715`]; 
            FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
            MathLink`CallFrontEnd[
              FrontEnd`AttachCell[Typeset`box$, 
               FrontEndResource["RGBColorValueSelector"], {
               0, {Left, Bottom}}, {Left, Top}, 
               "ClosingActions" -> {
                "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
         DefaultBaseStyle->{},
         Evaluator->Automatic,
         Method->"Preemptive"],
        RGBColor[0.8849417142857142, 0.6205167142857143, 0.22512285714285715`],
        Editable->False,
        Selectable->False], ",", 
       InterpretationBox[
        ButtonBox[
         TooltipBox[
          GraphicsBox[{
            {GrayLevel[0], RectangleBox[{0, 0}]}, 
            {GrayLevel[0], RectangleBox[{1, -1}]}, 
            {RGBColor[
             0.8816421428571428, 0.3161731428571429, 0.1649857142857143], 
             RectangleBox[{0, -1}, {2, 1}]}},
           AspectRatio->1,
           DefaultBaseStyle->"ColorSwatchGraphics",
           Frame->True,
           
           FrameStyle->RGBColor[
            0.5877614285714285, 0.21078209523809527`, 0.1099904761904762],
           FrameTicks->None,
           
           ImageSize->
            Dynamic[{
             Automatic, 
              1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
               Magnification])}],
           PlotRangePadding->None],
          
          "RGBColor[0.8816421428571428, 0.3161731428571429, \
0.1649857142857143]"],
         Appearance->None,
         BaseStyle->{},
         BaselinePosition->Baseline,
         ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, 
           If[
            Not[
             AbsoluteCurrentValue["Deployed"]], 
            SelectionMove[Typeset`box$, All, Expression]; 
            FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
            FrontEnd`Private`$ColorSelectorInitialColor = 
             RGBColor[
              0.8816421428571428, 0.3161731428571429, 0.1649857142857143]; 
            FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
            MathLink`CallFrontEnd[
              FrontEnd`AttachCell[Typeset`box$, 
               FrontEndResource["RGBColorValueSelector"], {
               0, {Left, Bottom}}, {Left, Top}, 
               "ClosingActions" -> {
                "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]],
         DefaultBaseStyle->{},
         Evaluator->Automatic,
         Method->"Preemptive"],
        RGBColor[0.8816421428571428, 0.3161731428571429, 0.1649857142857143],
        Editable->False,
        Selectable->False]}], "}"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"collapseForm", "[", "index_", "]"}], ":=", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"list", "=", " ", 
       RowBox[{"import", "[", "index", "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"fit", "[", "x_", "]"}], "=", " ", 
       RowBox[{
        RowBox[{"Fit", "[", 
         RowBox[{"list", ",", " ", 
          RowBox[{"{", 
           RowBox[{"1", ",", "u", ",", 
            RowBox[{"-", 
             SuperscriptBox["u", "2"]}]}], " ", "}"}], ",", " ", "u"}], "]"}],
         "/.", 
        RowBox[{"u", "\[Rule]", "x"}]}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"a", " ", "=", " ", 
       RowBox[{
        RowBox[{"fit", "'"}], "[", "0", "]"}]}], ";", 
      RowBox[{"b", " ", "=", " ", 
       RowBox[{"-", 
        FractionBox[
         RowBox[{
          RowBox[{"fit", "''"}], "[", "0", "]"}], "2"]}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"list2", " ", "=", " ", 
       RowBox[{"Transpose", "[", 
        RowBox[{
         RowBox[{"DiagonalMatrix", "[", 
          RowBox[{"{", 
           RowBox[{
            FractionBox["b", "a"], ",", " ", 
            FractionBox["b", 
             SuperscriptBox["a", "2"]]}], "}"}], "]"}], ".", 
         RowBox[{"Transpose", "[", "list", "]"}]}], "]"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"plist2", " ", ":=", " ", 
       RowBox[{"ListPlot", "[", 
        RowBox[{"list2", ",", " ", 
         RowBox[{"PlotStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"PointSize", "[", "0.025", "]"}], ",", " ", 
            RowBox[{"labelColors", "[", 
             RowBox[{"[", "index", "]"}], "]"}]}], "}"}]}], ",", 
         RowBox[{"BaseStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"FontSize", "\[Rule]", "15"}], ",", 
            RowBox[{"FontFamily", "\[Rule]", "\"\<Times\>\""}], ",", 
            "Italic"}], "}"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"pform", " ", "=", " ", 
       RowBox[{"Plot", "[", 
        RowBox[{
         RowBox[{"x", " ", "-", " ", 
          SuperscriptBox["x", "2"]}], ",", " ", 
         RowBox[{"{", 
          RowBox[{"x", ",", "0", ",", " ", 
           RowBox[{"Max", "[", 
            RowBox[{"list2", "[", 
             RowBox[{"[", 
              RowBox[{";;", ",", "1"}], "]"}], "]"}], "]"}]}], "}"}], ",", 
         " ", 
         RowBox[{"PlotStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"Black", ",", " ", 
            RowBox[{"Thick", "[", "0.01", "]"}]}], "}"}]}], ",", " ", 
         RowBox[{"PlotLabel", "\[Rule]", 
          RowBox[{"speciesNames", "[", 
           RowBox[{"[", "index", "]"}], "]"}]}], ",", 
         RowBox[{"BaseStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"FontSize", "\[Rule]", "15"}], ",", 
            RowBox[{"FontFamily", "\[Rule]", "\"\<Times\>\""}], ",", "Bold"}],
            "}"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"Show", "[", " ", 
       RowBox[{"pform", ",", " ", "plist2", ",", " ", 
        RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], "]"}]}], ")"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"getScaling", "[", "index_", "]"}], ":=", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"list", "=", " ", 
       RowBox[{"import", "[", "index", "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"fit", "[", "x_", "]"}], "=", " ", 
       RowBox[{
        RowBox[{"Fit", "[", 
         RowBox[{"list", ",", " ", 
          RowBox[{"{", 
           RowBox[{"1", ",", "u", ",", 
            RowBox[{"-", 
             SuperscriptBox["u", "2"]}]}], " ", "}"}], ",", " ", "u"}], "]"}],
         "/.", 
        RowBox[{"u", "\[Rule]", "x"}]}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"a", " ", "=", " ", 
       RowBox[{
        RowBox[{"fit", "'"}], "[", "0", "]"}]}], ";", 
      RowBox[{"b", " ", "=", " ", 
       RowBox[{"-", 
        FractionBox[
         RowBox[{
          RowBox[{"fit", "''"}], "[", "0", "]"}], "2"]}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"{", 
       RowBox[{
        FractionBox["b", "a"], ",", " ", 
        FractionBox["b", 
         SuperscriptBox["a", "2"]]}], "}"}]}], "\[IndentingNewLine]", ")"}]}],
    "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"numSpecies", " ", "=", " ", 
     RowBox[{"speciesNames", "//", "Length"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"tcollapse", " ", "=", " ", 
    RowBox[{"collapseForm", " ", "/@", " ", 
     RowBox[{"Range", "[", "numSpecies", "]"}]}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"scalePoint", "[", "index_", "]"}], ":=", "  ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"scaleColors", "[", 
       RowBox[{"[", "index", "]"}], "]"}], ",", " ", 
      RowBox[{"Point", "[", 
       RowBox[{"getScaling", "[", "index", "]"}], "]"}]}], "}"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"points", " ", "=", " ", 
     RowBox[{"scalePoint", " ", "/@", " ", 
      RowBox[{"Range", "[", "numSpecies", "]"}]}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Graphics", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"PointSize", "[", "0.04", "]"}], ",", "points"}], "}"}], ",", 
     " ", 
     RowBox[{"Axes", "\[Rule]", "True"}], ",", " ", 
     RowBox[{"LabelStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{"Bold", ",", " ", "Medium"}], "]"}]}], ",", " ", 
     RowBox[{"AxesLabel", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
       "\"\<\!\(\*SubscriptBox[\(S\), \(length\)]\)\>\"", ",", " ", 
        "\"\<\!\(\*SubscriptBox[\(S\), \(depth\)]\)\>\""}], "}"}]}], ",", " ", 
     RowBox[{"AxesOrigin", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"0", ",", "0"}], "}"}]}]}], "]"}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.7816869106582584`*^9, 3.7816870141506*^9}, 
   3.7816870477993813`*^9, {3.7816870964527917`*^9, 3.7816871427360063`*^9}, {
   3.7816871751561956`*^9, 3.781687219323243*^9}, {3.781687302245985*^9, 
   3.7816873970322638`*^9}, {3.7816874289728336`*^9, 3.7816874707172003`*^9}, 
   3.781687543550515*^9, {3.7816875822237787`*^9, 3.7816876379420013`*^9}, {
   3.781867675641843*^9, 3.7818676784439383`*^9}, {3.78186771779523*^9, 
   3.781867746396245*^9}, {3.7818677895490603`*^9, 3.781867829459176*^9}, {
   3.782051638594734*^9, 3.7820516682275767`*^9}, {3.782472403276128*^9, 
   3.7824725970555677`*^9}, {3.782472630576937*^9, 3.7824726877042336`*^9}, {
   3.782472836799787*^9, 3.7824729739929247`*^9}, {3.7824730299545264`*^9, 
   3.782473080881687*^9}, {3.7824731215060797`*^9, 3.782473123568592*^9}, {
   3.7861918271052713`*^9, 3.7861918575726843`*^9}, {3.78619199022266*^9, 
   3.7861919926595926`*^9}, {3.7861920268487387`*^9, 
   3.7861920366123085`*^9}, {3.786192378080141*^9, 3.786192394846327*^9}, {
   3.7861924471113462`*^9, 3.786192448633301*^9}, {3.7861924798325586`*^9, 
   3.786192496627697*^9}, 
   3.7861925915361495`*^9},ExpressionUUID->"b01b2d71-d03d-4045-a1ba-\
22689d27a6a8"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxX041AcAB/BTqxiaVOMR6T1C8vJUzsv3TC1ZnouUpY5odlI3XEKcl5Ur
5WXOXYXyFnFbNI70Ju93HHc/7+53qaWNioeQvMVq64/P81nvF+Tuv4hCobj+
78vKrXk1VcaODnpfeTz9Mn+Hf34nxxAaBizxsyhDLLdkLyRzzMEXTTpnR5pD
JpoVnuYAGa4sl6QIwGTSNtaLQ8ftJ9dbbobS4cVnDLtxfFBaHn+l+4wP2Cff
5bhygiC3uPfanRGEmNbKyB84sVg6VaR1xCEW30fHBRYwU+FVWC09vikVvSzz
kBCfdOhvTKCOtdyAQisvPUsnF9opUQf3muaAO/TPyu88CnBcM0cjh5sP5x7B
gXhnIQa3fpNbsr4IcsSuu8QrxhPpYV323B+YFycbOZ0shXDD+6SAknvInEoz
TDsqwrN31nbPVMuQOWA9QIusQNrd294jvSJsfpF8uTqsEs8rl1esjanABQmO
2p56iEpSMu2xuhK0oJRZnUuPMa4x81wgeYCE9YKwhpgqcOvvjEndH8GCv7Oe
yKvG0IWPSzkzj9H7UTf7DKMWycK6pMzEKpA72C5KzzroC8p/S1l4ikRJxotz
zHrsuu++XTu+Botf6ffP/dSA7MMOaqWhtTA59ou0JLwRdb4sgcKiDlWuI/t9
uWJ8sLTy1X5Th5Visc1CnAQ7qdzEjUn10LvF0mriNUEQSI97Sm3A65ngI+dT
m6Gnw2sUKhuwRpZrZXJVioFVtO1ZIY1QoeTMaGS0IN1wichIW4zih7Pbeq+1
YpbZEzieL4Zqx7q9bUUy7GY/vp5gL4Hc99x0U4Uc2+5sW/ZXmwSe4Zt1hH8S
MOtvsz/h0QTeSP7ahzVtKLRzbnrysgn7J6tbFN7tUMt1LqtmNCPatN7tUF87
ZMaRq0J7mnH1mqnsZ78OBFKim1cckmKuds8nVn8HnLI/6To2SkHTb9yoeaoT
CRz1vDRqC4ZtJii5bzsR4XNndLygBVJ+xe8i/y6Ixs2mGWqtiDN4uZcx2gWv
YD29+ZBWZJx6kDF/uhtu3vMHU9takTg43W8x1Y0zwsKClB0ylGXJJt9E9cDd
aKiMnigDVfdgNW+uB5pXDGRzfTLcrKdyun7tRWXQ6vDV5nL4mHdNqKoo4G92
7rMgQg5PUsWqOloBmuaPf8uq5NhadoOpvoREQcCut/GLCHgd6Dt04CKJmMX7
gxNBQOOw48o4LgmGCkWHTyNQwyjqLL9MIqvZMDjTkcCmoLNua5JIOJVn2Aid
CLzjqdOHBSQ2z4UZ1+4jcFFh65JQSMJ+n4Lzik6g2O8WrVFKonZk+/shHwLe
pxdRZltJKL79PPjmBIEVoQE1JgQJt693Jw36EgjjWjvwO0kEuA6MvTxJgCaU
2fr1kTDds2VVB5NA9+jCTsooCbUP9PaCIAKXpv2mrcZI2FUUD2cFE7D53Hyf
OUGi05794HoIgWyta9ZtUyQ2lOwKuHyWQICVmWX2JxKeC3e3+IcT0LPjT3RQ
lEhfRu8+FkFAvmeudMliJeyee1m7nydgeURszlqmhPBVsbpDFIFBb5OxXDUl
2NqTF6w4BNKZvHvd6krc0rhdbBRNwCV4hqW6XAnj9kcJBjEE/o1gmNlpKaHD
oOpoxxL4Dz5kY44=
          "]]},
        Annotation[#, "Charting`Private`Tag$78117#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[0.857359, 0.131106, 0.132128], PointSize[0.025], 
        AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.017638545767691843`, 0.01712435935961535}, {
          0.03640274231941892, 0.04115095092088401}, {0.059930853796436805`, 
          0.06283130841816871}, {0.08467507013834982, 0.08104480327728449}, {
          0.12474622795931142`, 0.10949092298592362`}, {0.16244547877105625`, 
          0.13795803807768578`}, {0.20609459801270053`, 0.1640684214139023}, {
          0.24619590719394863`, 0.18905817617593407`}, {0.2839956625399824, 
          0.20600407477900468`}, {0.3206496661951232, 0.21835198447816037`}, {
          0.35726346803654857`, 0.23530838077279245`}, {0.3916159178564749, 
          0.23961243431298693`}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"T.Bicolor\"", TraditionalForm],
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVkHtUkwUAxZmhB5UUNARXQmqe+UqBnCCpV23heITyMMQIS1NAPJCBmiCP
FG0ox+mUXIbEG2VzwMABbozX2ONDx/bN8ZyAzkBxgGGAQ5Hwj3t+f91z7u8u
PRATcGiGhYXFN9N5z7bQxI10O4+tntb6L94zf/OAct6gPfqX9PCSTfa43ZKc
1WmiQVTsFSl5QcPaP73T6kxu0O+XLk8dcMPgZElSuWknNNdPVnk82wm/0gNm
vikYRUPaY2JjMJJmS0S3TeFoYsfz5Z3hWCSKsLtlOomq5qaZT5QnoW9MCN4y
xEK2C885PZsFdSCnbME5Dt6K3KWB6zlgfHh6199xXGQcu8Km9lxH7DLZ2NjT
LPi4LPYNGbuJy/HSd4WxuShfR10apcpBoy0xy/1uAV6xHbxvqPJR69u7L6P/
FsrLB26cKCtCQp8gbOQJD67LmBsdw4qxULC2v8KxBOodYlqCxx3Qj5SxxbZl
4AoD2qWGEnzdotWeSReid2zcN3ZDGRjNXq2naRUQO7C2+FwRInfspnCs8C4u
8n4JWkGWY6jKyz/PsxKyh6Px3SvvwunBhJ2ouwpRn6W7uMaJUGrDEjK/u4ei
rpQfb+ZXYv2Lo7bzXouRG5EoJZ5XYd7o58zAUzWgu797nvnRPXRleG5vptYi
rzN9k0+gGJ4M19KgfXXIVvLSps5L4LenhHd2cT0EyZvdY3JqoHbZa3X/WT0u
XIt/kqmWYnLF8O6g4gYwxRPGhcZaODWy+PMjGpHZo49qPVGHqjV+kU/pMuj/
LQwes6wHhU9ZYB6VQcX+gL3j93rUj/d+TJM3Ie5V6blh2wbEmhrcWRw5VMcH
C3673gD9a872Vf4K7HhUM07YNkKgucQzOinRRf8+pO9qI9zqfqV09yoRzjgk
mpojg3DvoSNzs1RwX1iouZgoQ74kcUNAFIFY6nld2LgMnu6pA+2rm8F9Scyv
PNyE/ckiyqmJZqRGGXRGQxNWdrdahkjuY37NW5OBKYfxHzP1aPwDqIf9rZJK
5bCrZnK4TDViNoQ+DndUYDzv3Kjl7BZcce57UXBGgd37hqovdLQg5tMBdbVJ
gQcGvnJpoAYMF6bWK0AJb27I6iyhBk5lFbRqgRJnN2VuplG16O7qiYixUeFa
n56hiddCssq53ydSBcdnl1s5HVooLKyCXaUqHGx57HBgGwnpHrrvQ3sCKQ2r
/P2zSfQx5piXRxI4nGRRMplDgh927WXaEQI+Hm3WxXkkTB3+4uHpHxYJU5Uz
iki0/3eYuBdNgJ/Tg4o7JPZLzGq/OALtKRnr7MUknDn1x6KTCTiDYv1IT6Jr
b+eS9Izp/pu2yLQ2EuocTYLpDwJvRAIFvYPEJt8Jvi+XgHxd6NlLBhKJTf0s
678IhDpWTsBIosJrDe1CNgHW5NHnuS+n93KDJk/zCERXf7Vz1wiJaHPKpU4+
gcDj1II3r0j8LO4dcRMQcBxU/BA0TqL3oAd9pJRAhWFZ+8x3JGI8v83+SUTg
BtdMF06RaBQuaa6rJJAcpLkaRtGBneKg+qSagPf9xF2VljpkbLu19aF42ocV
dOfgLB3UrltE62umfRhr5tpY6ZByfiblopTA2ylKpGS2DvwvKU59tQQei9vl
EXN1CAhwttleT+B/gUmCiQ==
          "]]},
        Annotation[#, "Charting`Private`Tag$78263#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[0.471412, 0.108766, 0.527016], PointSize[0.025], 
        AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.010343991054092054`, 0.015297211963479709`}, {
          0.02390683664722111, 0.032592823842032145`}, {0.03619256586453797, 
          0.05121500584058466}, {0.052280322659846994`, 
          0.059878299112179706`}, {0.07546389442076629, 
          0.07586122606522473}, {0.09930557206922141, 0.09516698686957444}, {
          0.12957192699599768`, 0.11581213489653293`}, {0.15406845258205057`, 
          0.13777637640030316`}, {0.18625374002248357`, 
          0.15709602239914566`}, {0.21714887928735105`, 0.1750848259104517}, {
          0.2454832699007174, 0.19439806335798987`}, {0.2705727423755402, 
          0.2063980756753823}, {0.2975713735142049, 0.21507952650900633`}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"G.Fuliginosa\"", TraditionalForm],
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVymdQkwcAh/EExMqw9ZxUAgIeVEEEtCiC5g/Xa0WGWgWsoJYhS5C0GpUh
WtFDKuIoI2EpQ2qQEyk77JBBxhsZIS+oTMFqOCFtaBtAlOqH535fHosQxqEw
HQqF4vOxT449mfs8m0mnF3wVYPjJvLz4yBG1CexHKJ60j3KSfC4Xq22xgkPd
R5u2RUVsvcE1tStGAoUPLrx1hWNETDdT7YWUPjvDYyovnB3/bvtpdSCO7Gc8
cR0PRKZFzckodTRcUx6FLu2PxoP2U0kR6kRYGr+/UtSaiKMOrm62tHSI++NL
6FU30Xtu74uR+1l4cUmxY9YmC6yLkhebb+VjkLBWHujIQ6M+3yRavxir/2ZG
8MKLMNfVl5KaVgp2y6L3TyUP8M3w1Q39P5TBTWhZnbuOAxp1JDds9WN0Jhzw
yDpdjtCuurKhvZXY3sm6nZdUAXoHQbOwrUINNd9Bf6wSyWcubvWYroba3uux
YXAVltslO97m1OJcq0V9nKIa99L8ZbGp9di+OLGl+EQtWA8Futs8uBAEDL7U
ldQhO4KqSLdrgnmgr1zl2YAhx8wMfYMWeDSd1OW3cnGT266JFLVCrnc0Y/+q
JhRqjjMdfNuhEe5QP0tqhn0Eh27mxMPDb8f8BiQt4NkF+A5s6sBu7cLrfJs2
nJ+rC7E05sMoPKFwht6O0ZIgtxNaPjLW0XeueN4On8Kfo8JVAlh5+/YQl3iI
TewKDpIJ0Z3VUBC8pgPVgQOHJjkimKezhuZLOzCf7nHbLacT7ODDI+fAx3/3
9PJS48X4rdho4YqMj3+pNpr8GAnoybPxih8FWHdqzt09UApnXffKqSkBpivX
BPfvkuHGo/Egf4YQ4n05sl22BCb9WCr3WSH8eVF6t4zkmNhTzxhkirCM/mrn
GZUcFTNHaihvRWg2EtdaPnuKieQB48moTlg1anWEDV0omlUPuQx2QnKsU57j
143Wt097anzFeObFpUpF3TDkvTHW8sRIbKFs63DqAfsOpc3QRgKzgXfXzSt6
kOmU+f4GSwKTkALhBbNe7JrIlqbNS7A+S7PJid2LtZrzNwJCpCj3LEht/EIB
Sciook0gRTZjusv5sgIGUbnHT5rKkLxnZrfprAJ9Di4LqxJkECfcuzsf2Yc1
B5+nhsplKHS5//J+fx+o/qHzBjQCCSWHj5YfUEKklp5dPE2gIrGi/kmbEpTj
L+941xNgbDz1qoSnRKLzGdXNBgIOMqtVbL4SlqqpJXIugar1BbG/dCqhlXCu
eTcTqOWmWX3fpUTjr1seevAINGsjMzTDSpRRY+KcZASkZzcynD4oYa2Qeo0N
E0gzGcnfTCHh4qukrh8l4M3PlZrqkLj4SJZwaIzA05UrrZcuJZFCJtZ2jBPo
+YMyRC4nUbVl0qfwDYEB9ZBnnCkJZs8Hg4MaAjmsnLiYDST8S0XqazMEAuD3
e5AFifD9CSzuPwQGbxHUfVYkDMxL7S21BEbtmhq+tCMRw1t29a93BIqU5/9c
bk+ihm5/eeN7AiFJ21brOJKwuetO9/9AYIIoY0x+TSK/drNeE0WOUmZYwfAO
Euzri0ZTVDnCaRayXmcS7Vt5/Wa6clgLBmdFLiTWlseGHVwix+totnXT7o//
wmd1V/Tk+B8LQ3D6
          "]]},
        Annotation[#, "Charting`Private`Tag$78409#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[
        0.30244114285714285`, 0.13298085714285715`, 0.6794237142857142], 
        PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[PointBox[CompressedData["
1:eJxTTMoPSmViYGAQA2IQjQ6qPjS71O7rtO9bEHVyr2C//RLOi9yT9s607+6q
89scu8B+rUNcWvv+RfZrhP+G2O1fZs//bOL/v8nL7K80KrG//77CvmH7xIgo
yQ32K5haJR+2rrOfGbL9AN+ULfarl/+cU7B5s/2Lz4ckFh7fYb9lOl/b7Cfb
7Bff1dh9s3+P/UEP5q8eKTvt3xj9v7HFYr99B/uSfyLse+yvnxOatYfpoP2R
rxU+b1bus+fmqPgyi+uwfYBY26yTtw/Yn9VTNGJafsTe86Dy+pBnB+31dgTr
sB08Zm845+i7epHD9vwrAk3WCpy0L42e56m29oh96K0HMsIrTttnMeu+jM48
Zv9eN/rm0cBz9qXXK25/bz1uP5GDo3dX5AX7wypyMtq/T9hP/Jf6omvpRft5
+kfavvmcst/LJM/pbnDZ3vts6/Pv4aftJzQYu7EfuWLP8lNYr83+jH32RFO9
3TbX7OdU2RzOnXjWHgD8Z6fU
          "]],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"G.Fortis\"", TraditionalForm],
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV03k01XkYBvAkTXGTrZAmUeFUU9cSJ9uTpZI2dMuIhKTRgoSUpaGSHNSE
ckNEtpFLQgpZL7ku37Jcuu7PmooGpeY2bcyvP97znM85zx/vec95NTx8HY7O
nTNnjis9PzPx3uEdu+OtzTfHK2z7mSksZU3tPk2QD9HOgUJNiOpCpWaEehhz
9Qm//VIPocEbz44JLcGS0fDV7LUEv3MBc0DogG27v66x73ZAQEQgQyj0QAXX
a6aaeMCmt+B8j9Afw8WpnumN/iiRbNYVCCPhPO+RjBcnEivO8E4LshMQ3rdA
g7U1ASyTGdkBZhoOCmKUe51T4ZqcUv1jaxbETG1Hy9hMTM5OH2U45YF9LrEm
i5kLcYdfsfeSQpTW6nWE+BTgVEtieZbaA8RlNv83NlGE+wEl0bcyHqL6aNYu
F/US5O4fKdD7WoaZHZwuXeVSyBXqLoiPqsClb3mFjN/Ksck4oez6mycY6zYS
lilWIFeh/ECyaTVmL+8OIaOPEeUuZro11mDwVoGFcWcl5D+u5hyTq4O26XZF
pcRq3PQ75DbrWA/WXrPl831qUJcQFMtmN0DK4/O97exa8OxV3a9wG8F0DEGq
Vx2kW20duqWbcK7MRlEN9dAZkPonyLgZXLfZ806SDQjj7M0MvvgMHYOKLvde
NCB41fmO0KYWsGPSttYmNcJBf0NB10ceVq56xvt3GxceM34ZscZ8vM/Td+ia
0wR7TzPz5BNtsPHjPw/Na8Jr3/H9OTfbMT7/o6zj9maUGGrFKPURFBdO3bkw
0YwN/ED9d5eew+DSLpWGyGe4I1Rnftd5ASXl4UmjFS0YMnniLct7AdmdGoWn
i1uQeJx91tatA/1O67zV9XkYFtckGEp2wmbjGanUJzyk2627tCulE596ToSZ
6reC+SPqwRFmFzIUhMkS91rh/MvaibUdXQjWMes3UeFD3C//Q827G5oLjWbG
wvlYr2ShVs0QoPGBYMWHN3y8WFq2KDpbAHNXi4bl1m2wPalqxjLpwXuzAY8P
yW04pM49/5zqwcKhlRUNk20YTC+LDQrsRX7RU1XG5nbMhE3c56u+xPWEqqcG
F9sxxVkivbryJf5YIOPI5rbDrjDSJNteiD1x4TltP9qxa6FRiOCTECzpWo0L
BgSP9JjXdOP6sDSo9EKxO4GYozoYpymCFnOJTng0gav/Tfmla0QIqth9ddlV
Au4mRas72iKU3pq+WE47sYqRw1kvgvhgxNaJGAJd3uwJYihC8qeSL/vjCE6O
jn6W2ymCfYCXltINgmG1ksWJZ0RgZ8v+ZZVCQKJtcbtRhDBypMDnPt0/rKLy
uUkEg8nm+29pSxu+fr+vRYQquT6WRyGB9UhE5qJ2Eba4y7JZHIIKs8dSET0i
LGPmfzAoJsic1uYfGxdB6XLRyKuHBAEuUk6b5CisZMzyJCoJ5PU7dW8oUJDK
tsr0o81ZeFd6SolCpYXRygHab8tNq/JUKaRFrZOrrCI4JB+gvnwVBV1zm1qf
pwTbmoZH5xpSyPB0cOfWEagwa/2fO1NIis/P2fiMwDYsPuuMK4WYqdzRO7RD
eS5dS90pvMt3KlvUQjDk+WXTIS8K02t75o/T/put92XMj4Kyq7F/WiuBqWT2
BckoCqXRd49PtRMcFlyNNSymYDE1PYRughurfq9+WUKhMczF6C7tRj+tydAy
Cg+Pnvt1roBAR6Zhb8MTCgKLtpR62u/xXcGOS++/jnIz7yWIzPdhewspmNWn
MTToPykVm/IYFIWoN6anQmi/tpL5VjRAwdTrmms37Z39uS7iVxQmfPd8vCIi
UFIcUr84RcGz1GD0DUXfw63ITmuagny2T6t5P0FwYVhEyycKa6ecLZNoU9uX
jSz+SiHzmt3wlgECuaS3ig+/U5B47Shzk7blcLn1gVkK/CQF7jjtgI2XA79I
9EMy/c/FGCTICd2XkzqvH7kSmeM3aP8PrX329A==
          "]]},
        Annotation[#, "Charting`Private`Tag$78555#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[0.24882857142857143`, 0.264202, 0.7825611428571428], 
        PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[PointBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQjQ4O+qSsb3Rpsl+02nL/dfYJ9gUBffuty2fYh55P
/NnFMd/e26sxfOKLxfYH1j1VYPiz1N6ucLGIFfs6e55VpefDLqy3XyIrlvPH
f7P9uT+FOxPaN9tP1Vopqd6xw15xbRKX29vt9ibHZlqxztxrzy0jz8ZntMc+
VjZ/YdSEg/ZTPYWMKq0P2KdwWpZcczxqP1V0uapK3CF7trMiPUsXn7Av5d/6
O3LTEXuPX8daFZectt+7Mud+V8Ax+8LtS94c0ztv7x2mvL5K4YS9s+7dssCW
i/b/N3Fl1344ac+ucLi9qvCy/VpDj4hHfaftBR1fRDubX7U3UFrdNe33GfuL
y2tqZ3++Zj9Pa10KF+s5+6f1m7Udrt+wf7JV8uWOgPP2gjJSu1fuvmWfvemn
IMv38/a5Sqcaipru2IvOFu6Ndrtg77141oY5LPfsz3xtOLMdyAcASKeYVQ==

          "]],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"G.Magnirostris\"", TraditionalForm],
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwdknlMkwcAxYvCPMoiDhCpIJRhJmg4hMmlvE6L8+KQiiyAs8Is63DCokyd
OCQTheJRWYgURM6h3IoiRbC0UHrQ9pPW0vabEJGx4sCIHTpRkYztj5dfXt5f
v+TRk9NjDy2gUCiR8/mP4bbXm5yFX4RXuXg3/M8dZRcpX7jDpGJlZjHcwXnB
dR1m+OH49D6LHn5QMGIOqRgMBDLrl3eGM/CWuzW/hxGDw5zj5spNMbgyt2mV
iMFG2KTn71nBbAwrQsY6GRlYWpTPCfHLwEIfoeI+4wy6hUZtm9sZBFw7ym6f
4qO4KvO81U0++IOmRde8BHgaXxEcW1AMt5kqycqyCoQOmqyc7CvArHb6ZHS2
BkwvcU61ew2y1wYIXy6vQ4Bke1GL8QbyVLaW0z83Ib+j6jBP1YAy39dK/8lb
8F6TN2MWtCCHE7RNbmkFbwdvfJR3G7sbTVQXzzZkCykJ3ofuwONAZJa9fzu6
OGd+DXZqw+6lUnp7QAdGd96eKBTew36pwI6W3AnjG/rbLceEODm5pd4t7QFy
fgmob1pyH1n0XRfHyruxnH0gTt7eib9u1Ou8/xSD053+W8HeByjJdL57d1yC
cUd73lKNCKL+oNDVlF54OT1jOPqI8a2h25G0kaLO+tI76zExcrlvio7S+7Du
vHgio0YC9UyL31iQDOcNW74qSuqBIFznXhsmx2rt4kqadS9Iak3bl3EKWLvS
KQ5tvSi//KQ8NEmJLD41whInxeVl12oWft2PU8pkl4tTUkyvWBzVmKlCkcPG
9NIrfRjSD++u/UmNGP9kmzxPGUJoKS+zizQw1NMS7btlECdym30bCIQG+qXY
xsqhZpESv+aH0GbGOo0Z5KjlznblpQyA1lflyUpWzHtIeivNAyiM9i/4dEQB
iavMuCZVi6Gp7DlOvBKF7zxEgr+12MpaMMHQK1HbGhh975gO54JzjJnMfhzz
ud7aY/UIwT17Vx7p6Edubpf4eO4jpIxzypkeKjQkrBq6+pEehVF78l+eVYE3
rVXeKNTjoP2QcP+kCo2pm5PZjoOwmzG/r96mRl45RbO4ehCtBRFpxho1TsZZ
R7j4GFAS3RtyeVaNJnNXqqnFgF2vfF+579SgNEyTdHaTEZstd6yKBRqo0gpn
Td1GhExRR9OeaGBHK64rZpgwsz9ySulGYNmF12u3q01Q6DTvqQcJ7CEXsSqi
SNRzS6drBARe/Fi4zxxDIja0DcUlBHgOrgnrWST2KleFFJQS6InecFAYT4Lr
8TAgo4xAoCwpfYBNwiQmtm+sJLDyzu0CylESkmZ/S+tNAiMXEqXsqyRkUefC
jrQTyPI2y2sFJFQTQf7xQgLOigzV81IS6yM26tFBIHbhOd2JChIfAp097DoJ
SE/eGuHXkRilnBhuFBG4ybH5IO4kIdwh0Bn6CDCt+ZRFIhKHVSvK7ssIPJ1/
WaSYxCnqU4frcgK0YV8qKZ33kyXafqMkcIGV4GzRkNjpNUF7riaw1jLmEjRA
YrBME63REOi7lO5+Wkeia+CDfzNBYE559rMlRhKCH5hzRwYIlKQuWxdNkuA/
SXgWpSUQZFPiU/SYxB9UUbaPjoC+ynPD4+H5/Z/vpR8/IpDBaPmcPkLiavl3
957P938Bd+9lQg==
          "]]},
        Annotation[#, "Charting`Private`Tag$78701#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[
        0.25352657142857143`, 0.4149942857142857, 0.8102747142857143], 
        PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[PointBox[CompressedData["
1:eJxTTMoPSmViYGAQAWIQjQ5ClU4J8OtNtp/49MsE32dz7e+1qSrN9Fhuz5uj
8eZo7kp7izXq2jcjNtkvOu215aTQZvuPvHK2PzN32k8S7cgK4t9p3zRlSt/F
Kwfsl8vKX537Zp+92MFPqzTzj9h/uSnZZPL1oL2707XK3Mjj9reWGH6+3XLY
fuuu3Ki+WafsVQ8uirh/+Kj9jo0vX65edNY+v/SJXXPycfugOM6jTb4X7Jdf
Fv35Q+mkfer+pXwrRC/ZL9G2zfi26ZR98buTQpuqL9ufqj9m1ud0xt6y/eGN
aIGr9t8XyUe8Czprrxwdtu3X3Gv2F43iDRqMz9m3ppneFOW7YT+RS6TS/so5
e3ffbjvFBzftz0cwmQa2nrf/sFdJNYe/xT6D111wZuEEe3Z1pWtxjAvtZ72+
sGGi/lL73vmSQt9V1tvn3sp7WV6ywR4AFuiVhA==
          "]],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"G.Conirostris\"", TraditionalForm],
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVkn040wkAx0mZoaJdXWklkcLqnkudVvhmTTlxKT1ZzUOckzoVsuZmk9Kr
JC8nPL1pzHk51J6kvGWYZn4/5u2XFNWiq6t23ZOuVcPVH5/n89/nr49d+MFt
v0wxMjLy/8JXfwiqJS53enqyudPav/pNQ4KvgMOE75HGwgovJhIcPCrcOCxY
dedElqxnoTHo6vBcjjsquxbwPnm6Iyw2QEjn+CFWZBNLrPPDyomSFmNOMOoc
zRtPrQ7GRW7/y3GvaFwvixilO0Wja88rw2cvMfx87n9iWInBD4t8sCbuHNiH
okKoaefAi4iREo9zEG/v0bc8KgdScUp5tvYSWJuHBePWlxDHpXXVe0pxbDxh
YHPeNUxnH2SxO2RoFb3prh8qQuHS7InWwlKUj4pDZ/FLcMYsfG3wvgro7Y9X
3blTjrFyp/0TwuvoZxsUad2VkAYkC6ndclh+dKhgzLyBc6wXrq5ON5FM42fV
Z8lx9egSWc6LatxOE6nyzW6iqrdJM0nWwMctdfaO3GoYgvdX6rLuwDfFs+6v
qTXY9Ey4cVRSB2bs88m5qbdRqw3KfhraAOJBS/pU41rsnfdjVrjdXcyp3czz
4dXhrCMhExxvQo9F+rYrynpM8sV8wx4FnixYLbf+phHvzvN1J0OaEap33rlD
eBeiZBn/94AWeD/cekEQ2YQCS71dxMpWqEq7jTKnKOCd+5vSbakSshn58f4l
CpxuMGkmLdpgzy9724AvnQJ93vNXbRiim2cxu5tRfZTpb/L4HvSS0fM7f21B
6YTPLq1CBT3DW03Tt4ApKuIqa9pRocsOGUtrhb18H92lVA25ycjHzPlKqE6w
lwamdiCixDk3/LISr4PcFh9JIpCZJEguc2xDldLj8P5wErcWVLFOF7bB9G1l
0bBXJ5R7B8Me2dzDo7lbrgeu6sKYRt48mncPJbrEVG8LDZ7nz87yslDBTrPH
5dkJDey3NhvkKSrsm7yvD9NrsPGDDX3wrQrjaRJXaVQ3Dgw26RS8dnTl1wZH
aLsxGDon2qBsR8xYopy2vQdLMhWMsmVqbO3s+4/V1YNFMmNz8ww1xKY/lzB8
euFe9FPBm3/VOJwmOPnwdi/k6BWZ+nagKtM2cIlrH7K+c4V5cQdqRvz9AmR9
oJmHrCrWd4B+4YbcfXY/ZkXXS89uJHCx7U9aeXo/FmVqUvJzCRi4rDOfJvvB
qa/NMTwmUGidLBkzprDG7VHVmqcEfId7Y3UmFGK2J52N1xLIFSbu0tIolAm4
p16NEFhZpnZRz6TgHTiQQb0kEDVzb2e+LQVG4sLXBe8I9D+QMdigYCVxaDGl
kRAXf6S5elGIXr9r+jozEosP+RtYGyjQi63mHaSTiLF8P7JoE4UZvMl4yoKE
Jbi3zLZQWB804im1IsEp0vIGQiisbSZsVtiQeBnzg3/PburLX5aSkPkkMjxS
vYhwCnmuZEE6k8QQ9b1zUySFKSs0LN1CEgn0o5//OEBhomFoR5k9CVuq759r
MRSKaxYrBxxItEmXjVyMo5AR+GLM1JEEw11DnD9MYXnc+7zwZSRqzRwUZxIo
PBlzn57hRGJ3v7A6RUTh/rxpGxqcSdCkHaUSMQXrp/5r/3YhUXnA9oowiUK6
77fv5iwn8T/3SV1n
          "]]},
        Annotation[#, "Charting`Private`Tag$78847#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[0.2888631428571429, 0.5431845714285714, 0.7666072857142857], 
        PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[PointBox[CompressedData["
1:eJxTTMoPSmViYGAQBmIQjQ4U525TCZjfaz/7dOZ0cYNp9muE9rCYn55v31f5
K55daZH92eoO272Plttf/SjDe2jjcvszDsofok032q8oqSs9w77RvqL97xY5
g632V7Z2fLWV2mp/6Km1wutPO+0zd8taKf3bYS8Zfv3n/aj99n8rYndyOu61
Fzv3bmdD0iH7rQH7lFqTD9jvSAxKOh151F7pw6Lj0XaH7M8a/880XXLC3vGY
iG+V5BH7/fkPD259f9r+fOC3CNVpR+3veipzTTl8zl6W67DBMd0T9r83Hzb/
d/SCPbMSm/oWlpP2OzQir/avuWjvKxE3QaThlP23DSZL+r5fshecLaIs2Hba
Pn62Yaq18xX7uQeuxf4VPWNfx6zdVV571X7fzR18VcZn7RXFLi8tr7tmH7NX
gstj9Vl7ALwhjR8=
          "]],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"G.Scandens\"", TraditionalForm],
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzHk4lAkAx3HZVQlJVFpMWleOtOuoVjU/WY8kR7J6aDTK1FpPqNRYOTdW
x9NWNsQMj6JVs+1aV9KwrjHjmDFvYxjzzpA7laRxVGjT1h/f5/Pfd2PYyQPH
1dXU1Hw+9VkX94FLqf+4Uv+uqrjwWTvTfScb2BSkDpd5yFgUlP7nWpXItgcn
b2kkJ9ceqvEdQTQ2FRZbm8QVN6nQC+P+6cX2xfaPdfnzN3xRaBJ3wI1NRwQt
wfX2lU8myC2p7Gh0zslXLCRGw8dmmd5OdjIsLNWHKkOTUeL94+Xqket4uM8k
gnXsOqJnCsLPlOXAq7ReYmWeg4zcOm0rz1uYks2x0gIKkD3VcM6bdwcq9epV
6z4W4Tc/er8N+x6I+Ju5RWl3Qf2FYPzE/wuLGh6aY2738dY4aNyxtxTnHixv
Ew6UYPM53dNSWTnu7rUf4+aUYaeYluTyrBIrs8xn19IqUFjn4caUVcHKTE+z
fq4Sy4/VL3vHrYYqP+yqxsUqiGcKDnNaudC5bcHX2VKNZxsokXYVtVBVndcy
qnyEUOelWoOCOkTzpgJj/GqgVEu4r3zcgNf/9kwpe2sR6LRnyQ+9jegRZdJX
etRhIiSdeWCkCTFzKOW21KOka7VHjYKH1L5HF7X0G2HS0N3PHW2GjGTOfydu
xHWNJ+/6xvkgdqnNt6U0wZbtFBUxIAB/sXQk62seYu803r/6vAVDxWPMtwQP
Ewt57kaDrah5n2SoGdkMRkkdvUPahprQ4Mxj6nxc7tbfvUbZjsRhKuN0IR+K
vdyU1sdCjM8dttVxEIB0zLygpxTB3dewoEAogCKuUidloAOn1qe5fBvSgi+1
zaYCu8RYjPVdvXWwBf36rfn8XgJnPQM27DnRipGImj/ypY+R+dzRhfqiFUyd
+LXeYRLo/lxrRjnaBj/T8vrspxJMGtdmWQ60garUXWNwpBNGI4606f3tSCcu
+fWPdoI4w/7Vtq0dQxHW258ckUJrVkHLdxSi3uHVYJRSirVFu2x8WEJMO4ui
vOhdqJx1u3PhCxF2DEo4NEUXylhL1vSEidDHV7U+ondjcsLBaVogwmKP4717
Q93g7AhOXGrWAeeMAicRTQZ6cDjDILYDzWlmd10GZeC9f2is0dGBcIpE0E/r
wVOLa/EMQzGujN0qNpD1QLOOpV0UKsayF5cjbgbJ0W5y8PAAR4zcG3m93l1y
SGXUD+EvxMjeHS46JZPjRLmnKGVcjBsqh9osuRwzwxr7c15++vkK2X29cnTu
YScJXomRvGI+OHJUjmZD2wjKtBiM1IPklTdypMsnzvMWxLCP0ZMJ15FIbFNx
u7QI2Gx8wp9cT+LD0eP0YW0CVhLOg9XGJKL8r3JVOgRM7V2zDpmSMHZ4l6m9
ioD+eHTA+CYS5QsOClcDAnNHOzo1XUg85HgV5xkTeLMqt2nzThJ2hbMPik0I
TDcwyv2pJH5/7Z9QSiHw0uR9BsuNxKZrlnY8UwL9Cuv91vtIXJNuo4yaE1Be
egMfHxJJ8YkjLy0IyLc1bTntRyIk7mzojCUBSXaQLjeAxDNmcsISawJid/OP
fYEkspgZRsttCAhnXk+qBZH4RhQYs9KWQEtRbb/5IRK1sUSKgR2BZv+LhGcI
Cee4he+/2kzgf71Dc5U=
          "]]},
        Annotation[#, "Charting`Private`Tag$78993#1"]& ]}, {}, {}}, {{}, {{}, 
       {GrayLevel[0.5], PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.017307218660313678`, 0.025611676382146186`}, {
          0.038027592046916345`, 0.04482043366875577}, {0.06153144249929061, 
          0.06274860713625809}, {0.08175657920736012, 0.07811561296554582}, {
          0.10581328390197497`, 0.09604378643304809}, {0.12709611445810265`, 
          0.1146122518101041}, {0.15116242208000208`, 0.13190013336805279`}, {
          0.17302691566022402`, 0.14854772301644778`}, {0.1949490268041534, 
          0.16135356120752087`}, {0.21795764057799463`, 
          0.17543998321770124`}, {0.24099506313368965`, 
          0.18760552949922069`}, {0.2640324856893846, 0.1997710757807401}, {
          0.2887380738990857, 0.2112963301527059}, {0.3118523198730574, 
          0.21833954115779608`}, {0.3349473599924597, 0.22666333598199362`}, {
          0.3564030432397097, 0.2337065469870838}, {0.38063260062544696`, 
          0.24010946608262032`}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"G.Difficilis\"", TraditionalForm],
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVxX040wkAB3Dp3F1ZKk4PtQe9yLu6ch7Xad+uZ6GXQ7N61DFubbpypO5S
wtJ6lNTl5SquB+2sC0XOW16GZs2YbT8ya7/1IJSys/LyZKXWufrj83xWso8w
uOZmZmY/fPTp9PSb5L2qLTTrlScefZp9l8kRCBwwfaV5uO6GA3p2JhVGCryx
mB4gyCjyxvnrlpv8BTTYlhUH5hbQMNLGzPAQBCPdePqONj8Y2XuS1q0WsGCv
VqYm57Bw8IblfEdBPJZXVJZ08+PBkPYZqAIeMqbsaTzux4N3VWr1WVjE/bU2
43AWdOKIELO6PDz5IkHFc82DadvjULfgG7hv7apz2VeENGE21U4mRE95V0We
uRC1M3t5NUUlmKMZPcXnb4G04Ktb5HfgPPBTaEngbUgvZscxhitRmLRr+9rR
ClRNCU5BVwXXibLK8uv/4KTJw2/ReA1S/s5K2M2qhl1ChuGWrg4K39BUP1MN
Cor2PkhvrYfJ59CEKLMOdp5amwJlIyJZpJX5xnrErXL7kVcvAk+ywDugvgFN
J7yo+YoWWNj7iDRhTRg/L5wzau4j11cWfmxIhOS0GUP2oBjdHs0c9Y4WpPwy
vUzyvA3SdDalQtEKPSXcf9+ABD41pog/bcXo7b/mcGnsAY6pZr/s7xbDK9Mq
d/iVFAqmBT2V34aZ8VdmhU/b0Vts1hLuLMG3qaWerw0yXF5ulyd/KIFe0hVW
9awDfzR8MNPHP4Dlc2dKjrYTE/y7hSEWUpT57T9DeSJHjCWmYm5KUYs3Uy/7
ujBnbF1q+U07vkuMc4x9okC0U7ZRqGrHxkzq4MJRJX4+QKH7R8mQz/DJX6JT
YR7X+Jb+VIakHc6Lq4cJ7BlcJgyP70CHkXemkezGWI6wJtTQAbo4Q3KU2wP+
XtJ9PacTIwWtxX1jPYgZnpfrO9KJe+rStMMHHiJJBNN/YXIEFc/5B489hODp
e/0GhRxLFAvfcDi9kAyORBX6diGHXT1LGezFtqD4cwEFXejJkT02Z6tBsd3m
lPi5AgErsho9BtQo4F0daeIqcMpfmljM7oP3C0mvvFOBg8qrKbdH+1AzrrzQ
7axE5r0VaaNRGsQcN8UQJ5WI9bNixz/TgGx4419BKMH/qu579+hHYK4MiZ1d
rgIj6u2hE7pHSONOStewVRj6vjTBOlKL9g3O5TvvqHCTRzk+pNXivezieMu4
CjuFdsRnj7X4zeY4Q2NQYbpjjYtbvxabM2eOGF6qsGXpZt3RIS3ERhFhP6lC
vzBu83y9FlkK1oqjr1WwkRMWa99psZ1jmlz6QQW+Tc61WCqJ9Yy836lWBNz8
CieyHEg0j3E73BcT6IkoC6p1IpFfpqj3W0LA4VbbO9MaEltvRzSHWRNo8ptm
XfYiwSq5wjy3jMBUZJhLFY1EdXZE24ADgXx+VJpmC4lAZSHnhSMBWkmsbnYr
Ca8Nia2TTgQuTZ69uDWQxL8phqvmqwm4nq2dUIeQ8LSaUK9yIdBdIg56u5tE
QIHew92VQKJS+ReVSaKKmbzpazcCUtvRMG44iZN0TjLNg0DspqnyC/tJaJJF
FXRPAtZRHyzuRpDgD5Rd2+FFoPHsgqheFonTh9b5hnoTiC61bTBGkyAcd13a
s47A/8zLdLM=
          "]]},
        Annotation[#, "Charting`Private`Tag$79139#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[0.513417, 0.72992, 0.440682], PointSize[0.025], 
        AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.013079733527936722`, 0.02253726625514281}, {
          0.027435140289799584`, 0.039431787229190884`}, {0.0466754863770239, 
          0.05309417607250229}, {0.06472181683420067, 0.06514724182429275}, {
          0.08931708712244339, 0.08766315532891958}, {0.11393050354488148`, 
          0.10856749808407622`}, {0.13736805047146725`, 
          0.12625094699824146`}, {0.16807856798350954`, 
          0.14392090996471238`}, {0.19696176978209012`, 0.1624000297928421}, {
          0.2228145671700637, 0.18088476876584436`}, {0.24874902216191597`, 
          0.19211743936623088`}, {0.2740411040032564, 0.2065743752945323}, {
          0.2981300971474517, 0.22022777350604766`}, {0.3247341444911087, 
          0.22581882265431413`}, {0.3531201422127393, 0.23462964181459728`}, {
          0.3809182051864439, 0.24183001405438478`}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"C.Pallidus\"", TraditionalForm],
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV0nk0lfsaB3A5RWUoDZSK5EZuSlEqt3xJbipDUaTJlDI1yGpvlkNt8xRK
tzpFbBKdzHJVSmTa2PwUtmnv982mm1MiU8a47/njWd/1+e951vdRc75i7Sop
ISERyszfaSSXULswx9SwdMGXqr/za2HkH0o96mB9WtJ5TKyOyvW++/rFeriw
2LjKsVsP2+2uxAnEJpjKfZv+jjbBxWGPl/ViG8yoV35LEtpAsqzPvFrsgssp
dq89BC5oeqp5v0Lsg6iecl/ZOh/sUj649704GEL53VLH84OxZHydpPDlXZRU
8BYHWdyF3F1fHb/ax1i6iHgHC5OwpNMjt8rmCTItPkZoh6bh+fQbCWH2M7wL
VPXXOJ8Jvv47VnBWDiIOOAwoCLJQxtFdvlamAGNZy9Kjq/JALwx7blP4Ao7d
j6aapApRlrhd0LylGKeVY27HrSiC52ROUqfoFf7sKsyoMipGu3PIuJbjGxT3
Uc9mDF5h8aXO24LWUgiy+zIXqJbgt/Wc3pCyMtwstt4dovIW4iXGtfvnymGp
qjI3OFAKjV73mYqTFWiwaDbU9ioDf2EzGXleiTpXbvLRE+Vo0XPrP9hXBZXk
0QaPTe9hZHLBzgE18GEJC/2kKiBvHy/z6AYP+uzmPGNSASMbdfmHnbVwGlWP
LuNWojXpZ95BnXqIWDenTdyrUD8wlrj6Eh8Xe9I95q2rhsY/zrXlVDVApuTZ
0a/t1RA7DJ9ykyboHd7o9IFTAwmWC9zUmnByrZyDqRoPxluDJgL4Tbja4L3N
pYaHwr/0BRu9PoBVbzQ5droWdkrrT+us/oh7SeyksbFaaF/S2ra04iN0FT+s
XRRWB91qnlawUzNCtmd5KUjVw+N2Yp2dXAvUR3IPzkTWo9lBKr40uwUqBesT
kmfrcck2Pn3mcCvE/KhJkQcfe95ZOieOtWLq1sTZwA4+9DenmTTeFcCyccOQ
uUEDXBdp852M28C54uhlnNiAqq+H/cLFbcg46flg01ADbEcjWSE320Hbeq00
NGyE8tVfyj2bO9Af/8/N41GNkB+U6m2u74BWz1dXZX4jdn46cFzDrxN6qbFF
aTIEtyZTVxxV74Khc4C8eD/BSsX7kzLvu8Dz4cnKXCU4+rLmypvKLij64lQ5
46hTE5+9arrwpHJWj+1NIJFs/7GB34UgfduY7msE/Zprn8e1dcEkwK0p7zpB
5R7umeXfu9B5T/npHn+Ca2efv1NeJcS5qRfho6EETU/ehWpdFuJt0Hv1JQ8J
ViUHHci6KsTZF1y7x4wd/zD9TcdHiICmJxpbHhEM3qq/ucNXiF08xXuHEgnk
2W3+CBIiqejZ64DHBEcODXqfuCeEZkS0cnMqQfV3lXOcUiH2ymKn7nOCEv1A
/Q55ES7GuwrKXxM8yedYWymIYCHtFbSzhCBGO/Ry1XIRfiQHN2QyPrMh5mn+
KhEu6f/PKPYNwazcQ8WoDSIYT/gmHi8l2P+56KeBvggnSIsGKSeoS/j+38Sz
ImjVu0b48wgK5Ic+LnMUIcsvXrGH8aPI0YEIZxG+HeKbHK4l8LoxrXH9oghc
K7a/Uh1zj+ei+xbeIvQNPnTIric4tn8jezZEhO7gVdPVjQTtP87scswSIXCy
PzC/hSBy368OmVwR5AUGuStaCQyikn4vzhdhhL58ic04SZ0qly8W4a1/ZMK/
BATOtg7mb8tFON4cEVbaxvRV4uSk3CZChGSedG4n02f4heiWeRQWO6WwDD4R
5DdLbb05n4JZX6FLHGPn9RlNm6UpCBOzqR7GVa++rAyWpbAg1iYwupv5j363
lO1KFE7Gu59vFROssPYsitWmMH9lab3NZwLNdVdpMzsKLJVF0tN/EXwuT62r
tqdgavh6au9XgrQLrUUHzlAYfqAQHchYNc8gxsiJwpfZAo7ENwIlkwV7dntS
MLhVVj3HWNr94R3NGxTCC6Xyvn1n9pFrCEjnUNjNWXNZc4AguGDOTT2EAi9S
wHNmPDd9HqqRFDhHcLyd8XisTr9iAoWzt7velw4SfHlRaSqVQaFEA3O+QwTp
9uPbQp5RsEwtDs9h7DKrtVYyi0LZSUFWD2P6YNzwrzwK+1hSDebDBG2d9slj
rylwfba7Ko8Q1EgMTvQ2UlDwLRhNHSXIMF+dVfGTQkSGY7z7OMFU94+a6EkK
6UMmV+4ztmTzemxmKCTdsv9Yyfgnl72mdx6NjSVrNqpMEPx7vDVqvhyNmP7p
mTrGvdw77qbqNIozN7Pkpgh27/IIldOg8Xjpjgd6jGP4xtzWTTSc6i4b2jPe
Mf6j3XUrjQA9f6U0xsHmVmZhe2jICgent00TbBiX0ayxohEZZha7c4aAFdOz
P86ahoEsa8SGcZ1ayTm7EzRqelqF3oy9zT3ufTlFgx2hvTeLcRmXt2DhBRo6
mTu3rPnF9L8rRa3JjUbVm7HCnYzd+Ox9Dzxp7FLvK7VivHRc4/ombxoFn12c
ghg7mIf2mv1OY9aouL2bcUH3GQmFGzT8ehdxJhhLsXes7eDQaOqIzZafJcjh
9ti4h9NY+VonYQ/j2Z/GFZF3aPw82hAfydg6ZjV97D80bIMLTiUyfqo2NLX6
AY070nWZOYwtzFN0/0yiwV0Q/+ED45RutuW1FBo+NwyzxIxHWVYeBmk0NhxR
lRlhbCarGSb5lEaOm+6A5BxBIneWW5dJQ7GdfWIZ4/8DHatYIA==
          "]]},
        Annotation[#, "Charting`Private`Tag$79285#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[0.6215634285714287, 0.743557, 0.3500992857142857], PointSize[
        0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.01623998980008704, 0.04058336263026685}, {
          0.03745905339602517, 0.07440283148882265}, {0.06347872936143967, 
          0.11112111196382607`}, {0.09818947679129625, 
          0.13721041651185478`}, {0.13673714488820637`, 
          0.15267074513290887`}, {0.16309589756373238`, 
          0.17102988537041058`}, {0.19796726027732606`, 
          0.18842275506909642`}, {0.23291000756146982`, 
          0.20195054261251874`}, {0.2642121417475718, 0.215478330155941}, {
          0.3015105798598599, 0.23287119985462684`}, {0.3401117863846826, 
          0.2454327168592333}, {0.37742807063960804`, 0.2618593160191033}, {
          0.4124600486369391, 0.27055575086844613`}, {0.45470186825980313`, 
          0.2831172678730525}, {0.4946772277677099, 0.2869823500283161}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"C.Parvulus\"", TraditionalForm],
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV1Xk8lOsXAHBLlpAUJYWEurIVP6qL20EYokSFLOW6tCrdLKESkrJvITUR
V1SULbJmTUq8sk7MzPtmS2VJdkm/M3/M5/18P58zz3Oec55li4uHtRsPFxdX
P/44X57U4BmzRpO9Zwy8Jznf615HVqoOKkLLNa02qwFF8A+rubo8oAUqVRNr
9vdrwVyCT8nnASOgiRmNBFBGsCvF6jBz4Ag8f+jwSoh1BLo2Vad3D7jCnV2G
1//X7QpbWTNNHQNeMC59LiKqyQta/opzbB8IgeHGryPGz0JgiiZPVDQkApGx
ydLoYCJ0qNedLld5CCrKxiKzVmnAHP1WEW7/CL59SbSN8smEVtvLCm0LT+Gn
dJL0XNQTCL864BQinQ9BikyzTxrPIV1BT8thuhBaHnyWXxdVAIcU46a+vSqG
LsuQXqHhIlDSNzX3OVYKpwqLPsYKloC35k41XdUK+OeD4SrSrBS+gX/2QmsV
+EY115y3KYdrh535/tSsga1mr2XVzSth749NV9em1IK7Zf9KN4dXkJgqWD3y
uQ4M/RJlhGUwrmQVjWndAIaWCi21G2ohaDG2XvXla1CMtpkUFqyDSxbGIv68
b+DIpTxJHaoOUleuvTd4rgkMzgaNi9fXw4nO1dPmlW9h/SMPsycxDXBMaFtC
m1IzHPrDJS7C7TVsPl++rTD6Pfz6Gb7l0Y5G8GddD41ltsDpk9Lz8kONIFbm
pBJpQsCym6frnxlvQMZq10FDizaoPFcWH2neBBuYS1xjk23QkGnI1fS1CfLp
ljZZjz5A8NiOSz9i3oL4YPma4wfaYSqnzGBO/h2I/13oocjbAUmBdeZR5e/A
b3qEllLcAWIJcQs3ac3wRHRPqIhjJ7T+nU7namgGn+Pip6LFunDfLB09tu89
iGoLPBct6wJVvv4h4aL3ICKv4/HX8W7YMS7HbJNqgWyjhXb/NT3wJO1IeHNQ
C4iMt9FLSnvAXXBDYGVfC4i2aK3kvsCAibVXnEK1W6FPs6DPTPIj7Aea0+bg
VhDNc1cyqPoINo7Xdp9vbAW28wtJ2r+92C/1p18ECfBNkThvLtUH3LvDEzqA
gDwBbrfjRB9ckIeCKE8C6orfnt3e3gfW3TEFpl4EdP4Tf3G6sw/2zYhq83oT
MF+tcDW8tw8Oed197eNDgKGvSULJUB9IXGaI2PkR0D0SUSu6hPExIlq817Hu
b9fLVisxQUfIeOhnGAEWkao9m4OZEK881+6TSoA/Paq7PIQJAp6zKoJpBGTn
jncdvcUEOGG3IQXN05LfGRHJhAV5o5yyhwSUrdJun0tiQpJtRdlMBgHbYv5q
IXKY4OGt5HcsmwCu+IP117uYkH7jVxCRR4B6Rl7dRgYTAo2saIfzCXAoFKsr
7mWCwhOBh93okvb2mm8kEwqd6MLMAgLOi9u+sv3KhEVPt+ZPRQT03jlRtuM3
E5SO+owxXhLwIvliHqnEAt6v8RXe1QSUMhy+FKqwYOUbPnIGXSlFUwhVZwHx
8HWwdw0BDfdlklW1WJC2X9XcsxbrmfYuwA9YcOhyInm6noCZbMWD4jYsGNPq
Wa/3hoBdpYxRkxsskDLYUB3cSoDOQv22jaEsMClRHv2B3quT5zx2mwXaSuEp
LgQBJpU3OxOiWWDDs9Nbv40A2xrNSiqFBY9jJHfOfsB+N0VG+Oez4JaozQuz
LqwfQ1/5OYsFex7Ezsb2EcC40uBkRbHgmdajlq/oeVnTuOl+Fizqu2sbMTEf
N8t5nREWbChd83IGXTjp1PjmBwvc5cqDD7MJyBW64vJJgA0eHwN1FykCHuoV
35PQZMPI6JDm9BAB1eSe1pdabDDebCanP0wAO7iS22E3G/wbj6dGoGXe1p9O
12PDac90iy2fCbh3tH2XOo0NTrSQf2kjBNy5MNFOc2RDRk81M+ArAbcfbhe+
EsqGBymif94bJ4BbP2leLIwNDgZlfD1of5JnOCuCDX88PXdKfIKAc7LMmvZY
zOfV5y/h6IP0aB/l+2xYO6P3zes7AevuTn36mMcGrjsOpNYPAqJ3OxMehWyg
WwQvnUXz97yv5Ctmg0lj/vOH6Pl1Wcka5WxoWFJsF5oigJlgdyCsgQ2nfM6u
60VnxFSV7vmI8fQzUa4zBGzaoZzV2seGWjeRnwnoO61JCa5sNph9L/lVhw5d
dfFC7AAbbpgq1G2eJeBMhLziyBgbUvmO0TrRO2/diknmIcGjcM++7fMEPNk2
fVWNj4SmSFtua7R8o/PZegES1JUCjvijxfl0jCdESNia0V/2Fj0bPLpoIklC
WYZg0D8LBFQFWJ2cVSHhSncT141FAkQsTaMb1ElIU5CYyEY7boaSeA0S7qp5
n3iPXqxW5d+xmwQBX99G8Z8E7OEWzDplSAJr+MYzOvrWh+UWbWMSsjdey61C
d6fPzPCakmAsHKnGRnsbDhg/PEDCsvy3Ypkl3D83Xg0x7Eg4o/qcTEJzHyle
le1AAsPk6EQR+pBirrb3cRI2ya4NakNPNKTcXONKwmbeFmXBXwSo8ntv3e+B
zqYl/4u+0n3uwIZLJGg+pr8MR7/LcvEe9sL/nxSw/w99hnbodbA/zrdBdmsH
Ouu2ilvFTczH5lCn6jKePzv5qLDbJLzce5jPEG20XarYNoIEo4FzpTbogbf8
fNOxuF4XdmYAWk64P1OVTgK/XlNSE9qjj/F+MZUEVyE/xkf0qxxiuimdhORE
oH9FO1lUGbllk+Dfv+qp0G/c31F3Bx8UkrDHJo9thP7iFCPiXkyCnrCohjV6
j3qolk4pCeLXgvlOoHtaPUO6q0gwSM7VuozelnY2N7MGxweXmGC0j8ffnZfq
SajNVHOPQkuIWSqufkvCnUd8ueloV8rYgtWM4xusXZ2DLsrX88ppxf2QojVd
hOYJ+h/d7wMJwnnuDpVoayvlBlonCRpB5UYN6PQtW0bX9ZCgKiab34z+Pikp
MfiRhCWH5Aft6Jh4PtdAkgQp5eZlNnqx4c5N2X4SDtjLSA1y5p9TyK4cJCHd
8v3rEXTr9qIm+88kSAoxVoxx1uto+HX+CwnPwvS7v6Mzoj8IJ49iPVv5dKbR
q2qd1bQnMH/GHzvn0L5TEwc7JknQzs4qXUD3b71+8d9pEix1gzt+oi3sRONX
z5EQfqc88Bf6ZfiDomcLJAwVWtYso+WrVLvMl0j4O8kg/jc6cqJi9ssyCb/3
xs5y/DN2q0gDFwWVubpjHO9UHpMW56GATu7z4fhk/Qs1F150z+M4znj3Ha/u
LViB8XfOAme+tpl9llz8FCyvD7vOyYc/RtjZUoAC5+MrrDn56ip1XEwVpGDw
LLNkFn2x9l7Q2EoKbuuteT6FfmTvEq8nTIFFR8ZuTj16p7b/FyFCgeaOuMOj
6NVRk0W9qyjQOcTk5tTTaFtZw/bVFLjsCjEcQPtVB3b5ilHw9NPtdZx+PLcz
HX6zhgIJ66/+DPTg5Oq59eIUpN56fInTP6mIHoGTEhSYBtcvcfp7UDFtQ/E6
jDfUlXqNDqk6uX2FJAU8b1Y3VaHHJ2b2Z0hRsFeOYD5DK4RVOUxupCB6uszw
EdpO/qa7vjSuP4pbl46uPyIRzZalQF8su/82en6sL1VNDsdfWBEfgFa/9V/e
1S0UCGZXd3ii75ZpftioSIG1tbmoE7rFevHTma0UPLaUFrDi7NfR2h+l2yiQ
W7s/nnN+zstaSdhup+DicMUJZbThDQ/bBHXsz/v57u94/i5L7z7dv4OCxR95
Lp/QucXLvhoaFPiy6wM/oCVHou4R/6OAsYLHKx89apHLEv4Tx4/p2XUGvWXY
c9xeh4IQttdRzn1gc1339xNdCoSmLvDvQ9cUvJMz3UuBzzm/zZvQieu//BOy
j4LelM9qjXjfXPwc5r5oRMGudhX9Z+j9pcreF00o4K9qe5uA5rJ3D3U0Qz/V
23cC7f5g4rGWJQWBn+itE3j/0S7EFjw9hPM/G77fjpYHjXI5a1yPShz1As2g
LjWLHMX+6Qu2XUYbKc6ODdpT4NgYQJvD+3fzTNKsvSMFK7a1El3oxde7f7c5
USC/J4AoQuef8hOrcqbglSeX9gW0dM6SZuJJCtxNo+4y8f6f0uD1Nb5EYVxT
bRq+H608mYEVntiPcfkab/TjDqMwDW8K1iqxtc3Rx71D78n4Yj6FPrem8f15
V7qyauYaBcqKO+v10RkgxpMVhvW51kCvxvftmliBkHQEBbKqymui0HafrMTj
Iynojvy+dAwteiNBMSCGgky3NJ0f+F76N66n2SRivl43D0qjjya/tHyfhPmU
fL82NI3n9bSdneFdrGdOpeJz9PDKe2fU71OgmOPD+Atd26tzKZNOAVXiOrQC
Tc/p89+Yivl7F51pxvfb5+rVG7FpFJQPubjFoa0OyETyp2M+gp4MG/T/Ae1W
aqk=
          "]]},
        Annotation[#, "Charting`Private`Tag$79431#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[0.7306125714285715, 0.7364672857142857, 0.2882132857142857], 
        PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.019951478465821522`, 0.03724608011301801}, {
          0.045210431008866486`, 0.07256102452675563}, {0.07295141819404662, 
          0.09447346737538069}, {0.1111985520151146, 0.11635092588162751`}, {
          0.14405661062003947`, 0.14302998537929093`}, {0.1811987290182389, 
          0.16682458584786664`}, {0.2226521075893527, 0.1867779055233089}, {
          0.2619770564536492, 0.20769504383127238`}, {0.29613053313892146`, 
          0.2257592090182886}, {0.33155222752490116`, 0.23616530165870295`}, {
          0.36904795085841835`, 0.24752121919468711`}, {0.4034462309604492, 
          0.2569739885052938}, {0.44005454190821686`, 0.2625924738912429}, {
          0.481943126553568, 0.2672366453419573}, {0.519656452924204, 
          0.27093798876557756`}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"C.Psittacula\"", TraditionalForm],
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzms01HkAh3HbZZPShaVlHUcztrbCJo7twny1WVttiLRZZWrdlhE6dTgV
Y4fRQa6tuxalEYmdNIyEkcGMMX7jMvhLhUgXVGINKnbrxXM+b5+NnsEuPkvU
1NQcPvVZzsiBoO5AW8bmdWanP1u/yrREx9gQ/ISC+B10Q2S6PJpS0s0wpcGt
06SZYWnojg0COgNJKYyKTUYMVK9g3iqgO+Lw0I7xOANHpHWcO5tDZ0Kf1r/g
p8PEksrFXzPoQehUxYRYrAjCrs12B9LoEWjfr52kGGND7YWurZZfMhLi5H6S
iSRkBHlfz3bNRMozt7pLbRlYvTH47WNFHg7lHrFIe5qLgPHvBvghN8CZTGp0
u1eAZcn+EUWMIkSX2Esjtt+EvaXugMjtNiY8JO7K4VvYWfkNj3+SD30LF3bM
uTIEYc75dko5DP2ft9NO3IFuYVb5mhwBvryQSJR6d7GBb2RGOJWQiGqFrLsC
TG7q8ZjzqAK9KpUxvacSefkIFHhVw/4dL1F7UIjC2ivZMvsa8GwdOVLmPUT1
ZxcGu9SB9QNTUaSqhpWvwjvKtR7nqeSxNxE1oP0SYjSX/QD2TX9JIkdrkebF
XFTlNuBBwPrhcE8RLBxrWDdSxDAtD1DniephvWtakpnZiJZCne9HMh/A/HhD
uDi7CR2mt79Y2N+AI05LG3IuNyNj8seRuLEGDO4zmrmfLMFO33WHytPFyNIo
r4rlSqHusy+g1rwRNup9yoSzLUipmeKYSxvh8GX/YF+IDNYmnGIvnybE9Tpd
7PqjFXohseLDM03YXnRt2VdBcujK9760S2xG4z8xL+OD2+Con8D2MJQgKnbY
vfwkQat12DnNAglKPb+uM/RWIMPAd9mwiRRL14rLdh1rh92AjoOoRAravFp4
M60D3sIMQT6tBfOsNXpavA5MuHMHW6614HnzUXalQSeK6we9OrRkUL9++WF4
fifyVv62hXVZhr0+8x9z9Lqwe7+t0RGVDJN2Fg6uV7pQ8q1AlH6iFd0893Rz
bSW2hm6TJEhboXhdw/NJUILnb3m1ZLMci0KN0rq13XDjdkVJ4uXgXTUeupPS
jSSu32nVKzlO+Z9/9F69B7RIybstjDY4V1Ur/OJ7cCfMTng+vQ1ubyzjTJf3
wtrvp/w9I23osQ07kxjei0vGFVentxHEavOd1i/2Ilh7Ou9VKIFzu4FqPJTC
vHmgdGs1QZPSM3vFBQpiQqIP3ifY2VdsTQ+jwO7X+eBfQ2D41JLr/ieFRvsT
WsV1BGNTh9bJYiikssTjRmKCaF321ptZFA4OTh9YLicQejxhnrpPYTV7XJD1
mGCLJ31JeC2FEavdSfwnBH/7+hdmiiiU/n5mo2SAICp4ZlwhpqCpkXp2aojA
KVLzgo2cgu7N8vqfRwle8mxS9R9TsFnlunz0NcHxW1wrqwEKBt16QbNvCBRl
sofOQxTGNaXJKycJKoRHjeKeUTjeTS2YTBFEtgSWzU5Q4JR2RZ9REfzbJjis
/fbTz0dlBWeWwK9zftrsHQUrUW1uyhyBY/+l3b4zFMpS7XL47wkaBuRPImcp
dBaNlIk+EFiOrI/MnacwasK6SD4SFL04Zlz9gcIYre+/RwsE+hO50u4FCkNx
poyxRYL/AaM+eds=
          "]]},
        Annotation[#, "Charting`Private`Tag$79577#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[
        0.8241045714285714, 0.6995635714285714, 0.25042971428571426`], 
        PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.027016258904268318`, 0.02856975515074548}, {
          0.05642220173654851, 0.05714953521667175}, {0.08466537889915857, 
          0.08376192567837544}, {0.11298874679760802`, 0.1054683732734988}, {
          0.14129607654888945`, 0.12815600944193808`}, {0.17147585998201925`, 
          0.1459452214301825}, {0.20110633687464965`, 0.1607883614696834}, {
          0.22894455082127105`, 0.17562398282279873`}, {0.2585429514195657, 
          0.1924295000089318}, {0.2839754432910074, 0.20823628502018252`}, {
          0.30892278121062117`, 0.21717224378942523`}, {0.3345477308480773, 
          0.22120476592088278`}, {0.35762261508584287`, 
          0.23503914887032054`}, {0.3748676328280896, 0.2400177723719615}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"P2.Inornata\"", TraditionalForm],
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwVzGs0lAkAxnGmLHYYcitNpHRRdoScDq08SCi5rNRJNCTaNlZOU2mVGhNp
l83IyTbKWkXCJMyZXGoxGGaMmdd16I1Kq0i7KZeQS6sPz/mf35dnTdhJ/wiK
ioqK9+K+lnWeHH9s5+rUz9358WtPF8/HBAjMUEwZmpOUm6G2IUndWmCNSzkr
1hmXW+M1Ie0wEThjjP9Q90OpM6a7IysNBH54UjZlX1XiB9Wnjpa6glC4lRrY
BBaF4sqh/EFtQQzkGw0nc3Jj4HkrUKQlYIMeMPPGmsvGzT29jN5j6ShR6vPN
6elg1eYd4ZE8xBd8dri4lYfbS3OiJpblwizNnuvK/gufPsRv5HDzsdv3belC
QR7cAh/c8KgvhMqc+EXi2fvQ1ByljHuXQNaaUtTI4SM3nSq1DSuDp0ZUCMWu
FBV9HiPqsQJcXLc+Yv1cGX710qa2VQqhZ5EYP/1SgP3TcWp2XRVoc/BqCrst
RBD5jDs7WIUK/qXsM+4VMHkppj9a+wTqxe1cY2oVnpofZGttr4FDxc3j4fer
USh2GNuMOjhP8vU4zCegGIiiVINF2PzqTmc2pQYHE1Z15UfUI7Gze/RCQi1S
2Y6PG5IaYGxe3Z2QUoe//7ROe3i9ETpzqjxrNxFkPm9fGTwSY15XS22fej1i
efQvll1NGPqYzegX1WP1krUay140I2DLM8uwyAbkL/zLPakihRVjdHanaSMs
jFO/uU1rQQB3yUxRXSM8FXlucctl0GjffeRakBjuhhxKx7ZWfI5/fq9mQQyX
81sfTLnKMbEn+qcL15uwklXYkxmhQN9IZ0IBoxlcNV7LEIfAb7lf7s7UNYMT
ZLX/snsbwksuTgztksAyfiyRULahMs30KqNdAv8Ss2LO4XacP6p04vlIIeGn
CK8NtIN7pX8YYim+m+i91BPTAfUCQb6VSwt0vLjOyZ86MPyfyMirtAUDI5tE
rOROOCXmlreZy2CTxbBvpnUhTzKdSUuRoc0oOoOV0YXgHCOMvpOB2cctCTbv
xgYvhzwLv1acKDOp4xd2IzOrfrl5YSsiiNR0h++VcK/yYGYuleNhtb3H6hYl
+oQJAwcC5YgV+oxH+vaA3hydNXRXDqsZ95DJFz14z2FmkaNyhO8tFL0+1gtu
dKmqha0Cw1GeGlve9YIZbajZE61AkFJKE8Y9BYs+9KC3WAFvXyH1jgoJxo9b
RI4vFVhF1daeppDYfi60ZtWAAiNN4TQfNRLDg67hc4u+4mSw7LMmic3t9KLq
fxSoZbCM/PVJ7Jw0Md06pICNls0aygYS8sijBfrvFTCU8reFeS3+6Y07Zcwq
MJi41L7SmwT7D1//43MKlDsHO9D8SBw/d5i2Y14Bn0qqY3UACRPv39mvFxRI
LjjhosdctOsOb1sKgZkki731MSRYh54nP9YgIHFhe69gkVDy/DakaBLInO/x
iT5D4pnd6Z8PfUvA9kzyDyvjSEjjickpKoHI8DcHTl0m4RikfG+lQ2C7mdNB
SRKJktjOjtlFa/TdCDS9SkI0mhAi0SWQt29XcEsqidaxsVOhegRO6WQfNksj
IY4XzljqE3CWTTDPppMICd+0aWrRtOS9oa0ZJG7d81GtNyDQ75p3ZG0miV/c
1nNSDQn8D6BQWmw=
          "]]},
        Annotation[#, "Charting`Private`Tag$79723#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[
        0.8849417142857142, 0.6205167142857143, 0.22512285714285715`], 
        PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.030632497727013076`, 0.04093307408260284}, {
          0.06417258632169086, 0.0784713390191145}, {0.1112716424305624, 
          0.10073437848176285`}, {0.1572448636916853, 0.13320449631943948`}, {
          0.19369254315402779`, 0.1673479521098601}, {0.23607288277059518`, 
          0.18789518311334968`}, {0.2699654066219596, 0.20501362856561622`}, {
          0.3152533371061918, 0.22216605042301463`}, {0.353982055868756, 
          0.23419369783969157`}, {0.3860928237002046, 0.24449987406302118`}, {
          0.415413479082884, 0.25139425293769346`}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"C2.Olivacea\"", TraditionalForm],
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}], ",", 
   GraphicsBox[{{{{}, {}, 
       TagBox[
        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
         LineBox[CompressedData["
1:eJwV13k4ldsXB3CVQqVEGlSiVKYGkupUvijCzw1lHkMolW5xRXORikRxo5IM
ERIuSkRJiUyvKSnOed9XZKaEjPnt84fnPJ/nOO9eZ+2191pH1unEfpfpAgIC
06eRP/J69dysJSEpehoR8ToS/FernNUPXWLW4vsj+TiXR2theG2mnlqMOh6/
LbFWi1aH7gnvh8tidDGgkVW+LEoXu79t0JsfYw7vhoPP5keaQ2tF0AqRGFf8
PPDkh0ioKzQ524VnxXhDdlghR+iSNwr1Qs8LxgRg5TzFVqGDAVh8Y9AxKiwC
FnOMwxOEI7Agulki3C8WKmNLPbZ0xSBo0w79ezJPcKbO6G8FyUTcXuld5771
GXJmjuQ+vPkU7P0LEVKe/+Fkt8++h9oZgGlGv8u1bCw7dNtlmM3EYkWZn8bB
Obi8/oZztNNz+Euo22xzyIPTZNX5gic52KqU1z/TowCqDUb7OufkAUqnht3k
CuG7UnTnNfV8yBglfowKfItzwQHi7rqvIRe4IHPP/Hdoyhs6k7etEL+qqKou
3/foW3l7n93mt2hTLBYQnPEBzRyTW2Pbi7DwXyuhXv8SXP1rZdVD1XcQFdHS
ru8pxS5rU9994u+hEO5wZ4NnGezL5KdNjL+HmELNomt0OSob+95kVRZD6pNv
xn73SmR2W7ZXPPkAx5C30n29VfgzWMNJ9SpBrkIa806pGmpmYTOvK5XiwOKI
nWX91RDoTHcq7ihF7Y3kTCqxBh0adusmQz/ib785ErusaxHpmDIyvL4Mj4RF
/nxbXgdVZ3EFB6oMWeKbZgTW1qFg4ktPol05rJIG7hyJqIcq90JhUV85pIsF
Rf+z/AQNScv2GV4VKHXVjP09twEn54T5SXZUYEb44sLT1Q2oPBz8dsK2Eqt1
l4wOB3xGob1Oxn9vK+F08fBy3vZGyDt2Hg5YXgXVPaZlf8Yboeq2dUTDuwod
wUfuSP/3BZr6BTOT31Zho7NU2+l/voKxO/7GbjYFm4JBk2rlJrT2e1gU6VBg
DpkceLSxCVFHu7vu61JwnZtm6qHahB5bFQHPvRT+tnGzmLutCRYxSzNk9Sn4
j36x1dvdhP0pNmt8DSmkbXnjVmjVhLayBBexAxQE0m6czwhogo/G/l2MA4XE
aOnkUKYJZv1z9Gf6ULDOTgiN+taE0PCfg5XEomXKPknfm5AZZDH3ri8FryHO
3sKeJqSdeHxe7iwFbUOLtv6RJvjN03bnXKDAHQ2RNVrQjMdPbh418Kew0Gza
fVHtZhTudZg3HkLhypzWwMD4ZjhhrD46gYJ+SZ2HU2Iz9pnqnd+aSEHM791+
TnIzapx2PqaIo8fipLrSmhF1bJHHnycU8jodU/TzmqG3+c5PsxQKAyX0R+Ga
ZvTfTMrpSaPg7N8kfO1PM/xPGmvm5lBQ1CzvsZ/Gxf5cuwKtl+T/x/Oq1QW5
eDEmlvuR+JLn/cjvIlzsdj+i3JhLIcrJSl5XkotTE+z0/lcU6jU/752pzIVs
708PwUIKeyZrA/ysuHg/dXN3VQmF7et6jSNtuZBZFRBjXEphg4nQsmcOXJw8
HelSS7w0YUd6gwsXQ3nC8vUfKfQZPv6scIqLgITFt6rLKdyL+ke+OpCLMuF+
XipF3t+xpGx5PhcNQv5hvxoofHNRDVd5w8XA9fhfTp8pNIYY2usWcSG4q/lV
DfG7b5cGTpRyMVvjnv+zRgqRQZ1S7+q5iI7X+m33lexPU97RI71cdEz8zzGO
SyHijJ3oC2keBDp09XK/UUhqkTmdL8uD4InGSYlWkl+DVqZIjoesvCkZD2Ke
1NFsSpEH8Zj5GTJtFNa+8rHpVOfha5zazwvfKWSPhyUvN+Ih4HrY1MpOCh+c
LSRW7+cB1pdvnSRuLJc6r2DGQ9wPwaAi4vEHscbqNjwcO1pZ4dRF4tuZ/tvI
jYdZ95w9o7opVJ8r0/G7yINV/WPDwV4KLa3B6Teu8FDyoy97Zx+FQUOTpaFX
eaBrqgL9iRevaOyJCiLxtRhdFO+nYF/QFvYigodLHIugdT8o9EwKtHSm83Cm
/MxG9QEKIhe3XjBmeGg/LpnUNkT2K9i5ddU3Hm7L2q9ZMkzB9EGIwVAbD0+C
NVYbEEfntC+6383DwpAPManEaj8i0r8N8zCm/ivu6G+ynuMI4y1K46fUm3c1
I+T8nZDbqy9Gw9TMz2CCOPm88bNlEjRW69Ema0dJ/PeSfAuX0JhhYd/iQ3yj
1lJ8thyNyqW+s5eMkXzuzt39kEMjeLPsaY1xCl9N2pJP7KKRPHhQyJF4ymGB
mLYmjU0e25b4ERucO9L8XYfGlcC0V8XEdPbSfzaZ0FA5nCOiM0FB8J1O03RT
8vme7GhnYsWak1qfzMnzFQyyLxN79X4UPWNLI7Jih2M+8ey1ZxLfudHIzdlR
pDRJYZNa4ty77jRuTQ3b6BKbadeeOnycBjWl732QOMZeEaKeNMIUcpTDiLdE
fP1sfoHG2lVpMQPE1gmzNBQu07BYvw4if8h5y1J9PO5HY/DHVvuVxGVU4N8x
N2icipWRNiA+KLxDpCucxukn8xLuEWf73zYbjaBxpCql/hmx0LSOWOEHNByy
z3q8JU4bDeesiyX5LnjFfCee7t0doP6YxgFGMXeE2HxAq07nCQ2zoqpxkSkK
k119Rw89o+H0LvuNIrGxm85Lzwwax1uGNTnEj789EPTLonG28LiyPrFhs97D
2Fwaj3JHtVyIYywfdWbk03hRP+/YKeJf9UNbCt/QqE6zFLhIfL8yropXTEM0
JtDtLnGf/qhUXynZr5xTnFhirQ9GbpPlNMyDQ04/JQ7XTsyaS9G4uIqVfk7c
8XpialktjafebpteE+/cccBQ6RONLzdWpX4gDs1JjuQ00phjK36nirh1s0Cb
fhMNzV71lk/EWzPMVax4NHx2hUY1EwcqPzt/mKWRZSj9toWYlzSj7HQrv15Z
ow5i1TXWi66101BNatTrJQ6IzXC620XDe1Aw9Sfx1xVC6Qm9NAqmXHyHiNff
txvP/kFDqGw8Y4T40qLsve9/kfwf+LB/nLj+zuzwumEa8Q+K7SeJ5ec7Mi2j
NIbjRuv/EJ8NylEemKBheMTp+RRx+4xr+QICDBL7pqb4XqCd6XR9GoPpm2uz
+eZc4gqLzWBwUP1LHf/zh14Lp0cIMigaWWjHf/6tic1mK2cxWHvmqjF//Zcc
h/FEIQa38hTT+PG1+ATGbhBhMJYr6M2Pf27O870vZjM47CORxP9+6kNM7665
DBqHzPfwv//BzXPDi0UZGKpSBvz8BJ7cyvlrPoP368+94ucvO92JqRdjoNFh
d5efX15vcICtOIM8R68mfv6FlHOVWyUYcO6/CeTvzyb31tqjkgzyb+Mxf/+s
k+b7/lrEQFtvcB1/f9PkXIunSzGwHBg/zq+HRqfbRwOXMfjetm8Tv16mx+Yv
EF/BwCeywZZfT+YrJOxlZUi+OP6DF/j5t9EQTJZloKmY4sCvx5R7R1I2rWbA
axTcwq/XScnCYaxlIOdpKc2v58fzjofYKzOofuDTzT8PjY8qNlesJ+v12daO
kvMyR0W5cftGsl7uf+qdxKcOdMtIqjIQf556+gOxVuSRzPKtDJbodnw9Q+yl
8NF8+3byvpnxM1fipDz58UQOg4Am+UkTYjFu++4ruxi07lOSXEfMk3X9tG03
A2/qn7Xl5H4Qzyr2TdzDYP99x9ZMYp09a6QX6jJIaS5YeZ841bXVtV+PQVVJ
yTw34jNPnUYS9jHo2ipbNUbuq8VbHJZJWDPwuthVI0Js8OH1m0s2DBYWcV07
yX14wUL6UJ8tA9VzWr6lxN99uakfHRgw5taLrhJnv7bRuORC4k+sURkh96+x
nqVj798MSp829BaT+9n/S85Mm1MMNrjWWD0kznFfnFLqyUAscuduL2Lp4IaB
eG8GBk6HbskQ99aY+lufY3AndHSmJ7n/A21MnpRcI/GZcs5Mkf5REXR12YYb
5HkJJVkU8bz83JDwQFIvSV9PPCK+s3yVj2MweV7x7RO7iO9xB/TG7zDQtdkT
7En6VZJDeNeGaAbZw3lapb8odIWU2v/7iMHdY/HxocTKhRO14zEk/vAF1y2J
02VcXpXGk/MxcaHxO+l/L9gtN52SGbxeGx0x+ZNCsfPn9XezGTh1996SIP1y
VvicuInnDNwDVJbWk36q9x6LnHNI/deNrQknrpBL+rMxj4HHVekSfr+tb/Oh
Pr5hELcnZd1s0o9b3KROTpYxOKda58iSfi5wzC77EMtAsMI9T6WdglVd4oPO
FlJ/iy81NJH5IZPz44pHK4PCTtb+KvEhET8Tn3YGwjJB2Q1k3ihNTOoL6iX7
1+DpeYrMI6HsL/msUQaDh6Nxi6Ww0iLw4TRxFpvkLRdYNFHweV3nHyDBQnfb
nxd9ZP6pXrPi2BxJFpeqfpReJb4ymM6RXMLCOviVSuYXUg+3P32Wl2aRYtq+
SJDMT2kVMuLGiixeiERuvFlPQUM7JyBam8V1Ufv76yspxE6oHRPZw6Jl1UvB
VxWkv+ZkmnjpsOgo8u7bS/xRKW25gR6LiThZzYNkvjOVTMgc+ovFzm/rmwPJ
/OfecYdnaMVC6pDM75JiCndveaiPnyDxuB1/yRZQ6P+65rvFQxY8zyeHw1Ip
TNxbLNAbzaLUSCSs/ykFYSsRqSsxLIxd5Ff8j3jV556/UuNZcHZFGwuQedi8
Luu5QAoL75jDas5kXn5drnU1+QWLO2o+/bPjKATn28mNUywOhl3Z3HKX9Kuz
RhqhNSzmxgeZKRIncrQs19SxsOwx+XzyXwqFL+VuGjWQ9ZUWjf0JI/NLdvev
+GYWYvbn8xfcpmD7zPedYSfJd+gHtaVBFI4cO8plu1jUb4/fbxFIwVvJ7rd3
D4vpK3ZVh98g+5esqRTbz0ItNKlL9DqF9wlCYUNDLAQV7aNGyO+FmkOjqYG/
WVyJkXupQsxb3f1h5SiLGOOkze5+FEZiq8b0J1hk27Xrf7lMYaZj4UJ6kkVq
XlzrfGJxmcwNXlMsNE2W0TqXyPmk4/VEprXAS9Zk+9mLFJSi/3WKnt4CXaU9
v9LJ75X/A/zziT4=
          "]]},
        Annotation[#, "Charting`Private`Tag$79869#1"]& ]}, {}, {}}, {{}, {{}, 
       {RGBColor[0.8816421428571428, 0.3161731428571429, 0.1649857142857143], 
        PointSize[0.025], AbsoluteThickness[1.6], 
        StyleBox[
         PointBox[{{0., 0.}, {0.003947539771955696, 0.03783672620804253}, {
          0.02268458761690903, 0.07079129419569252}, {0.046447675758334965`, 
          0.09825343418540082}, {0.07230320681880648, 0.12022314617716745`}, {
          0.11754896209823436`, 0.14890582572197394`}, {0.15121222935027934`, 
          0.1714858074912897}, {0.1984592866593569, 0.1983376777034489}, {
          0.24390251386580902`, 0.21908685014011742`}, {0.29136223325014343`, 
          0.2373949434665896}, {0.34861580070746817`, 0.25509276701551276`}, {
          0.41077388727540454`, 0.2721803207868868}, {0.4672470608672778, 
          0.281944637227672}, {0.5169207443565185, 0.28987814433580994`}, {
          0.5628196760099496, 0.2923192234460062}}],
         FontFamily->"Times",
         FontSize->15]}, {}}, {}, {}, {}, {}}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{True, True},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0},
    BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
    DisplayFunction->Identity,
    Frame->{{False, False}, {False, False}},
    FrameLabel->{{None, None}, {None, None}},
    FrameTicks->{{Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
       Charting`ScaledFrameTicks[{Identity, Identity}]}},
    GridLines->{None, None},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    Method->{
     "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
      AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotLabel->FormBox["\"P.Crassirostris\"", TraditionalForm],
    PlotRange->All,
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}]}], "}"}]], "Output",
 CellChangeTimes->{{3.7824726539224997`*^9, 3.7824726889658604`*^9}, 
   3.782472982138127*^9, {3.7824730252351203`*^9, 3.782473082382657*^9}, 
   3.782473124806259*^9, 3.7855782974777837`*^9, 3.786191548000883*^9, 
   3.786191859048587*^9, 3.78619203008778*^9, 3.7861923962678933`*^9, {
   3.786192427309822*^9, 3.786192450305334*^9}, {3.7861924838455715`*^9, 
   3.7861924976301866`*^9}, 
   3.786192592912281*^9},ExpressionUUID->"bcc0702c-b682-4503-9245-\
f8e1ff6803c0"],

Cell[BoxData[
 GraphicsBox[
  {PointSize[0.04], 
   {RGBColor[0, 0, 1], PointBox[{0.5205933867093464, 0.2718797137499939}]}, 
   {RGBColor[0, 0, 1], 
    PointBox[{0.39920637978930856`, 0.26175300565857607`}]}, 
   {RGBColor[0, 0, 1], PointBox[{0.4416567469475467, 0.25384880561747286`}]}, 
   {RGBColor[0, 0, 1], PointBox[{0.540897448823598, 0.259935359826893}]}, 
   {RGBColor[0, 0, 1], PointBox[{0.48043812860363433`, 0.2619625612299889}]}, 
   {RGBColor[0, 0, 1], PointBox[{0.42668933422672206`, 0.2644721354012029}]}, 
   {RGBColor[0, 0, 1], PointBox[{0.4743489398423675, 0.2580376395501227}]}, 
   {RGBColor[0, 1, 0], PointBox[{0.43455091941392676`, 0.2691266960166448}]}, 
   {RGBColor[0, 1, 0], PointBox[{0.646815593752043, 0.3285319831973989}]}, 
   {RGBColor[0, 1, 0], PointBox[{0.5746318202237727, 0.2956299376161555}]}, 
   {RGBColor[0, 1, 0], 
    PointBox[{0.46781270520265855`, 0.29241424467855925`}]}, 
   {RGBColor[0, 1, 0], PointBox[{0.5707493184675169, 0.33013740319786333`}]}, 
   {RGBColor[0.5, 0, 0.5], 
    PointBox[{0.7040633705825634, 0.31428893543777287`}]}},
  Axes->True,
  AxesLabel->{
    FormBox[
    "\"\\!\\(\\*SubscriptBox[\\(S\\), \\(length\\)]\\)\"", TraditionalForm], 
    FormBox[
    "\"\\!\\(\\*SubscriptBox[\\(S\\), \\(depth\\)]\\)\"", TraditionalForm]},
  AxesOrigin->{0, 0},
  ImageSize->{468.8235294117615, Automatic},
  LabelStyle->Directive[Bold, Medium]]], "Output",
 CellChangeTimes->{{3.7824726539224997`*^9, 3.7824726889658604`*^9}, 
   3.782472982138127*^9, {3.7824730252351203`*^9, 3.782473082382657*^9}, 
   3.782473124806259*^9, 3.7855782974777837`*^9, 3.786191548000883*^9, 
   3.786191859048587*^9, 3.78619203008778*^9, 3.7861923962678933`*^9, {
   3.786192427309822*^9, 3.786192450305334*^9}, {3.7861924838455715`*^9, 
   3.7861924976301866`*^9}, 
   3.7861925932871943`*^9},ExpressionUUID->"4747435c-9d8b-498a-ae62-\
fcf4c52ef45a"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{
  3.7861924621919193`*^9},ExpressionUUID->"563aaf13-7cf0-4846-b93d-\
d641940bc946"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Show", "[", "tcollapse", "]"}]], "Input",
 CellChangeTimes->{{3.786191798580948*^9, 
  3.7861918012274075`*^9}},ExpressionUUID->"9793deeb-7395-4511-af6c-\
e0a341f81549"],

Cell[BoxData[
 GraphicsBox[{{{{{}, {}, 
      TagBox[
       {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
        LineBox[CompressedData["
1:eJwVxX041AcAB/BTqxiaVOMR6T1C8vJUzsv3TC1ZnouUpY5odlI3XEKcl5Ur
5WXOXYXyFnFbNI70Ju93HHc/7+53qaWNioeQvMVq64/P81nvF+Tuv4hCobj+
78vKrXk1VcaODnpfeTz9Mn+Hf34nxxAaBizxsyhDLLdkLyRzzMEXTTpnR5pD
JpoVnuYAGa4sl6QIwGTSNtaLQ8ftJ9dbbobS4cVnDLtxfFBaHn+l+4wP2Cff
5bhygiC3uPfanRGEmNbKyB84sVg6VaR1xCEW30fHBRYwU+FVWC09vikVvSzz
kBCfdOhvTKCOtdyAQisvPUsnF9opUQf3muaAO/TPyu88CnBcM0cjh5sP5x7B
gXhnIQa3fpNbsr4IcsSuu8QrxhPpYV323B+YFycbOZ0shXDD+6SAknvInEoz
TDsqwrN31nbPVMuQOWA9QIusQNrd294jvSJsfpF8uTqsEs8rl1esjanABQmO
2p56iEpSMu2xuhK0oJRZnUuPMa4x81wgeYCE9YKwhpgqcOvvjEndH8GCv7Oe
yKvG0IWPSzkzj9H7UTf7DKMWycK6pMzEKpA72C5KzzroC8p/S1l4ikRJxotz
zHrsuu++XTu+Botf6ffP/dSA7MMOaqWhtTA59ou0JLwRdb4sgcKiDlWuI/t9
uWJ8sLTy1X5Th5Visc1CnAQ7qdzEjUn10LvF0mriNUEQSI97Sm3A65ngI+dT
m6Gnw2sUKhuwRpZrZXJVioFVtO1ZIY1QoeTMaGS0IN1wichIW4zih7Pbeq+1
YpbZEzieL4Zqx7q9bUUy7GY/vp5gL4Hc99x0U4Uc2+5sW/ZXmwSe4Zt1hH8S
MOtvsz/h0QTeSP7ahzVtKLRzbnrysgn7J6tbFN7tUMt1LqtmNCPatN7tUF87
ZMaRq0J7mnH1mqnsZ78OBFKim1cckmKuds8nVn8HnLI/6To2SkHTb9yoeaoT
CRz1vDRqC4ZtJii5bzsR4XNndLygBVJ+xe8i/y6Ixs2mGWqtiDN4uZcx2gWv
YD29+ZBWZJx6kDF/uhtu3vMHU9takTg43W8x1Y0zwsKClB0ylGXJJt9E9cDd
aKiMnigDVfdgNW+uB5pXDGRzfTLcrKdyun7tRWXQ6vDV5nL4mHdNqKoo4G92
7rMgQg5PUsWqOloBmuaPf8uq5NhadoOpvoREQcCut/GLCHgd6Dt04CKJmMX7
gxNBQOOw48o4LgmGCkWHTyNQwyjqLL9MIqvZMDjTkcCmoLNua5JIOJVn2Aid
CLzjqdOHBSQ2z4UZ1+4jcFFh65JQSMJ+n4Lzik6g2O8WrVFKonZk+/shHwLe
pxdRZltJKL79PPjmBIEVoQE1JgQJt693Jw36EgjjWjvwO0kEuA6MvTxJgCaU
2fr1kTDds2VVB5NA9+jCTsooCbUP9PaCIAKXpv2mrcZI2FUUD2cFE7D53Hyf
OUGi05794HoIgWyta9ZtUyQ2lOwKuHyWQICVmWX2JxKeC3e3+IcT0LPjT3RQ
lEhfRu8+FkFAvmeudMliJeyee1m7nydgeURszlqmhPBVsbpDFIFBb5OxXDUl
2NqTF6w4BNKZvHvd6krc0rhdbBRNwCV4hqW6XAnj9kcJBjEE/o1gmNlpKaHD
oOpoxxL4Dz5kY44=
         "]]},
       Annotation[#, "Charting`Private`Tag$78117#1"]& ]}, {}, {}}, {{}, {{}, 
      {RGBColor[0.857359, 0.131106, 0.132128], PointSize[0.025], 
       AbsoluteThickness[1.6], 
       StyleBox[
        PointBox[{{0., 0.}, {0.017638545767691843`, 0.01712435935961535}, {
         0.03640274231941892, 0.04115095092088401}, {0.059930853796436805`, 
         0.06283130841816871}, {0.08467507013834982, 0.08104480327728449}, {
         0.12474622795931142`, 0.10949092298592362`}, {0.16244547877105625`, 
         0.13795803807768578`}, {0.20609459801270053`, 0.1640684214139023}, {
         0.24619590719394863`, 0.18905817617593407`}, {0.2839956625399824, 
         0.20600407477900468`}, {0.3206496661951232, 0.21835198447816037`}, {
         0.35726346803654857`, 0.23530838077279245`}, {0.3916159178564749, 
         0.23961243431298693`}}],
        FontFamily->"Times",
        FontSize->15]}, {}}, {}, {}, {}, {}}}, {{{{}, {}, 
      TagBox[
       {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
        LineBox[CompressedData["
1:eJwVkHtUkwUAxZmhB5UUNARXQmqe+UqBnCCpV23heITyMMQIS1NAPJCBmiCP
FG0ox+mUXIbEG2VzwMABbozX2ONDx/bN8ZyAzkBxgGGAQ5Hwj3t+f91z7u8u
PRATcGiGhYXFN9N5z7bQxI10O4+tntb6L94zf/OAct6gPfqX9PCSTfa43ZKc
1WmiQVTsFSl5QcPaP73T6kxu0O+XLk8dcMPgZElSuWknNNdPVnk82wm/0gNm
vikYRUPaY2JjMJJmS0S3TeFoYsfz5Z3hWCSKsLtlOomq5qaZT5QnoW9MCN4y
xEK2C885PZsFdSCnbME5Dt6K3KWB6zlgfHh6199xXGQcu8Km9lxH7DLZ2NjT
LPi4LPYNGbuJy/HSd4WxuShfR10apcpBoy0xy/1uAV6xHbxvqPJR69u7L6P/
FsrLB26cKCtCQp8gbOQJD67LmBsdw4qxULC2v8KxBOodYlqCxx3Qj5SxxbZl
4AoD2qWGEnzdotWeSReid2zcN3ZDGRjNXq2naRUQO7C2+FwRInfspnCs8C4u
8n4JWkGWY6jKyz/PsxKyh6Px3SvvwunBhJ2ouwpRn6W7uMaJUGrDEjK/u4ei
rpQfb+ZXYv2Lo7bzXouRG5EoJZ5XYd7o58zAUzWgu797nvnRPXRleG5vptYi
rzN9k0+gGJ4M19KgfXXIVvLSps5L4LenhHd2cT0EyZvdY3JqoHbZa3X/WT0u
XIt/kqmWYnLF8O6g4gYwxRPGhcZaODWy+PMjGpHZo49qPVGHqjV+kU/pMuj/
LQwes6wHhU9ZYB6VQcX+gL3j93rUj/d+TJM3Ie5V6blh2wbEmhrcWRw5VMcH
C3673gD9a872Vf4K7HhUM07YNkKgucQzOinRRf8+pO9qI9zqfqV09yoRzjgk
mpojg3DvoSNzs1RwX1iouZgoQ74kcUNAFIFY6nld2LgMnu6pA+2rm8F9Scyv
PNyE/ckiyqmJZqRGGXRGQxNWdrdahkjuY37NW5OBKYfxHzP1aPwDqIf9rZJK
5bCrZnK4TDViNoQ+DndUYDzv3Kjl7BZcce57UXBGgd37hqovdLQg5tMBdbVJ
gQcGvnJpoAYMF6bWK0AJb27I6iyhBk5lFbRqgRJnN2VuplG16O7qiYixUeFa
n56hiddCssq53ydSBcdnl1s5HVooLKyCXaUqHGx57HBgGwnpHrrvQ3sCKQ2r
/P2zSfQx5piXRxI4nGRRMplDgh927WXaEQI+Hm3WxXkkTB3+4uHpHxYJU5Uz
iki0/3eYuBdNgJ/Tg4o7JPZLzGq/OALtKRnr7MUknDn1x6KTCTiDYv1IT6Jr
b+eS9Izp/pu2yLQ2EuocTYLpDwJvRAIFvYPEJt8Jvi+XgHxd6NlLBhKJTf0s
678IhDpWTsBIosJrDe1CNgHW5NHnuS+n93KDJk/zCERXf7Vz1wiJaHPKpU4+
gcDj1II3r0j8LO4dcRMQcBxU/BA0TqL3oAd9pJRAhWFZ+8x3JGI8v83+SUTg
BtdMF06RaBQuaa6rJJAcpLkaRtGBneKg+qSagPf9xF2VljpkbLu19aF42ocV
dOfgLB3UrltE62umfRhr5tpY6ZByfiblopTA2ylKpGS2DvwvKU59tQQei9vl
EXN1CAhwttleT+B/gUmCiQ==
         "]]},
       Annotation[#, "Charting`Private`Tag$78263#1"]& ]}, {}, {}}, {{}, {{}, 
      {RGBColor[0.471412, 0.108766, 0.527016], PointSize[0.025], 
       AbsoluteThickness[1.6], 
       StyleBox[
        PointBox[{{0., 0.}, {0.010343991054092054`, 0.015297211963479709`}, {
         0.02390683664722111, 0.032592823842032145`}, {0.03619256586453797, 
         0.05121500584058466}, {0.052280322659846994`, 
         0.059878299112179706`}, {0.07546389442076629, 0.07586122606522473}, {
         0.09930557206922141, 0.09516698686957444}, {0.12957192699599768`, 
         0.11581213489653293`}, {0.15406845258205057`, 
         0.13777637640030316`}, {0.18625374002248357`, 
         0.15709602239914566`}, {0.21714887928735105`, 0.1750848259104517}, {
         0.2454832699007174, 0.19439806335798987`}, {0.2705727423755402, 
         0.2063980756753823}, {0.2975713735142049, 0.21507952650900633`}}],
        FontFamily->"Times",
        FontSize->15]}, {}}, {}, {}, {}, {}}}, {{{{}, {}, 
      TagBox[
       {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
        LineBox[CompressedData["
1:eJwVymdQkwcAh/EExMqw9ZxUAgIeVEEEtCiC5g/Xa0WGWgWsoJYhS5C0GpUh
WtFDKuIoI2EpQ2qQEyk77JBBxhsZIS+oTMFqOCFtaBtAlOqH535fHosQxqEw
HQqF4vOxT449mfs8m0mnF3wVYPjJvLz4yBG1CexHKJ60j3KSfC4Xq22xgkPd
R5u2RUVsvcE1tStGAoUPLrx1hWNETDdT7YWUPjvDYyovnB3/bvtpdSCO7Gc8
cR0PRKZFzckodTRcUx6FLu2PxoP2U0kR6kRYGr+/UtSaiKMOrm62tHSI++NL
6FU30Xtu74uR+1l4cUmxY9YmC6yLkhebb+VjkLBWHujIQ6M+3yRavxir/2ZG
8MKLMNfVl5KaVgp2y6L3TyUP8M3w1Q39P5TBTWhZnbuOAxp1JDds9WN0Jhzw
yDpdjtCuurKhvZXY3sm6nZdUAXoHQbOwrUINNd9Bf6wSyWcubvWYroba3uux
YXAVltslO97m1OJcq0V9nKIa99L8ZbGp9di+OLGl+EQtWA8Futs8uBAEDL7U
ldQhO4KqSLdrgnmgr1zl2YAhx8wMfYMWeDSd1OW3cnGT266JFLVCrnc0Y/+q
JhRqjjMdfNuhEe5QP0tqhn0Eh27mxMPDb8f8BiQt4NkF+A5s6sBu7cLrfJs2
nJ+rC7E05sMoPKFwht6O0ZIgtxNaPjLW0XeueN4On8Kfo8JVAlh5+/YQl3iI
TewKDpIJ0Z3VUBC8pgPVgQOHJjkimKezhuZLOzCf7nHbLacT7ODDI+fAx3/3
9PJS48X4rdho4YqMj3+pNpr8GAnoybPxih8FWHdqzt09UApnXffKqSkBpivX
BPfvkuHGo/Egf4YQ4n05sl22BCb9WCr3WSH8eVF6t4zkmNhTzxhkirCM/mrn
GZUcFTNHaihvRWg2EtdaPnuKieQB48moTlg1anWEDV0omlUPuQx2QnKsU57j
143Wt097anzFeObFpUpF3TDkvTHW8sRIbKFs63DqAfsOpc3QRgKzgXfXzSt6
kOmU+f4GSwKTkALhBbNe7JrIlqbNS7A+S7PJid2LtZrzNwJCpCj3LEht/EIB
Sciook0gRTZjusv5sgIGUbnHT5rKkLxnZrfprAJ9Di4LqxJkECfcuzsf2Yc1
B5+nhsplKHS5//J+fx+o/qHzBjQCCSWHj5YfUEKklp5dPE2gIrGi/kmbEpTj
L+941xNgbDz1qoSnRKLzGdXNBgIOMqtVbL4SlqqpJXIugar1BbG/dCqhlXCu
eTcTqOWmWX3fpUTjr1seevAINGsjMzTDSpRRY+KcZASkZzcynD4oYa2Qeo0N
E0gzGcnfTCHh4qukrh8l4M3PlZrqkLj4SJZwaIzA05UrrZcuJZFCJtZ2jBPo
+YMyRC4nUbVl0qfwDYEB9ZBnnCkJZs8Hg4MaAjmsnLiYDST8S0XqazMEAuD3
e5AFifD9CSzuPwQGbxHUfVYkDMxL7S21BEbtmhq+tCMRw1t29a93BIqU5/9c
bk+ihm5/eeN7AiFJ21brOJKwuetO9/9AYIIoY0x+TSK/drNeE0WOUmZYwfAO
Euzri0ZTVDnCaRayXmcS7Vt5/Wa6clgLBmdFLiTWlseGHVwix+totnXT7o//
wmd1V/Tk+B8LQ3D6
         "]]},
       Annotation[#, "Charting`Private`Tag$78409#1"]& ]}, {}, {}}, {{}, {{}, 
      {RGBColor[
       0.30244114285714285`, 0.13298085714285715`, 0.6794237142857142], 
       PointSize[0.025], AbsoluteThickness[1.6], 
       StyleBox[PointBox[CompressedData["
1:eJxTTMoPSmViYGAQA2IQjQ6qPjS71O7rtO9bEHVyr2C//RLOi9yT9s607+6q
89scu8B+rUNcWvv+RfZrhP+G2O1fZs//bOL/v8nL7K80KrG//77CvmH7xIgo
yQ32K5haJR+2rrOfGbL9AN+ULfarl/+cU7B5s/2Lz4ckFh7fYb9lOl/b7Cfb
7Bff1dh9s3+P/UEP5q8eKTvt3xj9v7HFYr99B/uSfyLse+yvnxOatYfpoP2R
rxU+b1bus+fmqPgyi+uwfYBY26yTtw/Yn9VTNGJafsTe86Dy+pBnB+31dgTr
sB08Zm845+i7epHD9vwrAk3WCpy0L42e56m29oh96K0HMsIrTttnMeu+jM48
Zv9eN/rm0cBz9qXXK25/bz1uP5GDo3dX5AX7wypyMtq/T9hP/Jf6omvpRft5
+kfavvmcst/LJM/pbnDZ3vts6/Pv4aftJzQYu7EfuWLP8lNYr83+jH32RFO9
3TbX7OdU2RzOnXjWHgD8Z6fU
         "]],
        FontFamily->"Times",
        FontSize->15]}, {}}, {}, {}, {}, {}}}, {{{{}, {}, 
      TagBox[
       {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
        LineBox[CompressedData["
1:eJwV03k01XkYBvAkTXGTrZAmUeFUU9cSJ9uTpZI2dMuIhKTRgoSUpaGSHNSE
ckNEtpFLQgpZL7ku37Jcuu7PmooGpeY2bcyvP97znM85zx/vec95NTx8HY7O
nTNnjis9PzPx3uEdu+OtzTfHK2z7mSksZU3tPk2QD9HOgUJNiOpCpWaEehhz
9Qm//VIPocEbz44JLcGS0fDV7LUEv3MBc0DogG27v66x73ZAQEQgQyj0QAXX
a6aaeMCmt+B8j9Afw8WpnumN/iiRbNYVCCPhPO+RjBcnEivO8E4LshMQ3rdA
g7U1ASyTGdkBZhoOCmKUe51T4ZqcUv1jaxbETG1Hy9hMTM5OH2U45YF9LrEm
i5kLcYdfsfeSQpTW6nWE+BTgVEtieZbaA8RlNv83NlGE+wEl0bcyHqL6aNYu
F/US5O4fKdD7WoaZHZwuXeVSyBXqLoiPqsClb3mFjN/Ksck4oez6mycY6zYS
lilWIFeh/ECyaTVmL+8OIaOPEeUuZro11mDwVoGFcWcl5D+u5hyTq4O26XZF
pcRq3PQ75DbrWA/WXrPl831qUJcQFMtmN0DK4/O97exa8OxV3a9wG8F0DEGq
Vx2kW20duqWbcK7MRlEN9dAZkPonyLgZXLfZ806SDQjj7M0MvvgMHYOKLvde
NCB41fmO0KYWsGPSttYmNcJBf0NB10ceVq56xvt3GxceM34ZscZ8vM/Td+ia
0wR7TzPz5BNtsPHjPw/Na8Jr3/H9OTfbMT7/o6zj9maUGGrFKPURFBdO3bkw
0YwN/ED9d5eew+DSLpWGyGe4I1Rnftd5ASXl4UmjFS0YMnniLct7AdmdGoWn
i1uQeJx91tatA/1O67zV9XkYFtckGEp2wmbjGanUJzyk2627tCulE596ToSZ
6reC+SPqwRFmFzIUhMkS91rh/MvaibUdXQjWMes3UeFD3C//Q827G5oLjWbG
wvlYr2ShVs0QoPGBYMWHN3y8WFq2KDpbAHNXi4bl1m2wPalqxjLpwXuzAY8P
yW04pM49/5zqwcKhlRUNk20YTC+LDQrsRX7RU1XG5nbMhE3c56u+xPWEqqcG
F9sxxVkivbryJf5YIOPI5rbDrjDSJNteiD1x4TltP9qxa6FRiOCTECzpWo0L
BgSP9JjXdOP6sDSo9EKxO4GYozoYpymCFnOJTng0gav/Tfmla0QIqth9ddlV
Au4mRas72iKU3pq+WE47sYqRw1kvgvhgxNaJGAJd3uwJYihC8qeSL/vjCE6O
jn6W2ymCfYCXltINgmG1ksWJZ0RgZ8v+ZZVCQKJtcbtRhDBypMDnPt0/rKLy
uUkEg8nm+29pSxu+fr+vRYQquT6WRyGB9UhE5qJ2Eba4y7JZHIIKs8dSET0i
LGPmfzAoJsic1uYfGxdB6XLRyKuHBAEuUk6b5CisZMzyJCoJ5PU7dW8oUJDK
tsr0o81ZeFd6SolCpYXRygHab8tNq/JUKaRFrZOrrCI4JB+gvnwVBV1zm1qf
pwTbmoZH5xpSyPB0cOfWEagwa/2fO1NIis/P2fiMwDYsPuuMK4WYqdzRO7RD
eS5dS90pvMt3KlvUQjDk+WXTIS8K02t75o/T/put92XMj4Kyq7F/WiuBqWT2
BckoCqXRd49PtRMcFlyNNSymYDE1PYRughurfq9+WUKhMczF6C7tRj+tydAy
Cg+Pnvt1roBAR6Zhb8MTCgKLtpR62u/xXcGOS++/jnIz7yWIzPdhewspmNWn
MTToPykVm/IYFIWoN6anQmi/tpL5VjRAwdTrmms37Z39uS7iVxQmfPd8vCIi
UFIcUr84RcGz1GD0DUXfw63ITmuagny2T6t5P0FwYVhEyycKa6ecLZNoU9uX
jSz+SiHzmt3wlgECuaS3ig+/U5B47Shzk7blcLn1gVkK/CQF7jjtgI2XA79I
9EMy/c/FGCTICd2XkzqvH7kSmeM3aP8PrX329A==
         "]]},
       Annotation[#, "Charting`Private`Tag$78555#1"]& ]}, {}, {}}, {{}, {{}, 
      {RGBColor[0.24882857142857143`, 0.264202, 0.7825611428571428], 
       PointSize[0.025], AbsoluteThickness[1.6], 
       StyleBox[PointBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQjQ4O+qSsb3Rpsl+02nL/dfYJ9gUBffuty2fYh55P
/NnFMd/e26sxfOKLxfYH1j1VYPiz1N6ucLGIFfs6e55VpefDLqy3XyIrlvPH
f7P9uT+FOxPaN9tP1Vopqd6xw15xbRKX29vt9ibHZlqxztxrzy0jz8ZntMc+
VjZ/YdSEg/ZTPYWMKq0P2KdwWpZcczxqP1V0uapK3CF7trMiPUsXn7Av5d/6
O3LTEXuPX8daFZectt+7Mud+V8Ax+8LtS94c0ztv7x2mvL5K4YS9s+7dssCW
i/b/N3Fl1344ac+ucLi9qvCy/VpDj4hHfaftBR1fRDubX7U3UFrdNe33GfuL
y2tqZ3++Zj9Pa10KF+s5+6f1m7Udrt+wf7JV8uWOgPP2gjJSu1fuvmWfvemn
IMv38/a5Sqcaipru2IvOFu6Ndrtg77141oY5LPfsz3xtOLMdyAcASKeYVQ==

         "]],
        FontFamily->"Times",
        FontSize->15]}, {}}, {}, {}, {}, {}}}, {{{{}, {}, 
      TagBox[
       {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
        LineBox[CompressedData["
1:eJwdknlMkwcAxYvCPMoiDhCpIJRhJmg4hMmlvE6L8+KQiiyAs8Is63DCokyd
OCQTheJRWYgURM6h3IoiRbC0UHrQ9pPW0vabEJGx4sCIHTpRkYztj5dfXt5f
v+TRk9NjDy2gUCiR8/mP4bbXm5yFX4RXuXg3/M8dZRcpX7jDpGJlZjHcwXnB
dR1m+OH49D6LHn5QMGIOqRgMBDLrl3eGM/CWuzW/hxGDw5zj5spNMbgyt2mV
iMFG2KTn71nBbAwrQsY6GRlYWpTPCfHLwEIfoeI+4wy6hUZtm9sZBFw7ym6f
4qO4KvO81U0++IOmRde8BHgaXxEcW1AMt5kqycqyCoQOmqyc7CvArHb6ZHS2
BkwvcU61ew2y1wYIXy6vQ4Bke1GL8QbyVLaW0z83Ib+j6jBP1YAy39dK/8lb
8F6TN2MWtCCHE7RNbmkFbwdvfJR3G7sbTVQXzzZkCykJ3ofuwONAZJa9fzu6
OGd+DXZqw+6lUnp7QAdGd96eKBTew36pwI6W3AnjG/rbLceEODm5pd4t7QFy
fgmob1pyH1n0XRfHyruxnH0gTt7eib9u1Ou8/xSD053+W8HeByjJdL57d1yC
cUd73lKNCKL+oNDVlF54OT1jOPqI8a2h25G0kaLO+tI76zExcrlvio7S+7Du
vHgio0YC9UyL31iQDOcNW74qSuqBIFznXhsmx2rt4kqadS9Iak3bl3EKWLvS
KQ5tvSi//KQ8NEmJLD41whInxeVl12oWft2PU8pkl4tTUkyvWBzVmKlCkcPG
9NIrfRjSD++u/UmNGP9kmzxPGUJoKS+zizQw1NMS7btlECdym30bCIQG+qXY
xsqhZpESv+aH0GbGOo0Z5KjlznblpQyA1lflyUpWzHtIeivNAyiM9i/4dEQB
iavMuCZVi6Gp7DlOvBKF7zxEgr+12MpaMMHQK1HbGhh975gO54JzjJnMfhzz
ud7aY/UIwT17Vx7p6Edubpf4eO4jpIxzypkeKjQkrBq6+pEehVF78l+eVYE3
rVXeKNTjoP2QcP+kCo2pm5PZjoOwmzG/r96mRl45RbO4ehCtBRFpxho1TsZZ
R7j4GFAS3RtyeVaNJnNXqqnFgF2vfF+579SgNEyTdHaTEZstd6yKBRqo0gpn
Td1GhExRR9OeaGBHK64rZpgwsz9ySulGYNmF12u3q01Q6DTvqQcJ7CEXsSqi
SNRzS6drBARe/Fi4zxxDIja0DcUlBHgOrgnrWST2KleFFJQS6InecFAYT4Lr
8TAgo4xAoCwpfYBNwiQmtm+sJLDyzu0CylESkmZ/S+tNAiMXEqXsqyRkUefC
jrQTyPI2y2sFJFQTQf7xQgLOigzV81IS6yM26tFBIHbhOd2JChIfAp097DoJ
SE/eGuHXkRilnBhuFBG4ybH5IO4kIdwh0Bn6CDCt+ZRFIhKHVSvK7ssIPJ1/
WaSYxCnqU4frcgK0YV8qKZ33kyXafqMkcIGV4GzRkNjpNUF7riaw1jLmEjRA
YrBME63REOi7lO5+Wkeia+CDfzNBYE559rMlRhKCH5hzRwYIlKQuWxdNkuA/
SXgWpSUQZFPiU/SYxB9UUbaPjoC+ynPD4+H5/Z/vpR8/IpDBaPmcPkLiavl3
957P938Bd+9lQg==
         "]]},
       Annotation[#, "Charting`Private`Tag$78701#1"]& ]}, {}, {}}, {{}, {{}, 
      {RGBColor[0.25352657142857143`, 0.4149942857142857, 0.8102747142857143],
        PointSize[0.025], AbsoluteThickness[1.6], 
       StyleBox[PointBox[CompressedData["
1:eJxTTMoPSmViYGAQAWIQjQ5ClU4J8OtNtp/49MsE32dz7e+1qSrN9Fhuz5uj
8eZo7kp7izXq2jcjNtkvOu215aTQZvuPvHK2PzN32k8S7cgK4t9p3zRlSt/F
Kwfsl8vKX537Zp+92MFPqzTzj9h/uSnZZPL1oL2707XK3Mjj9reWGH6+3XLY
fuuu3Ki+WafsVQ8uirh/+Kj9jo0vX65edNY+v/SJXXPycfugOM6jTb4X7Jdf
Fv35Q+mkfer+pXwrRC/ZL9G2zfi26ZR98buTQpuqL9ufqj9m1ud0xt6y/eGN
aIGr9t8XyUe8Czprrxwdtu3X3Gv2F43iDRqMz9m3ppneFOW7YT+RS6TS/so5
e3ffbjvFBzftz0cwmQa2nrf/sFdJNYe/xT6D111wZuEEe3Z1pWtxjAvtZ72+
sGGi/lL73vmSQt9V1tvn3sp7WV6ywR4AFuiVhA==
         "]],
        FontFamily->"Times",
        FontSize->15]}, {}}, {}, {}, {}, {}}}, {{{{}, {}, 
      TagBox[
       {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
        LineBox[CompressedData["
1:eJwVkn040wkAx0mZoaJdXWklkcLqnkudVvhmTTlxKT1ZzUOckzoVsuZmk9Kr
JC8nPL1pzHk51J6kvGWYZn4/5u2XFNWiq6t23ZOuVcPVH5/n89/nr49d+MFt
v0wxMjLy/8JXfwiqJS53enqyudPav/pNQ4KvgMOE75HGwgovJhIcPCrcOCxY
dedElqxnoTHo6vBcjjsquxbwPnm6Iyw2QEjn+CFWZBNLrPPDyomSFmNOMOoc
zRtPrQ7GRW7/y3GvaFwvixilO0Wja88rw2cvMfx87n9iWInBD4t8sCbuHNiH
okKoaefAi4iREo9zEG/v0bc8KgdScUp5tvYSWJuHBePWlxDHpXXVe0pxbDxh
YHPeNUxnH2SxO2RoFb3prh8qQuHS7InWwlKUj4pDZ/FLcMYsfG3wvgro7Y9X
3blTjrFyp/0TwuvoZxsUad2VkAYkC6ndclh+dKhgzLyBc6wXrq5ON5FM42fV
Z8lx9egSWc6LatxOE6nyzW6iqrdJM0nWwMctdfaO3GoYgvdX6rLuwDfFs+6v
qTXY9Ey4cVRSB2bs88m5qbdRqw3KfhraAOJBS/pU41rsnfdjVrjdXcyp3czz
4dXhrCMhExxvQo9F+rYrynpM8sV8wx4FnixYLbf+phHvzvN1J0OaEap33rlD
eBeiZBn/94AWeD/cekEQ2YQCS71dxMpWqEq7jTKnKOCd+5vSbakSshn58f4l
CpxuMGkmLdpgzy9724AvnQJ93vNXbRiim2cxu5tRfZTpb/L4HvSS0fM7f21B
6YTPLq1CBT3DW03Tt4ApKuIqa9pRocsOGUtrhb18H92lVA25ycjHzPlKqE6w
lwamdiCixDk3/LISr4PcFh9JIpCZJEguc2xDldLj8P5wErcWVLFOF7bB9G1l
0bBXJ5R7B8Me2dzDo7lbrgeu6sKYRt48mncPJbrEVG8LDZ7nz87yslDBTrPH
5dkJDey3NhvkKSrsm7yvD9NrsPGDDX3wrQrjaRJXaVQ3Dgw26RS8dnTl1wZH
aLsxGDon2qBsR8xYopy2vQdLMhWMsmVqbO3s+4/V1YNFMmNz8ww1xKY/lzB8
euFe9FPBm3/VOJwmOPnwdi/k6BWZ+nagKtM2cIlrH7K+c4V5cQdqRvz9AmR9
oJmHrCrWd4B+4YbcfXY/ZkXXS89uJHCx7U9aeXo/FmVqUvJzCRi4rDOfJvvB
qa/NMTwmUGidLBkzprDG7VHVmqcEfId7Y3UmFGK2J52N1xLIFSbu0tIolAm4
p16NEFhZpnZRz6TgHTiQQb0kEDVzb2e+LQVG4sLXBe8I9D+QMdigYCVxaDGl
kRAXf6S5elGIXr9r+jozEosP+RtYGyjQi63mHaSTiLF8P7JoE4UZvMl4yoKE
Jbi3zLZQWB804im1IsEp0vIGQiisbSZsVtiQeBnzg3/PburLX5aSkPkkMjxS
vYhwCnmuZEE6k8QQ9b1zUySFKSs0LN1CEgn0o5//OEBhomFoR5k9CVuq759r
MRSKaxYrBxxItEmXjVyMo5AR+GLM1JEEw11DnD9MYXnc+7zwZSRqzRwUZxIo
PBlzn57hRGJ3v7A6RUTh/rxpGxqcSdCkHaUSMQXrp/5r/3YhUXnA9oowiUK6
77fv5iwn8T/3SV1n
         "]]},
       Annotation[#, "Charting`Private`Tag$78847#1"]& ]}, {}, {}}, {{}, {{}, 
      {RGBColor[0.2888631428571429, 0.5431845714285714, 0.7666072857142857], 
       PointSize[0.025], AbsoluteThickness[1.6], 
       StyleBox[PointBox[CompressedData["
1:eJxTTMoPSmViYGAQBmIQjQ4U525TCZjfaz/7dOZ0cYNp9muE9rCYn55v31f5
K55daZH92eoO272Plttf/SjDe2jjcvszDsofok032q8oqSs9w77RvqL97xY5
g632V7Z2fLWV2mp/6Km1wutPO+0zd8taKf3bYS8Zfv3n/aj99n8rYndyOu61
Fzv3bmdD0iH7rQH7lFqTD9jvSAxKOh151F7pw6Lj0XaH7M8a/880XXLC3vGY
iG+V5BH7/fkPD259f9r+fOC3CNVpR+3veipzTTl8zl6W67DBMd0T9r83Hzb/
d/SCPbMSm/oWlpP2OzQir/avuWjvKxE3QaThlP23DSZL+r5fshecLaIs2Hba
Pn62Yaq18xX7uQeuxf4VPWNfx6zdVV571X7fzR18VcZn7RXFLi8tr7tmH7NX
gstj9Vl7ALwhjR8=
         "]],
        FontFamily->"Times",
        FontSize->15]}, {}}, {}, {}, {}, {}}}, {{{{}, {}, 
      TagBox[
       {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
        LineBox[CompressedData["
1:eJwVzHk4lAkAx3HZVQlJVFpMWleOtOuoVjU/WY8kR7J6aDTK1FpPqNRYOTdW
x9NWNsQMj6JVs+1aV9KwrjHjmDFvYxjzzpA7laRxVGjT1h/f5/Pfd2PYyQPH
1dXU1Hw+9VkX94FLqf+4Uv+uqrjwWTvTfScb2BSkDpd5yFgUlP7nWpXItgcn
b2kkJ9ceqvEdQTQ2FRZbm8QVN6nQC+P+6cX2xfaPdfnzN3xRaBJ3wI1NRwQt
wfX2lU8myC2p7Gh0zslXLCRGw8dmmd5OdjIsLNWHKkOTUeL94+Xqket4uM8k
gnXsOqJnCsLPlOXAq7ReYmWeg4zcOm0rz1uYks2x0gIKkD3VcM6bdwcq9epV
6z4W4Tc/er8N+x6I+Ju5RWl3Qf2FYPzE/wuLGh6aY2738dY4aNyxtxTnHixv
Ew6UYPM53dNSWTnu7rUf4+aUYaeYluTyrBIrs8xn19IqUFjn4caUVcHKTE+z
fq4Sy4/VL3vHrYYqP+yqxsUqiGcKDnNaudC5bcHX2VKNZxsokXYVtVBVndcy
qnyEUOelWoOCOkTzpgJj/GqgVEu4r3zcgNf/9kwpe2sR6LRnyQ+9jegRZdJX
etRhIiSdeWCkCTFzKOW21KOka7VHjYKH1L5HF7X0G2HS0N3PHW2GjGTOfydu
xHWNJ+/6xvkgdqnNt6U0wZbtFBUxIAB/sXQk62seYu803r/6vAVDxWPMtwQP
Ewt57kaDrah5n2SoGdkMRkkdvUPahprQ4Mxj6nxc7tbfvUbZjsRhKuN0IR+K
vdyU1sdCjM8dttVxEIB0zLygpxTB3dewoEAogCKuUidloAOn1qe5fBvSgi+1
zaYCu8RYjPVdvXWwBf36rfn8XgJnPQM27DnRipGImj/ypY+R+dzRhfqiFUyd
+LXeYRLo/lxrRjnaBj/T8vrspxJMGtdmWQ60garUXWNwpBNGI4606f3tSCcu
+fWPdoI4w/7Vtq0dQxHW258ckUJrVkHLdxSi3uHVYJRSirVFu2x8WEJMO4ui
vOhdqJx1u3PhCxF2DEo4NEUXylhL1vSEidDHV7U+ondjcsLBaVogwmKP4717
Q93g7AhOXGrWAeeMAicRTQZ6cDjDILYDzWlmd10GZeC9f2is0dGBcIpE0E/r
wVOLa/EMQzGujN0qNpD1QLOOpV0UKsayF5cjbgbJ0W5y8PAAR4zcG3m93l1y
SGXUD+EvxMjeHS46JZPjRLmnKGVcjBsqh9osuRwzwxr7c15++vkK2X29cnTu
YScJXomRvGI+OHJUjmZD2wjKtBiM1IPklTdypMsnzvMWxLCP0ZMJ15FIbFNx
u7QI2Gx8wp9cT+LD0eP0YW0CVhLOg9XGJKL8r3JVOgRM7V2zDpmSMHZ4l6m9
ioD+eHTA+CYS5QsOClcDAnNHOzo1XUg85HgV5xkTeLMqt2nzThJ2hbMPik0I
TDcwyv2pJH5/7Z9QSiHw0uR9BsuNxKZrlnY8UwL9Cuv91vtIXJNuo4yaE1Be
egMfHxJJ8YkjLy0IyLc1bTntRyIk7mzojCUBSXaQLjeAxDNmcsISawJid/OP
fYEkspgZRsttCAhnXk+qBZH4RhQYs9KWQEtRbb/5IRK1sUSKgR2BZv+LhGcI
Cee4he+/2kzgf71Dc5U=
         "]]},
       Annotation[#, "Charting`Private`Tag$78993#1"]& ]}, {}, {}}, {{}, {{}, 
      {GrayLevel[0.5], PointSize[0.025], AbsoluteThickness[1.6], 
       StyleBox[
        PointBox[{{0., 0.}, {0.017307218660313678`, 0.025611676382146186`}, {
         0.038027592046916345`, 0.04482043366875577}, {0.06153144249929061, 
         0.06274860713625809}, {0.08175657920736012, 0.07811561296554582}, {
         0.10581328390197497`, 0.09604378643304809}, {0.12709611445810265`, 
         0.1146122518101041}, {0.15116242208000208`, 0.13190013336805279`}, {
         0.17302691566022402`, 0.14854772301644778`}, {0.1949490268041534, 
         0.16135356120752087`}, {0.21795764057799463`, 
         0.17543998321770124`}, {0.24099506313368965`, 
         0.18760552949922069`}, {0.2640324856893846, 0.1997710757807401}, {
         0.2887380738990857, 0.2112963301527059}, {0.3118523198730574, 
         0.21833954115779608`}, {0.3349473599924597, 0.22666333598199362`}, {
         0.3564030432397097, 0.2337065469870838}, {0.38063260062544696`, 
         0.24010946608262032`}}],
        FontFamily->"Times",
        FontSize->15]}, {}}, {}, {}, {}, {}}}, {{{{}, {}, 
      TagBox[
       {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
        LineBox[CompressedData["
1:eJwVxX040wkAB3Dp3F1ZKk4PtQe9yLu6ch7Xad+uZ6GXQ7N61DFubbpypO5S
wtJ6lNTl5SquB+2sC0XOW16GZs2YbT8ya7/1IJSys/LyZKXWufrj83xWso8w
uOZmZmY/fPTp9PSb5L2qLTTrlScefZp9l8kRCBwwfaV5uO6GA3p2JhVGCryx
mB4gyCjyxvnrlpv8BTTYlhUH5hbQMNLGzPAQBCPdePqONj8Y2XuS1q0WsGCv
VqYm57Bw8IblfEdBPJZXVJZ08+PBkPYZqAIeMqbsaTzux4N3VWr1WVjE/bU2
43AWdOKIELO6PDz5IkHFc82DadvjULfgG7hv7apz2VeENGE21U4mRE95V0We
uRC1M3t5NUUlmKMZPcXnb4G04Ktb5HfgPPBTaEngbUgvZscxhitRmLRr+9rR
ClRNCU5BVwXXibLK8uv/4KTJw2/ReA1S/s5K2M2qhl1ChuGWrg4K39BUP1MN
Cor2PkhvrYfJ59CEKLMOdp5amwJlIyJZpJX5xnrErXL7kVcvAk+ywDugvgFN
J7yo+YoWWNj7iDRhTRg/L5wzau4j11cWfmxIhOS0GUP2oBjdHs0c9Y4WpPwy
vUzyvA3SdDalQtEKPSXcf9+ABD41pog/bcXo7b/mcGnsAY6pZr/s7xbDK9Mq
d/iVFAqmBT2V34aZ8VdmhU/b0Vts1hLuLMG3qaWerw0yXF5ulyd/KIFe0hVW
9awDfzR8MNPHP4Dlc2dKjrYTE/y7hSEWUpT57T9DeSJHjCWmYm5KUYs3Uy/7
ujBnbF1q+U07vkuMc4x9okC0U7ZRqGrHxkzq4MJRJX4+QKH7R8mQz/DJX6JT
YR7X+Jb+VIakHc6Lq4cJ7BlcJgyP70CHkXemkezGWI6wJtTQAbo4Q3KU2wP+
XtJ9PacTIwWtxX1jPYgZnpfrO9KJe+rStMMHHiJJBNN/YXIEFc/5B489hODp
e/0GhRxLFAvfcDi9kAyORBX6diGHXT1LGezFtqD4cwEFXejJkT02Z6tBsd3m
lPi5AgErsho9BtQo4F0daeIqcMpfmljM7oP3C0mvvFOBg8qrKbdH+1AzrrzQ
7axE5r0VaaNRGsQcN8UQJ5WI9bNixz/TgGx4419BKMH/qu579+hHYK4MiZ1d
rgIj6u2hE7pHSONOStewVRj6vjTBOlKL9g3O5TvvqHCTRzk+pNXivezieMu4
CjuFdsRnj7X4zeY4Q2NQYbpjjYtbvxabM2eOGF6qsGXpZt3RIS3ERhFhP6lC
vzBu83y9FlkK1oqjr1WwkRMWa99psZ1jmlz6QQW+Tc61WCqJ9Yy836lWBNz8
CieyHEg0j3E73BcT6IkoC6p1IpFfpqj3W0LA4VbbO9MaEltvRzSHWRNo8ptm
XfYiwSq5wjy3jMBUZJhLFY1EdXZE24ADgXx+VJpmC4lAZSHnhSMBWkmsbnYr
Ca8Nia2TTgQuTZ69uDWQxL8phqvmqwm4nq2dUIeQ8LSaUK9yIdBdIg56u5tE
QIHew92VQKJS+ReVSaKKmbzpazcCUtvRMG44iZN0TjLNg0DspqnyC/tJaJJF
FXRPAtZRHyzuRpDgD5Rd2+FFoPHsgqheFonTh9b5hnoTiC61bTBGkyAcd13a
s47A/8zLdLM=
         "]]},
       Annotation[#, "Charting`Private`Tag$79139#1"]& ]}, {}, {}}, {{}, {{}, 
      {RGBColor[0.513417, 0.72992, 0.440682], PointSize[0.025], 
       AbsoluteThickness[1.6], 
       StyleBox[
        PointBox[{{0., 0.}, {0.013079733527936722`, 0.02253726625514281}, {
         0.027435140289799584`, 0.039431787229190884`}, {0.0466754863770239, 
         0.05309417607250229}, {0.06472181683420067, 0.06514724182429275}, {
         0.08931708712244339, 0.08766315532891958}, {0.11393050354488148`, 
         0.10856749808407622`}, {0.13736805047146725`, 
         0.12625094699824146`}, {0.16807856798350954`, 
         0.14392090996471238`}, {0.19696176978209012`, 0.1624000297928421}, {
         0.2228145671700637, 0.18088476876584436`}, {0.24874902216191597`, 
         0.19211743936623088`}, {0.2740411040032564, 0.2065743752945323}, {
         0.2981300971474517, 0.22022777350604766`}, {0.3247341444911087, 
         0.22581882265431413`}, {0.3531201422127393, 0.23462964181459728`}, {
         0.3809182051864439, 0.24183001405438478`}}],
        FontFamily->"Times",
        FontSize->15]}, {}}, {}, {}, {}, {}}}, {{{{}, {}, 
      TagBox[
       {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
        LineBox[CompressedData["
1:eJwV0nk0lfsaB3A5RWUoDZSK5EZuSlEqt3xJbipDUaTJlDI1yGpvlkNt8xRK
tzpFbBKdzHJVSmTa2PwUtmnv982mm1MiU8a47/njWd/1+e951vdRc75i7Sop
ISERyszfaSSXULswx9SwdMGXqr/za2HkH0o96mB9WtJ5TKyOyvW++/rFeriw
2LjKsVsP2+2uxAnEJpjKfZv+jjbBxWGPl/ViG8yoV35LEtpAsqzPvFrsgssp
dq89BC5oeqp5v0Lsg6iecl/ZOh/sUj649704GEL53VLH84OxZHydpPDlXZRU
8BYHWdyF3F1fHb/ax1i6iHgHC5OwpNMjt8rmCTItPkZoh6bh+fQbCWH2M7wL
VPXXOJ8Jvv47VnBWDiIOOAwoCLJQxtFdvlamAGNZy9Kjq/JALwx7blP4Ao7d
j6aapApRlrhd0LylGKeVY27HrSiC52ROUqfoFf7sKsyoMipGu3PIuJbjGxT3
Uc9mDF5h8aXO24LWUgiy+zIXqJbgt/Wc3pCyMtwstt4dovIW4iXGtfvnymGp
qjI3OFAKjV73mYqTFWiwaDbU9ioDf2EzGXleiTpXbvLRE+Vo0XPrP9hXBZXk
0QaPTe9hZHLBzgE18GEJC/2kKiBvHy/z6AYP+uzmPGNSASMbdfmHnbVwGlWP
LuNWojXpZ95BnXqIWDenTdyrUD8wlrj6Eh8Xe9I95q2rhsY/zrXlVDVApuTZ
0a/t1RA7DJ9ykyboHd7o9IFTAwmWC9zUmnByrZyDqRoPxluDJgL4Tbja4L3N
pYaHwr/0BRu9PoBVbzQ5droWdkrrT+us/oh7SeyksbFaaF/S2ra04iN0FT+s
XRRWB91qnlawUzNCtmd5KUjVw+N2Yp2dXAvUR3IPzkTWo9lBKr40uwUqBesT
kmfrcck2Pn3mcCvE/KhJkQcfe95ZOieOtWLq1sTZwA4+9DenmTTeFcCyccOQ
uUEDXBdp852M28C54uhlnNiAqq+H/cLFbcg46flg01ADbEcjWSE320Hbeq00
NGyE8tVfyj2bO9Af/8/N41GNkB+U6m2u74BWz1dXZX4jdn46cFzDrxN6qbFF
aTIEtyZTVxxV74Khc4C8eD/BSsX7kzLvu8Dz4cnKXCU4+rLmypvKLij64lQ5
46hTE5+9arrwpHJWj+1NIJFs/7GB34UgfduY7msE/Zprn8e1dcEkwK0p7zpB
5R7umeXfu9B5T/npHn+Ca2efv1NeJcS5qRfho6EETU/ehWpdFuJt0Hv1JQ8J
ViUHHci6KsTZF1y7x4wd/zD9TcdHiICmJxpbHhEM3qq/ucNXiF08xXuHEgnk
2W3+CBIiqejZ64DHBEcODXqfuCeEZkS0cnMqQfV3lXOcUiH2ymKn7nOCEv1A
/Q55ES7GuwrKXxM8yedYWymIYCHtFbSzhCBGO/Ry1XIRfiQHN2QyPrMh5mn+
KhEu6f/PKPYNwazcQ8WoDSIYT/gmHi8l2P+56KeBvggnSIsGKSeoS/j+38Sz
ImjVu0b48wgK5Ic+LnMUIcsvXrGH8aPI0YEIZxG+HeKbHK4l8LoxrXH9oghc
K7a/Uh1zj+ei+xbeIvQNPnTIric4tn8jezZEhO7gVdPVjQTtP87scswSIXCy
PzC/hSBy368OmVwR5AUGuStaCQyikn4vzhdhhL58ic04SZ0qly8W4a1/ZMK/
BATOtg7mb8tFON4cEVbaxvRV4uSk3CZChGSedG4n02f4heiWeRQWO6WwDD4R
5DdLbb05n4JZX6FLHGPn9RlNm6UpCBOzqR7GVa++rAyWpbAg1iYwupv5j363
lO1KFE7Gu59vFROssPYsitWmMH9lab3NZwLNdVdpMzsKLJVF0tN/EXwuT62r
tqdgavh6au9XgrQLrUUHzlAYfqAQHchYNc8gxsiJwpfZAo7ENwIlkwV7dntS
MLhVVj3HWNr94R3NGxTCC6Xyvn1n9pFrCEjnUNjNWXNZc4AguGDOTT2EAi9S
wHNmPDd9HqqRFDhHcLyd8XisTr9iAoWzt7velw4SfHlRaSqVQaFEA3O+QwTp
9uPbQp5RsEwtDs9h7DKrtVYyi0LZSUFWD2P6YNzwrzwK+1hSDebDBG2d9slj
rylwfba7Ko8Q1EgMTvQ2UlDwLRhNHSXIMF+dVfGTQkSGY7z7OMFU94+a6EkK
6UMmV+4ztmTzemxmKCTdsv9Yyfgnl72mdx6NjSVrNqpMEPx7vDVqvhyNmP7p
mTrGvdw77qbqNIozN7Pkpgh27/IIldOg8Xjpjgd6jGP4xtzWTTSc6i4b2jPe
Mf6j3XUrjQA9f6U0xsHmVmZhe2jICgent00TbBiX0ayxohEZZha7c4aAFdOz
P86ahoEsa8SGcZ1ayTm7EzRqelqF3oy9zT3ufTlFgx2hvTeLcRmXt2DhBRo6
mTu3rPnF9L8rRa3JjUbVm7HCnYzd+Ox9Dzxp7FLvK7VivHRc4/ombxoFn12c
ghg7mIf2mv1OY9aouL2bcUH3GQmFGzT8ehdxJhhLsXes7eDQaOqIzZafJcjh
9ti4h9NY+VonYQ/j2Z/GFZF3aPw82hAfydg6ZjV97D80bIMLTiUyfqo2NLX6
AY070nWZOYwtzFN0/0yiwV0Q/+ED45RutuW1FBo+NwyzxIxHWVYeBmk0NhxR
lRlhbCarGSb5lEaOm+6A5BxBIneWW5dJQ7GdfWIZ4/8DHatYIA==
         "]]},
       Annotation[#, "Charting`Private`Tag$79285#1"]& ]}, {}, {}}, {{}, {{}, 
      {RGBColor[0.6215634285714287, 0.743557, 0.3500992857142857], PointSize[
       0.025], AbsoluteThickness[1.6], 
       StyleBox[
        PointBox[{{0., 0.}, {0.01623998980008704, 0.04058336263026685}, {
         0.03745905339602517, 0.07440283148882265}, {0.06347872936143967, 
         0.11112111196382607`}, {0.09818947679129625, 0.13721041651185478`}, {
         0.13673714488820637`, 0.15267074513290887`}, {0.16309589756373238`, 
         0.17102988537041058`}, {0.19796726027732606`, 
         0.18842275506909642`}, {0.23291000756146982`, 
         0.20195054261251874`}, {0.2642121417475718, 0.215478330155941}, {
         0.3015105798598599, 0.23287119985462684`}, {0.3401117863846826, 
         0.2454327168592333}, {0.37742807063960804`, 0.2618593160191033}, {
         0.4124600486369391, 0.27055575086844613`}, {0.45470186825980313`, 
         0.2831172678730525}, {0.4946772277677099, 0.2869823500283161}}],
        FontFamily->"Times",
        FontSize->15]}, {}}, {}, {}, {}, {}}}, {{{{}, {}, 
      TagBox[
       {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
        LineBox[CompressedData["
1:eJwV1Xk8lOsXAHBLlpAUJYWEurIVP6qL20EYokSFLOW6tCrdLKESkrJvITUR
V1SULbJmTUq8sk7MzPtmS2VJdkm/M3/M5/18P58zz3Oec55li4uHtRsPFxdX
P/44X57U4BmzRpO9Zwy8Jznf615HVqoOKkLLNa02qwFF8A+rubo8oAUqVRNr
9vdrwVyCT8nnASOgiRmNBFBGsCvF6jBz4Ag8f+jwSoh1BLo2Vad3D7jCnV2G
1//X7QpbWTNNHQNeMC59LiKqyQta/opzbB8IgeHGryPGz0JgiiZPVDQkApGx
ydLoYCJ0qNedLld5CCrKxiKzVmnAHP1WEW7/CL59SbSN8smEVtvLCm0LT+Gn
dJL0XNQTCL864BQinQ9BikyzTxrPIV1BT8thuhBaHnyWXxdVAIcU46a+vSqG
LsuQXqHhIlDSNzX3OVYKpwqLPsYKloC35k41XdUK+OeD4SrSrBS+gX/2QmsV
+EY115y3KYdrh535/tSsga1mr2XVzSth749NV9em1IK7Zf9KN4dXkJgqWD3y
uQ4M/RJlhGUwrmQVjWndAIaWCi21G2ohaDG2XvXla1CMtpkUFqyDSxbGIv68
b+DIpTxJHaoOUleuvTd4rgkMzgaNi9fXw4nO1dPmlW9h/SMPsycxDXBMaFtC
m1IzHPrDJS7C7TVsPl++rTD6Pfz6Gb7l0Y5G8GddD41ltsDpk9Lz8kONIFbm
pBJpQsCym6frnxlvQMZq10FDizaoPFcWH2neBBuYS1xjk23QkGnI1fS1CfLp
ljZZjz5A8NiOSz9i3oL4YPma4wfaYSqnzGBO/h2I/13oocjbAUmBdeZR5e/A
b3qEllLcAWIJcQs3ac3wRHRPqIhjJ7T+nU7namgGn+Pip6LFunDfLB09tu89
iGoLPBct6wJVvv4h4aL3ICKv4/HX8W7YMS7HbJNqgWyjhXb/NT3wJO1IeHNQ
C4iMt9FLSnvAXXBDYGVfC4i2aK3kvsCAibVXnEK1W6FPs6DPTPIj7Aea0+bg
VhDNc1cyqPoINo7Xdp9vbAW28wtJ2r+92C/1p18ECfBNkThvLtUH3LvDEzqA
gDwBbrfjRB9ckIeCKE8C6orfnt3e3gfW3TEFpl4EdP4Tf3G6sw/2zYhq83oT
MF+tcDW8tw8Oed197eNDgKGvSULJUB9IXGaI2PkR0D0SUSu6hPExIlq817Hu
b9fLVisxQUfIeOhnGAEWkao9m4OZEK881+6TSoA/Paq7PIQJAp6zKoJpBGTn
jncdvcUEOGG3IQXN05LfGRHJhAV5o5yyhwSUrdJun0tiQpJtRdlMBgHbYv5q
IXKY4OGt5HcsmwCu+IP117uYkH7jVxCRR4B6Rl7dRgYTAo2saIfzCXAoFKsr
7mWCwhOBh93okvb2mm8kEwqd6MLMAgLOi9u+sv3KhEVPt+ZPRQT03jlRtuM3
E5SO+owxXhLwIvliHqnEAt6v8RXe1QSUMhy+FKqwYOUbPnIGXSlFUwhVZwHx
8HWwdw0BDfdlklW1WJC2X9XcsxbrmfYuwA9YcOhyInm6noCZbMWD4jYsGNPq
Wa/3hoBdpYxRkxsskDLYUB3cSoDOQv22jaEsMClRHv2B3quT5zx2mwXaSuEp
LgQBJpU3OxOiWWDDs9Nbv40A2xrNSiqFBY9jJHfOfsB+N0VG+Oez4JaozQuz
LqwfQ1/5OYsFex7Ezsb2EcC40uBkRbHgmdajlq/oeVnTuOl+Fizqu2sbMTEf
N8t5nREWbChd83IGXTjp1PjmBwvc5cqDD7MJyBW64vJJgA0eHwN1FykCHuoV
35PQZMPI6JDm9BAB1eSe1pdabDDebCanP0wAO7iS22E3G/wbj6dGoGXe1p9O
12PDac90iy2fCbh3tH2XOo0NTrSQf2kjBNy5MNFOc2RDRk81M+ArAbcfbhe+
EsqGBymif94bJ4BbP2leLIwNDgZlfD1of5JnOCuCDX88PXdKfIKAc7LMmvZY
zOfV5y/h6IP0aB/l+2xYO6P3zes7AevuTn36mMcGrjsOpNYPAqJ3OxMehWyg
WwQvnUXz97yv5Ctmg0lj/vOH6Pl1Wcka5WxoWFJsF5oigJlgdyCsgQ2nfM6u
60VnxFSV7vmI8fQzUa4zBGzaoZzV2seGWjeRnwnoO61JCa5sNph9L/lVhw5d
dfFC7AAbbpgq1G2eJeBMhLziyBgbUvmO0TrRO2/diknmIcGjcM++7fMEPNk2
fVWNj4SmSFtua7R8o/PZegES1JUCjvijxfl0jCdESNia0V/2Fj0bPLpoIklC
WYZg0D8LBFQFWJ2cVSHhSncT141FAkQsTaMb1ElIU5CYyEY7boaSeA0S7qp5
n3iPXqxW5d+xmwQBX99G8Z8E7OEWzDplSAJr+MYzOvrWh+UWbWMSsjdey61C
d6fPzPCakmAsHKnGRnsbDhg/PEDCsvy3Ypkl3D83Xg0x7Eg4o/qcTEJzHyle
le1AAsPk6EQR+pBirrb3cRI2ya4NakNPNKTcXONKwmbeFmXBXwSo8ntv3e+B
zqYl/4u+0n3uwIZLJGg+pr8MR7/LcvEe9sL/nxSw/w99hnbodbA/zrdBdmsH
Ouu2ilvFTczH5lCn6jKePzv5qLDbJLzce5jPEG20XarYNoIEo4FzpTbogbf8
fNOxuF4XdmYAWk64P1OVTgK/XlNSE9qjj/F+MZUEVyE/xkf0qxxiuimdhORE
oH9FO1lUGbllk+Dfv+qp0G/c31F3Bx8UkrDHJo9thP7iFCPiXkyCnrCohjV6
j3qolk4pCeLXgvlOoHtaPUO6q0gwSM7VuozelnY2N7MGxweXmGC0j8ffnZfq
SajNVHOPQkuIWSqufkvCnUd8ueloV8rYgtWM4xusXZ2DLsrX88ppxf2QojVd
hOYJ+h/d7wMJwnnuDpVoayvlBlonCRpB5UYN6PQtW0bX9ZCgKiab34z+Pikp
MfiRhCWH5Aft6Jh4PtdAkgQp5eZlNnqx4c5N2X4SDtjLSA1y5p9TyK4cJCHd
8v3rEXTr9qIm+88kSAoxVoxx1uto+HX+CwnPwvS7v6Mzoj8IJ49iPVv5dKbR
q2qd1bQnMH/GHzvn0L5TEwc7JknQzs4qXUD3b71+8d9pEix1gzt+oi3sRONX
z5EQfqc88Bf6ZfiDomcLJAwVWtYso+WrVLvMl0j4O8kg/jc6cqJi9ssyCb/3
xs5y/DN2q0gDFwWVubpjHO9UHpMW56GATu7z4fhk/Qs1F150z+M4znj3Ha/u
LViB8XfOAme+tpl9llz8FCyvD7vOyYc/RtjZUoAC5+MrrDn56ip1XEwVpGDw
LLNkFn2x9l7Q2EoKbuuteT6FfmTvEq8nTIFFR8ZuTj16p7b/FyFCgeaOuMOj
6NVRk0W9qyjQOcTk5tTTaFtZw/bVFLjsCjEcQPtVB3b5ilHw9NPtdZx+PLcz
HX6zhgIJ66/+DPTg5Oq59eIUpN56fInTP6mIHoGTEhSYBtcvcfp7UDFtQ/E6
jDfUlXqNDqk6uX2FJAU8b1Y3VaHHJ2b2Z0hRsFeOYD5DK4RVOUxupCB6uszw
EdpO/qa7vjSuP4pbl46uPyIRzZalQF8su/82en6sL1VNDsdfWBEfgFa/9V/e
1S0UCGZXd3ii75ZpftioSIG1tbmoE7rFevHTma0UPLaUFrDi7NfR2h+l2yiQ
W7s/nnN+zstaSdhup+DicMUJZbThDQ/bBHXsz/v57u94/i5L7z7dv4OCxR95
Lp/QucXLvhoaFPiy6wM/oCVHou4R/6OAsYLHKx89apHLEv4Tx4/p2XUGvWXY
c9xeh4IQttdRzn1gc1339xNdCoSmLvDvQ9cUvJMz3UuBzzm/zZvQieu//BOy
j4LelM9qjXjfXPwc5r5oRMGudhX9Z+j9pcreF00o4K9qe5uA5rJ3D3U0Qz/V
23cC7f5g4rGWJQWBn+itE3j/0S7EFjw9hPM/G77fjpYHjXI5a1yPShz1As2g
LjWLHMX+6Qu2XUYbKc6ODdpT4NgYQJvD+3fzTNKsvSMFK7a1El3oxde7f7c5
USC/J4AoQuef8hOrcqbglSeX9gW0dM6SZuJJCtxNo+4y8f6f0uD1Nb5EYVxT
bRq+H608mYEVntiPcfkab/TjDqMwDW8K1iqxtc3Rx71D78n4Yj6FPrem8f15
V7qyauYaBcqKO+v10RkgxpMVhvW51kCvxvftmliBkHQEBbKqymui0HafrMTj
Iynojvy+dAwteiNBMSCGgky3NJ0f+F76N66n2SRivl43D0qjjya/tHyfhPmU
fL82NI3n9bSdneFdrGdOpeJz9PDKe2fU71OgmOPD+Atd26tzKZNOAVXiOrQC
Tc/p89+Yivl7F51pxvfb5+rVG7FpFJQPubjFoa0OyETyp2M+gp4MG/T/Ae1W
aqk=
         "]]},
       Annotation[#, "Charting`Private`Tag$79431#1"]& ]}, {}, {}}, {{}, {{}, 
      {RGBColor[0.7306125714285715, 0.7364672857142857, 0.2882132857142857], 
       PointSize[0.025], AbsoluteThickness[1.6], 
       StyleBox[
        PointBox[{{0., 0.}, {0.019951478465821522`, 0.03724608011301801}, {
         0.045210431008866486`, 0.07256102452675563}, {0.07295141819404662, 
         0.09447346737538069}, {0.1111985520151146, 0.11635092588162751`}, {
         0.14405661062003947`, 0.14302998537929093`}, {0.1811987290182389, 
         0.16682458584786664`}, {0.2226521075893527, 0.1867779055233089}, {
         0.2619770564536492, 0.20769504383127238`}, {0.29613053313892146`, 
         0.2257592090182886}, {0.33155222752490116`, 0.23616530165870295`}, {
         0.36904795085841835`, 0.24752121919468711`}, {0.4034462309604492, 
         0.2569739885052938}, {0.44005454190821686`, 0.2625924738912429}, {
         0.481943126553568, 0.2672366453419573}, {0.519656452924204, 
         0.27093798876557756`}}],
        FontFamily->"Times",
        FontSize->15]}, {}}, {}, {}, {}, {}}}, {{{{}, {}, 
      TagBox[
       {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
        LineBox[CompressedData["
1:eJwVzms01HkAh3HbZZPShaVlHUcztrbCJo7twny1WVttiLRZZWrdlhE6dTgV
Y4fRQa6tuxalEYmdNIyEkcGMMX7jMvhLhUgXVGINKnbrxXM+b5+NnsEuPkvU
1NQcPvVZzsiBoO5AW8bmdWanP1u/yrREx9gQ/ISC+B10Q2S6PJpS0s0wpcGt
06SZYWnojg0COgNJKYyKTUYMVK9g3iqgO+Lw0I7xOANHpHWcO5tDZ0Kf1r/g
p8PEksrFXzPoQehUxYRYrAjCrs12B9LoEWjfr52kGGND7YWurZZfMhLi5H6S
iSRkBHlfz3bNRMozt7pLbRlYvTH47WNFHg7lHrFIe5qLgPHvBvghN8CZTGp0
u1eAZcn+EUWMIkSX2Esjtt+EvaXugMjtNiY8JO7K4VvYWfkNj3+SD30LF3bM
uTIEYc75dko5DP2ft9NO3IFuYVb5mhwBvryQSJR6d7GBb2RGOJWQiGqFrLsC
TG7q8ZjzqAK9KpUxvacSefkIFHhVw/4dL1F7UIjC2ivZMvsa8GwdOVLmPUT1
ZxcGu9SB9QNTUaSqhpWvwjvKtR7nqeSxNxE1oP0SYjSX/QD2TX9JIkdrkebF
XFTlNuBBwPrhcE8RLBxrWDdSxDAtD1DniephvWtakpnZiJZCne9HMh/A/HhD
uDi7CR2mt79Y2N+AI05LG3IuNyNj8seRuLEGDO4zmrmfLMFO33WHytPFyNIo
r4rlSqHusy+g1rwRNup9yoSzLUipmeKYSxvh8GX/YF+IDNYmnGIvnybE9Tpd
7PqjFXohseLDM03YXnRt2VdBcujK9760S2xG4z8xL+OD2+Con8D2MJQgKnbY
vfwkQat12DnNAglKPb+uM/RWIMPAd9mwiRRL14rLdh1rh92AjoOoRAravFp4
M60D3sIMQT6tBfOsNXpavA5MuHMHW6614HnzUXalQSeK6we9OrRkUL9++WF4
fifyVv62hXVZhr0+8x9z9Lqwe7+t0RGVDJN2Fg6uV7pQ8q1AlH6iFd0893Rz
bSW2hm6TJEhboXhdw/NJUILnb3m1ZLMci0KN0rq13XDjdkVJ4uXgXTUeupPS
jSSu32nVKzlO+Z9/9F69B7RIybstjDY4V1Ur/OJ7cCfMTng+vQ1ubyzjTJf3
wtrvp/w9I23osQ07kxjei0vGFVentxHEavOd1i/2Ilh7Ou9VKIFzu4FqPJTC
vHmgdGs1QZPSM3vFBQpiQqIP3ifY2VdsTQ+jwO7X+eBfQ2D41JLr/ieFRvsT
WsV1BGNTh9bJYiikssTjRmKCaF321ptZFA4OTh9YLicQejxhnrpPYTV7XJD1
mGCLJ31JeC2FEavdSfwnBH/7+hdmiiiU/n5mo2SAICp4ZlwhpqCpkXp2aojA
KVLzgo2cgu7N8vqfRwle8mxS9R9TsFnlunz0NcHxW1wrqwEKBt16QbNvCBRl
sofOQxTGNaXJKycJKoRHjeKeUTjeTS2YTBFEtgSWzU5Q4JR2RZ9REfzbJjis
/fbTz0dlBWeWwK9zftrsHQUrUW1uyhyBY/+l3b4zFMpS7XL47wkaBuRPImcp
dBaNlIk+EFiOrI/MnacwasK6SD4SFL04Zlz9gcIYre+/RwsE+hO50u4FCkNx
poyxRYL/AaM+eds=
         "]]},
       Annotation[#, "Charting`Private`Tag$79577#1"]& ]}, {}, {}}, {{}, {{}, 
      {RGBColor[0.8241045714285714, 0.6995635714285714, 0.25042971428571426`],
        PointSize[0.025], AbsoluteThickness[1.6], 
       StyleBox[
        PointBox[{{0., 0.}, {0.027016258904268318`, 0.02856975515074548}, {
         0.05642220173654851, 0.05714953521667175}, {0.08466537889915857, 
         0.08376192567837544}, {0.11298874679760802`, 0.1054683732734988}, {
         0.14129607654888945`, 0.12815600944193808`}, {0.17147585998201925`, 
         0.1459452214301825}, {0.20110633687464965`, 0.1607883614696834}, {
         0.22894455082127105`, 0.17562398282279873`}, {0.2585429514195657, 
         0.1924295000089318}, {0.2839754432910074, 0.20823628502018252`}, {
         0.30892278121062117`, 0.21717224378942523`}, {0.3345477308480773, 
         0.22120476592088278`}, {0.35762261508584287`, 
         0.23503914887032054`}, {0.3748676328280896, 0.2400177723719615}}],
        FontFamily->"Times",
        FontSize->15]}, {}}, {}, {}, {}, {}}}, {{{{}, {}, 
      TagBox[
       {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
        LineBox[CompressedData["
1:eJwVzGs0lAkAxnGmLHYYcitNpHRRdoScDq08SCi5rNRJNCTaNlZOU2mVGhNp
l83IyTbKWkXCJMyZXGoxGGaMmdd16I1Kq0i7KZeQS6sPz/mf35dnTdhJ/wiK
ioqK9+K+lnWeHH9s5+rUz9358WtPF8/HBAjMUEwZmpOUm6G2IUndWmCNSzkr
1hmXW+M1Ie0wEThjjP9Q90OpM6a7IysNBH54UjZlX1XiB9Wnjpa6glC4lRrY
BBaF4sqh/EFtQQzkGw0nc3Jj4HkrUKQlYIMeMPPGmsvGzT29jN5j6ShR6vPN
6elg1eYd4ZE8xBd8dri4lYfbS3OiJpblwizNnuvK/gufPsRv5HDzsdv3belC
QR7cAh/c8KgvhMqc+EXi2fvQ1ByljHuXQNaaUtTI4SM3nSq1DSuDp0ZUCMWu
FBV9HiPqsQJcXLc+Yv1cGX710qa2VQqhZ5EYP/1SgP3TcWp2XRVoc/BqCrst
RBD5jDs7WIUK/qXsM+4VMHkppj9a+wTqxe1cY2oVnpofZGttr4FDxc3j4fer
USh2GNuMOjhP8vU4zCegGIiiVINF2PzqTmc2pQYHE1Z15UfUI7Gze/RCQi1S
2Y6PG5IaYGxe3Z2QUoe//7ROe3i9ETpzqjxrNxFkPm9fGTwSY15XS22fej1i
efQvll1NGPqYzegX1WP1krUay140I2DLM8uwyAbkL/zLPakihRVjdHanaSMs
jFO/uU1rQQB3yUxRXSM8FXlucctl0GjffeRakBjuhhxKx7ZWfI5/fq9mQQyX
81sfTLnKMbEn+qcL15uwklXYkxmhQN9IZ0IBoxlcNV7LEIfAb7lf7s7UNYMT
ZLX/snsbwksuTgztksAyfiyRULahMs30KqNdAv8Ss2LO4XacP6p04vlIIeGn
CK8NtIN7pX8YYim+m+i91BPTAfUCQb6VSwt0vLjOyZ86MPyfyMirtAUDI5tE
rOROOCXmlreZy2CTxbBvpnUhTzKdSUuRoc0oOoOV0YXgHCOMvpOB2cctCTbv
xgYvhzwLv1acKDOp4xd2IzOrfrl5YSsiiNR0h++VcK/yYGYuleNhtb3H6hYl
+oQJAwcC5YgV+oxH+vaA3hydNXRXDqsZ95DJFz14z2FmkaNyhO8tFL0+1gtu
dKmqha0Cw1GeGlve9YIZbajZE61AkFJKE8Y9BYs+9KC3WAFvXyH1jgoJxo9b
RI4vFVhF1daeppDYfi60ZtWAAiNN4TQfNRLDg67hc4u+4mSw7LMmic3t9KLq
fxSoZbCM/PVJ7Jw0Md06pICNls0aygYS8sijBfrvFTCU8reFeS3+6Y07Zcwq
MJi41L7SmwT7D1//43MKlDsHO9D8SBw/d5i2Y14Bn0qqY3UACRPv39mvFxRI
LjjhosdctOsOb1sKgZkki731MSRYh54nP9YgIHFhe69gkVDy/DakaBLInO/x
iT5D4pnd6Z8PfUvA9kzyDyvjSEjjickpKoHI8DcHTl0m4RikfG+lQ2C7mdNB
SRKJktjOjtlFa/TdCDS9SkI0mhAi0SWQt29XcEsqidaxsVOhegRO6WQfNksj
IY4XzljqE3CWTTDPppMICd+0aWrRtOS9oa0ZJG7d81GtNyDQ75p3ZG0miV/c
1nNSDQn8D6BQWmw=
         "]]},
       Annotation[#, "Charting`Private`Tag$79723#1"]& ]}, {}, {}}, {{}, {{}, 
      {RGBColor[0.8849417142857142, 0.6205167142857143, 0.22512285714285715`],
        PointSize[0.025], AbsoluteThickness[1.6], 
       StyleBox[
        PointBox[{{0., 0.}, {0.030632497727013076`, 0.04093307408260284}, {
         0.06417258632169086, 0.0784713390191145}, {0.1112716424305624, 
         0.10073437848176285`}, {0.1572448636916853, 0.13320449631943948`}, {
         0.19369254315402779`, 0.1673479521098601}, {0.23607288277059518`, 
         0.18789518311334968`}, {0.2699654066219596, 0.20501362856561622`}, {
         0.3152533371061918, 0.22216605042301463`}, {0.353982055868756, 
         0.23419369783969157`}, {0.3860928237002046, 0.24449987406302118`}, {
         0.415413479082884, 0.25139425293769346`}}],
        FontFamily->"Times",
        FontSize->15]}, {}}, {}, {}, {}, {}}}, {{{{}, {}, 
      TagBox[
       {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
        LineBox[CompressedData["
1:eJwV13k4ldsXB3CVQqVEGlSiVKYGkupUvijCzw1lHkMolW5xRXORikRxo5IM
ERIuSkRJiUyvKSnOed9XZKaEjPnt84fnPJ/nOO9eZ+2191pH1unEfpfpAgIC
06eRP/J69dysJSEpehoR8ToS/FernNUPXWLW4vsj+TiXR2theG2mnlqMOh6/
LbFWi1aH7gnvh8tidDGgkVW+LEoXu79t0JsfYw7vhoPP5keaQ2tF0AqRGFf8
PPDkh0ioKzQ524VnxXhDdlghR+iSNwr1Qs8LxgRg5TzFVqGDAVh8Y9AxKiwC
FnOMwxOEI7Agulki3C8WKmNLPbZ0xSBo0w79ezJPcKbO6G8FyUTcXuld5771
GXJmjuQ+vPkU7P0LEVKe/+Fkt8++h9oZgGlGv8u1bCw7dNtlmM3EYkWZn8bB
Obi8/oZztNNz+Euo22xzyIPTZNX5gic52KqU1z/TowCqDUb7OufkAUqnht3k
CuG7UnTnNfV8yBglfowKfItzwQHi7rqvIRe4IHPP/Hdoyhs6k7etEL+qqKou
3/foW3l7n93mt2hTLBYQnPEBzRyTW2Pbi7DwXyuhXv8SXP1rZdVD1XcQFdHS
ru8pxS5rU9994u+hEO5wZ4NnGezL5KdNjL+HmELNomt0OSob+95kVRZD6pNv
xn73SmR2W7ZXPPkAx5C30n29VfgzWMNJ9SpBrkIa806pGmpmYTOvK5XiwOKI
nWX91RDoTHcq7ihF7Y3kTCqxBh0adusmQz/ib785ErusaxHpmDIyvL4Mj4RF
/nxbXgdVZ3EFB6oMWeKbZgTW1qFg4ktPol05rJIG7hyJqIcq90JhUV85pIsF
Rf+z/AQNScv2GV4VKHXVjP09twEn54T5SXZUYEb44sLT1Q2oPBz8dsK2Eqt1
l4wOB3xGob1Oxn9vK+F08fBy3vZGyDt2Hg5YXgXVPaZlf8Yboeq2dUTDuwod
wUfuSP/3BZr6BTOT31Zho7NU2+l/voKxO/7GbjYFm4JBk2rlJrT2e1gU6VBg
DpkceLSxCVFHu7vu61JwnZtm6qHahB5bFQHPvRT+tnGzmLutCRYxSzNk9Sn4
j36x1dvdhP0pNmt8DSmkbXnjVmjVhLayBBexAxQE0m6czwhogo/G/l2MA4XE
aOnkUKYJZv1z9Gf6ULDOTgiN+taE0PCfg5XEomXKPknfm5AZZDH3ri8FryHO
3sKeJqSdeHxe7iwFbUOLtv6RJvjN03bnXKDAHQ2RNVrQjMdPbh418Kew0Gza
fVHtZhTudZg3HkLhypzWwMD4ZjhhrD46gYJ+SZ2HU2Iz9pnqnd+aSEHM791+
TnIzapx2PqaIo8fipLrSmhF1bJHHnycU8jodU/TzmqG3+c5PsxQKAyX0R+Ga
ZvTfTMrpSaPg7N8kfO1PM/xPGmvm5lBQ1CzvsZ/Gxf5cuwKtl+T/x/Oq1QW5
eDEmlvuR+JLn/cjvIlzsdj+i3JhLIcrJSl5XkotTE+z0/lcU6jU/752pzIVs
708PwUIKeyZrA/ysuHg/dXN3VQmF7et6jSNtuZBZFRBjXEphg4nQsmcOXJw8
HelSS7w0YUd6gwsXQ3nC8vUfKfQZPv6scIqLgITFt6rLKdyL+ke+OpCLMuF+
XipF3t+xpGx5PhcNQv5hvxoofHNRDVd5w8XA9fhfTp8pNIYY2usWcSG4q/lV
DfG7b5cGTpRyMVvjnv+zRgqRQZ1S7+q5iI7X+m33lexPU97RI71cdEz8zzGO
SyHijJ3oC2keBDp09XK/UUhqkTmdL8uD4InGSYlWkl+DVqZIjoesvCkZD2Ke
1NFsSpEH8Zj5GTJtFNa+8rHpVOfha5zazwvfKWSPhyUvN+Ih4HrY1MpOCh+c
LSRW7+cB1pdvnSRuLJc6r2DGQ9wPwaAi4vEHscbqNjwcO1pZ4dRF4tuZ/tvI
jYdZ95w9o7opVJ8r0/G7yINV/WPDwV4KLa3B6Teu8FDyoy97Zx+FQUOTpaFX
eaBrqgL9iRevaOyJCiLxtRhdFO+nYF/QFvYigodLHIugdT8o9EwKtHSm83Cm
/MxG9QEKIhe3XjBmeGg/LpnUNkT2K9i5ddU3Hm7L2q9ZMkzB9EGIwVAbD0+C
NVYbEEfntC+6383DwpAPManEaj8i0r8N8zCm/ivu6G+ynuMI4y1K46fUm3c1
I+T8nZDbqy9Gw9TMz2CCOPm88bNlEjRW69Ema0dJ/PeSfAuX0JhhYd/iQ3yj
1lJ8thyNyqW+s5eMkXzuzt39kEMjeLPsaY1xCl9N2pJP7KKRPHhQyJF4ymGB
mLYmjU0e25b4ERucO9L8XYfGlcC0V8XEdPbSfzaZ0FA5nCOiM0FB8J1O03RT
8vme7GhnYsWak1qfzMnzFQyyLxN79X4UPWNLI7Jih2M+8ey1ZxLfudHIzdlR
pDRJYZNa4ty77jRuTQ3b6BKbadeeOnycBjWl732QOMZeEaKeNMIUcpTDiLdE
fP1sfoHG2lVpMQPE1gmzNBQu07BYvw4if8h5y1J9PO5HY/DHVvuVxGVU4N8x
N2icipWRNiA+KLxDpCucxukn8xLuEWf73zYbjaBxpCql/hmx0LSOWOEHNByy
z3q8JU4bDeesiyX5LnjFfCee7t0doP6YxgFGMXeE2HxAq07nCQ2zoqpxkSkK
k119Rw89o+H0LvuNIrGxm85Lzwwax1uGNTnEj789EPTLonG28LiyPrFhs97D
2Fwaj3JHtVyIYywfdWbk03hRP+/YKeJf9UNbCt/QqE6zFLhIfL8yropXTEM0
JtDtLnGf/qhUXynZr5xTnFhirQ9GbpPlNMyDQ04/JQ7XTsyaS9G4uIqVfk7c
8XpialktjafebpteE+/cccBQ6RONLzdWpX4gDs1JjuQ00phjK36nirh1s0Cb
fhMNzV71lk/EWzPMVax4NHx2hUY1EwcqPzt/mKWRZSj9toWYlzSj7HQrv15Z
ow5i1TXWi66101BNatTrJQ6IzXC620XDe1Aw9Sfx1xVC6Qm9NAqmXHyHiNff
txvP/kFDqGw8Y4T40qLsve9/kfwf+LB/nLj+zuzwumEa8Q+K7SeJ5ec7Mi2j
NIbjRuv/EJ8NylEemKBheMTp+RRx+4xr+QICDBL7pqb4XqCd6XR9GoPpm2uz
+eZc4gqLzWBwUP1LHf/zh14Lp0cIMigaWWjHf/6tic1mK2cxWHvmqjF//Zcc
h/FEIQa38hTT+PG1+ATGbhBhMJYr6M2Pf27O870vZjM47CORxP9+6kNM7665
DBqHzPfwv//BzXPDi0UZGKpSBvz8BJ7cyvlrPoP368+94ucvO92JqRdjoNFh
d5efX15vcICtOIM8R68mfv6FlHOVWyUYcO6/CeTvzyb31tqjkgzyb+Mxf/+s
k+b7/lrEQFtvcB1/f9PkXIunSzGwHBg/zq+HRqfbRwOXMfjetm8Tv16mx+Yv
EF/BwCeywZZfT+YrJOxlZUi+OP6DF/j5t9EQTJZloKmY4sCvx5R7R1I2rWbA
axTcwq/XScnCYaxlIOdpKc2v58fzjofYKzOofuDTzT8PjY8qNlesJ+v12daO
kvMyR0W5cftGsl7uf+qdxKcOdMtIqjIQf556+gOxVuSRzPKtDJbodnw9Q+yl
8NF8+3byvpnxM1fipDz58UQOg4Am+UkTYjFu++4ruxi07lOSXEfMk3X9tG03
A2/qn7Xl5H4Qzyr2TdzDYP99x9ZMYp09a6QX6jJIaS5YeZ841bXVtV+PQVVJ
yTw34jNPnUYS9jHo2ipbNUbuq8VbHJZJWDPwuthVI0Js8OH1m0s2DBYWcV07
yX14wUL6UJ8tA9VzWr6lxN99uakfHRgw5taLrhJnv7bRuORC4k+sURkh96+x
nqVj798MSp829BaT+9n/S85Mm1MMNrjWWD0kznFfnFLqyUAscuduL2Lp4IaB
eG8GBk6HbskQ99aY+lufY3AndHSmJ7n/A21MnpRcI/GZcs5Mkf5REXR12YYb
5HkJJVkU8bz83JDwQFIvSV9PPCK+s3yVj2MweV7x7RO7iO9xB/TG7zDQtdkT
7En6VZJDeNeGaAbZw3lapb8odIWU2v/7iMHdY/HxocTKhRO14zEk/vAF1y2J
02VcXpXGk/MxcaHxO+l/L9gtN52SGbxeGx0x+ZNCsfPn9XezGTh1996SIP1y
VvicuInnDNwDVJbWk36q9x6LnHNI/deNrQknrpBL+rMxj4HHVekSfr+tb/Oh
Pr5hELcnZd1s0o9b3KROTpYxOKda58iSfi5wzC77EMtAsMI9T6WdglVd4oPO
FlJ/iy81NJH5IZPz44pHK4PCTtb+KvEhET8Tn3YGwjJB2Q1k3ihNTOoL6iX7
1+DpeYrMI6HsL/msUQaDh6Nxi6Ww0iLw4TRxFpvkLRdYNFHweV3nHyDBQnfb
nxd9ZP6pXrPi2BxJFpeqfpReJb4ymM6RXMLCOviVSuYXUg+3P32Wl2aRYtq+
SJDMT2kVMuLGiixeiERuvFlPQUM7JyBam8V1Ufv76yspxE6oHRPZw6Jl1UvB
VxWkv+ZkmnjpsOgo8u7bS/xRKW25gR6LiThZzYNkvjOVTMgc+ovFzm/rmwPJ
/OfecYdnaMVC6pDM75JiCndveaiPnyDxuB1/yRZQ6P+65rvFQxY8zyeHw1Ip
TNxbLNAbzaLUSCSs/ykFYSsRqSsxLIxd5Ff8j3jV556/UuNZcHZFGwuQedi8
Luu5QAoL75jDas5kXn5drnU1+QWLO2o+/bPjKATn28mNUywOhl3Z3HKX9Kuz
RhqhNSzmxgeZKRIncrQs19SxsOwx+XzyXwqFL+VuGjWQ9ZUWjf0JI/NLdvev
+GYWYvbn8xfcpmD7zPedYSfJd+gHtaVBFI4cO8plu1jUb4/fbxFIwVvJ7rd3
D4vpK3ZVh98g+5esqRTbz0ItNKlL9DqF9wlCYUNDLAQV7aNGyO+FmkOjqYG/
WVyJkXupQsxb3f1h5SiLGOOkze5+FEZiq8b0J1hk27Xrf7lMYaZj4UJ6kkVq
XlzrfGJxmcwNXlMsNE2W0TqXyPmk4/VEprXAS9Zk+9mLFJSi/3WKnt4CXaU9
v9LJ75X/A/zziT4=
         "]]},
       Annotation[#, "Charting`Private`Tag$79869#1"]& ]}, {}, {}}, {{}, {{}, 
      {RGBColor[0.8816421428571428, 0.3161731428571429, 0.1649857142857143], 
       PointSize[0.025], AbsoluteThickness[1.6], 
       StyleBox[
        PointBox[{{0., 0.}, {0.003947539771955696, 0.03783672620804253}, {
         0.02268458761690903, 0.07079129419569252}, {0.046447675758334965`, 
         0.09825343418540082}, {0.07230320681880648, 0.12022314617716745`}, {
         0.11754896209823436`, 0.14890582572197394`}, {0.15121222935027934`, 
         0.1714858074912897}, {0.1984592866593569, 0.1983376777034489}, {
         0.24390251386580902`, 0.21908685014011742`}, {0.29136223325014343`, 
         0.2373949434665896}, {0.34861580070746817`, 0.25509276701551276`}, {
         0.41077388727540454`, 0.2721803207868868}, {0.4672470608672778, 
         0.281944637227672}, {0.5169207443565185, 0.28987814433580994`}, {
         0.5628196760099496, 0.2923192234460062}}],
        FontFamily->"Times",
        FontSize->15]}, {}}, {}, {}, {}, {}}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  BaseStyle->{FontSize -> 15, FontFamily -> "Times", Bold},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{366.1111111111111, Automatic},
  Method->{
   "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotLabel->FormBox["\"T.Bicolor\"", TraditionalForm],
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.786191801759848*^9, 3.78619186807362*^9, {3.7861924646913166`*^9, 
   3.786192501208745*^9}, 
   3.7861925966726694`*^9},ExpressionUUID->"98a4aaa2-13f8-458a-bc90-\
77221b3f4ad4"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"scalings", " ", "=", " ", 
   RowBox[{"getScaling", " ", "/@", " ", 
    RowBox[{"Range", "[", "13", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"xScale", " ", "=", " ", 
   RowBox[{"scalings", "[", 
    RowBox[{"[", 
     RowBox[{";;", ",", "1"}], "]"}], "]"}]}], ";", 
  RowBox[{"yScale", " ", "=", " ", 
   RowBox[{"scalings", "[", 
    RowBox[{"[", 
     RowBox[{";;", ",", "2"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Sort", "[", "xScale", "]"}], "\[IndentingNewLine]", 
 RowBox[{"Sort", "[", "yScale", "]"}]}], "Input",
 CellChangeTimes->{{3.785578407137744*^9, 3.7855784229186544`*^9}, {
  3.7855784529269805`*^9, 
  3.7855785177675347`*^9}},ExpressionUUID->"58388c1e-6077-4a9a-ab9f-\
190ed0c2c4a1"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.39920637978930856`", ",", "0.42668933422672206`", ",", 
   "0.43455091941392676`", ",", "0.4416567469475467`", ",", 
   "0.46781270520265855`", ",", "0.4743489398423675`", ",", 
   "0.48043812860363433`", ",", "0.5205933867093464`", ",", 
   "0.540897448823598`", ",", "0.5707493184675169`", ",", 
   "0.5746318202237727`", ",", "0.646815593752043`", ",", 
   "0.7040633705825634`"}], "}"}]], "Output",
 CellChangeTimes->{{3.785578409835515*^9, 3.785578414309561*^9}, 
   3.785578455985787*^9, {3.7855785058124857`*^9, 
   3.785578518562383*^9}},ExpressionUUID->"4b559050-4ad2-4115-929d-\
10ebf46dd533"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.25384880561747286`", ",", "0.2580376395501227`", ",", 
   "0.259935359826893`", ",", "0.26175300565857607`", ",", 
   "0.2619625612299889`", ",", "0.2644721354012029`", ",", 
   "0.2691266960166448`", ",", "0.2718797137499939`", ",", 
   "0.29241424467855925`", ",", "0.2956299376161555`", ",", 
   "0.31428893543777287`", ",", "0.3285319831973989`", ",", 
   "0.33013740319786333`"}], "}"}]], "Output",
 CellChangeTimes->{{3.785578409835515*^9, 3.785578414309561*^9}, 
   3.785578455985787*^9, {3.7855785058124857`*^9, 
   3.785578518608262*^9}},ExpressionUUID->"d931f218-1295-4a9b-b8a3-\
35ce6fa07d3e"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Deriving", " ", "the", " ", "parabola", " ", "preserving", " ", "flow"}], 
  "*)"}]], "Input",
 CellChangeTimes->{{3.786191570798951*^9, 3.786191582998518*^9}},
 FontSize->36,ExpressionUUID->"107e1d31-8a08-4cb4-969d-46c7f96dc046"],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"\[Kappa]C", " ", "=", " ", 
    RowBox[{"8", " ", 
     FractionBox[
      RowBox[{"D", "[", "\[Lambda]", "]"}], 
      SuperscriptBox[
       RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]]}]}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"shape", "[", 
      RowBox[{"u_", ",", " ", "\[Lambda]_"}], "]"}], " ", "=", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"y", "[", 
        RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], ",", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"d", "[", "\[Lambda]", "]"}], " ", "-", 
         FractionBox[
          RowBox[{" ", 
           RowBox[{
            RowBox[{"\[Kappa]C", "[", "\[Lambda]", "]"}], " ", 
            SuperscriptBox[
             RowBox[{"y", "[", 
              RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], "2"]}]}], 
          RowBox[{"2", " "}]]}], ")"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"velocity", "[", 
      RowBox[{"u_", ",", " ", "\[Lambda]_"}], "]"}], " ", "=", 
     RowBox[{"D", "[", 
      RowBox[{
       RowBox[{"shape", "[", 
        RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], ",", " ", "\[Lambda]"}], 
      "]"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"tangent", "[", 
      RowBox[{"u_", ",", " ", "\[Lambda]_"}], "]"}], " ", "=", 
     RowBox[{"D", "[", 
      RowBox[{
       RowBox[{"shape", "[", 
        RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], ",", " ", "u"}], "]"}]}],
     ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"normal", "[", 
      RowBox[{"u_", ",", "\[Lambda]_"}], "]"}], " ", "=", 
     RowBox[{
      RowBox[{"FullSimplify", "[", 
       RowBox[{
        RowBox[{"FrenetSerretSystem", "[", 
         RowBox[{
          RowBox[{"shape", "[", 
           RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], ",", "u"}], "]"}], 
        ",", 
        RowBox[{
         RowBox[{
          SuperscriptBox["y", 
           TagBox[
            RowBox[{"(", 
             RowBox[{"1", ",", "0"}], ")"}],
            Derivative],
           MultilineFunction->None], "[", 
          RowBox[{"u", ",", "\[Lambda]"}], "]"}], ">", "0"}]}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
    "we", " ", "can", " ", "solve", " ", "for", " ", "y", " ", "in", " ", 
     "terms", " ", "of", " ", "the", " ", "curvature"}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"rule1", " ", "=", " ", 
     RowBox[{
      SuperscriptBox[
       RowBox[{"y", "[", 
        RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], "2"], " ", "\[Rule]", 
      " ", 
      RowBox[{
       FractionBox["1", 
        RowBox[{" ", 
         SuperscriptBox[
          RowBox[{"\[Kappa]C", "[", "\[Lambda]", "]"}], "2"]}]], " ", 
       RowBox[{"(", 
        RowBox[{
         SuperscriptBox[
          RowBox[{"(", 
           FractionBox[
            RowBox[{"\[Kappa]A", "[", 
             RowBox[{"u", ",", "\[Lambda]"}], "]"}], 
            RowBox[{"\[Kappa]C", "[", "\[Lambda]", "]"}]], ")"}], 
          RowBox[{
           RowBox[{"-", "2"}], "/", "3"}]], " ", "-", " ", "1"}], ")"}]}]}]}],
     ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"eq2", " ", "=", " ", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"velocity", "[", 
         RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], ".", 
        RowBox[{"tangent", "[", 
         RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}]}], "\[Equal]", "0"}], "//",
       "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"from", " ", "the", " ", "equation", " ", 
      RowBox[{"velocity", ".", "tangent"}]}], " ", "=", " ", 
     RowBox[{"0", " ", "we", " ", "get", " ", "the", " ", "rule"}]}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"rule2", " ", "=", " ", 
     RowBox[{
      RowBox[{
       RowBox[{"Solve", "[", 
        RowBox[{
         RowBox[{
          RowBox[{
           RowBox[{"velocity", "[", 
            RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], ".", 
           RowBox[{"tangent", "[", 
            RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}]}], "\[Equal]", "0"}], 
         ",", " ", 
         RowBox[{
          SuperscriptBox["y", 
           TagBox[
            RowBox[{"(", 
             RowBox[{"0", ",", "1"}], ")"}],
            Derivative],
           MultilineFunction->None], "[", 
          RowBox[{"u", ",", "\[Lambda]"}], "]"}]}], "]"}], "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "1"}], "]"}], "]"}], "//", "FullSimplify"}]}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"-", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"velocity", "[", 
           RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}], ".", 
          RowBox[{"normal", "[", 
           RowBox[{"u", ",", " ", "\[Lambda]"}], "]"}]}], " ", ")"}]}], "/.", 
       "rule1"}], "/.", "rule2"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{
        RowBox[{"W", "[", "\[Lambda]", "]"}], ">", "0"}], ",", " ", 
       RowBox[{
        RowBox[{"d", "[", "\[Lambda]", "]"}], ">", "0"}]}], "}"}]}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.78471151523885*^9, 3.784711714978468*^9}, {
   3.784718605041656*^9, 3.784718702157054*^9}, {3.78471873243629*^9, 
   3.7847187759199514`*^9}, {3.78471885512973*^9, 3.78471886090327*^9}, {
   3.784718922977848*^9, 3.784718925593812*^9}, {3.7847189594375796`*^9, 
   3.7847189829537516`*^9}, 3.7847192656920943`*^9, {3.7847193421535068`*^9, 
   3.7847193675546227`*^9}, 3.784719414918364*^9, {3.7850029687743106`*^9, 
   3.7850029755729074`*^9}, {3.785003225383275*^9, 3.7850033004199395`*^9}, {
   3.7850033734210534`*^9, 3.785003374186576*^9}, {3.785003421067959*^9, 
   3.785003437516666*^9}, {3.7850034952503543`*^9, 3.7850035603971987`*^9}, {
   3.785003602167585*^9, 3.7850036363520126`*^9}, 3.785689582271001*^9, {
   3.785689942976452*^9, 
   3.7856899454699044`*^9}},ExpressionUUID->"3c670706-5dc4-449f-86ab-\
ff0b31cb099e"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"\[Kappa]C", "[", "\[Tau]_", "]"}], " ", "=", " ", 
   RowBox[{"8", " ", 
    FractionBox[
     RowBox[{"d", "[", "\[Tau]", "]"}], 
     SuperscriptBox[
      RowBox[{"W", "[", "\[Tau]", "]"}], "2"]]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"d", "[", "\[Tau]_", "]"}], "=", 
   RowBox[{"d0", " ", 
    RowBox[{"(", 
     RowBox[{"1", "-", " ", "\[Tau]"}], ")"}]}]}], ";", " ", 
  RowBox[{
   RowBox[{"W", "[", "\[Tau]_", "]"}], "=", 
   RowBox[{"W0", " ", 
    RowBox[{"Sqrt", "[", 
     RowBox[{"4", 
      FractionBox[
       RowBox[{"(", 
        RowBox[{"1", " ", "-", " ", "\[Tau]"}], ")"}], 
       RowBox[{"4", " ", "+", " ", 
        RowBox[{"S", " ", "\[Tau]"}]}]]}], "]"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Series", "[", 
   RowBox[{
    RowBox[{
     RowBox[{
      FractionBox[
       RowBox[{
        RowBox[{
         SuperscriptBox["\[Kappa]C", "\[Prime]",
          MultilineFunction->None], "[", "\[Tau]", "]"}], "-", 
        RowBox[{
         SuperscriptBox[
          RowBox[{"(", 
           FractionBox[
            RowBox[{"\[Kappa]A", "[", 
             RowBox[{"u", ",", "\[Tau]"}], "]"}], 
            RowBox[{"\[Kappa]C", "[", "\[Tau]", "]"}]], ")"}], 
          RowBox[{"2", "/", "3"}]], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"2", " ", 
            SuperscriptBox[
             RowBox[{"\[Kappa]C", "[", "\[Tau]", "]"}], "2"], " ", 
            RowBox[{
             SuperscriptBox["d", "\[Prime]",
              MultilineFunction->None], "[", "\[Tau]", "]"}]}], "+", 
           RowBox[{
            SuperscriptBox["\[Kappa]C", "\[Prime]",
             MultilineFunction->None], "[", "\[Tau]", "]"}]}], ")"}]}]}], 
       RowBox[{"2", " ", 
        SuperscriptBox[
         RowBox[{"(", 
          FractionBox[
           RowBox[{"\[Kappa]A", "[", 
            RowBox[{"u", ",", "\[Tau]"}], "]"}], 
           RowBox[{"\[Kappa]C", "[", "\[Tau]", "]"}]], ")"}], 
         RowBox[{"1", "/", "3"}]], " ", 
        SuperscriptBox[
         RowBox[{"\[Kappa]C", "[", "\[Tau]", "]"}], "2"]}]], "/.", 
      RowBox[{
       RowBox[{"\[Kappa]A", "[", 
        RowBox[{"u", ",", "\[Tau]"}], "]"}], "\[Rule]", " ", "\[Kappa]"}]}], "/.", 
     RowBox[{"W0", "\[Rule]", " ", 
      RowBox[{"\[Rho]0", " ", "d0"}]}]}], ",", 
    RowBox[{"{", 
     RowBox[{"\[Kappa]", ",", "0", ",", "1"}], "}"}]}], "]"}], "//", 
  "FullSimplify"}]}], "Input",
 CellChangeTimes->{{3.7856895964617157`*^9, 3.7856896062425194`*^9}, {
  3.7856896437908225`*^9, 3.7856896711131907`*^9}, {3.785689949814463*^9, 
  3.7856900637610664`*^9}, {3.78569018355048*^9, 3.785690201134261*^9}, {
  3.785695496516729*^9, 
  3.7856955195041504`*^9}},ExpressionUUID->"21f9d609-be43-4f0d-8568-\
fd34bd167822"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{
   FractionBox[
    RowBox[{"S", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       FractionBox[
        RowBox[{"d0", " ", 
         SuperscriptBox["\[Rho]0", "2"]}], 
        RowBox[{"8", "+", 
         RowBox[{"2", " ", "S", " ", "\[Tau]"}]}]], ")"}], 
      RowBox[{"2", "/", "3"}]]}], 
    RowBox[{"2", " ", 
     RowBox[{"(", 
      RowBox[{"4", "+", 
       RowBox[{"S", " ", "\[Tau]"}]}], ")"}], " ", 
     SuperscriptBox["\[Kappa]", 
      RowBox[{"1", "/", "3"}]]}]], "+", 
   FractionBox[
    RowBox[{"d0", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       FractionBox[
        RowBox[{"d0", " ", 
         SuperscriptBox["\[Rho]0", "2"]}], 
        RowBox[{"8", "+", 
         RowBox[{"2", " ", "S", " ", "\[Tau]"}]}]], ")"}], 
      RowBox[{"1", "/", "3"}]], " ", 
     RowBox[{"(", 
      RowBox[{"64", "-", 
       RowBox[{"S", " ", 
        SuperscriptBox["\[Rho]0", "2"]}], "+", 
       RowBox[{"4", " ", "S", " ", "\[Tau]", " ", 
        RowBox[{"(", 
         RowBox[{"8", "+", 
          RowBox[{"S", " ", "\[Tau]"}]}], ")"}]}]}], ")"}], " ", 
     SuperscriptBox["\[Kappa]", 
      RowBox[{"1", "/", "3"}]]}], 
    RowBox[{"4", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"4", "+", 
        RowBox[{"S", " ", "\[Tau]"}]}], ")"}], "2"]}]], "+", 
   InterpretationBox[
    SuperscriptBox[
     RowBox[{"O", "[", "\[Kappa]", "]"}], 
     RowBox[{"4", "/", "3"}]],
    SeriesData[$CellContext`\[Kappa], 0, {}, -1, 4, 3],
    Editable->False]}],
  SeriesData[$CellContext`\[Kappa], 
   0, {((Rational[1, 2] $CellContext`S)/(
     4 + $CellContext`S $CellContext`\[Tau])) ($CellContext`d0 ($CellContext`\
\[Rho]0^2/(8 + (2 $CellContext`S) $CellContext`\[Tau])))^Rational[2, 3], 
    0, (((Rational[1, 4] $CellContext`d0) (
        4 + $CellContext`S $CellContext`\[Tau])^(-2)) ($CellContext`d0 \
($CellContext`\[Rho]0^2/(8 + (2 $CellContext`S) $CellContext`\[Tau])))^
      Rational[1, 3]) (
     64 - $CellContext`S $CellContext`\[Rho]0^2 + ((
        4 $CellContext`S) $CellContext`\[Tau]) (
       8 + $CellContext`S $CellContext`\[Tau]))}, -1, 4, 3],
  Editable->False]], "Output",
 CellChangeTimes->{
  3.7856896066799173`*^9, {3.785689655725997*^9, 3.785689671956669*^9}, {
   3.7856900388727674`*^9, 3.7856900640293827`*^9}, 3.7856901631892014`*^9, 
   3.785690205585888*^9, 
   3.785695528327259*^9},ExpressionUUID->"8651ada7-bcb2-4bf8-acf9-\
7fa997530c06"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"S", "=", "  ", "4"}], ";", 
    RowBox[{"\[Rho]0", " ", "=", "2"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"c1", "[", "\[Tau]_", "]"}], " ", "=", " ", 
     FractionBox[
      RowBox[{"S", " ", 
       SuperscriptBox[
        RowBox[{"(", 
         FractionBox[
          RowBox[{"d0", " ", 
           SuperscriptBox["\[Rho]0", "2"]}], 
          RowBox[{"8", "+", 
           RowBox[{"2", " ", "S", " ", "\[Tau]"}]}]], ")"}], 
        RowBox[{"2", "/", "3"}]]}], 
      RowBox[{"2", " ", 
       RowBox[{"(", 
        RowBox[{"4", "+", 
         RowBox[{"S", " ", "\[Tau]"}]}], ")"}], " "}]]}], ";", 
    RowBox[{
     RowBox[{"c2", "[", "\[Tau]_", "]"}], " ", "=", " ", 
     FractionBox[
      RowBox[{"d0", " ", 
       SuperscriptBox[
        RowBox[{"(", 
         FractionBox[
          RowBox[{"d0", " ", 
           SuperscriptBox["\[Rho]0", "2"]}], 
          RowBox[{"8", "+", 
           RowBox[{"2", " ", "S", " ", "\[Tau]"}]}]], ")"}], 
        RowBox[{"1", "/", "3"}]], " ", 
       RowBox[{"(", 
        RowBox[{"64", "-", 
         RowBox[{"S", " ", 
          SuperscriptBox["\[Rho]0", "2"]}], "+", 
         RowBox[{"4", " ", "S", " ", "\[Tau]", " ", 
          RowBox[{"(", 
           RowBox[{"8", "+", 
            RowBox[{"S", " ", "\[Tau]"}]}], ")"}]}]}], ")"}], " "}], 
      RowBox[{"4", " ", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"4", "+", 
          RowBox[{"S", " ", "\[Tau]"}]}], ")"}], "2"]}]]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       FractionBox[
        RowBox[{"c1", "[", "\[Tau]", "]"}], 
        RowBox[{"c1", "[", "0", "]"}]], ",", " ", 
       FractionBox[
        RowBox[{"c2", "[", "\[Tau]", "]"}], 
        RowBox[{"c2", "[", "0", "]"}]]}], "}"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"\[Tau]", ",", "0", ",", "1"}], "}"}], ",", " ", 
     RowBox[{"AxesOrigin", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"0", ",", "0"}], "}"}]}]}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.785695435255993*^9, 3.785695455144635*^9}, {
   3.785695577283267*^9, 3.7856957020783157`*^9}, {3.7856957560151715`*^9, 
   3.7856957818343477`*^9}, 
   3.785695832384012*^9},ExpressionUUID->"1ef8a2c3-c23c-4722-bb24-\
67d3b8d68b55"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
      1.], LineBox[CompressedData["
1:eJwVlGs0lAkAhpFOSkuSNOUSqUSqla1k89JNDbaIaEu1Slta15SUPRlrVHKp
XZXN/dqFUmOmkzUuy5w6FYPmG8YYM2NmYhgzn05JTLL2x3uen++v57EJjfIP
09PR0fGd2f+khik7m4YC3Rku9erpaRL6O5ZGSyguGNxQ/kuHlsTGwpy8GspO
iDwbWMXjJLzbuhn5lADsf0eb2k2SCDo5Xv8n5SQWr/LSzxOT6Ft/dUcGJQ4B
rr3Po+pJFJntS02jpOD+7cixusskaAY1q69TshGoJ/IRTmoQfKi4evRDGS4u
v9KRoFHDcJp2xMuqGsMTrtpmHTVW+mmULTeYSD6RLBqzHUE81xU5n2qxqHwf
1dJdBXOmiVhXtxH0NBZDGDuM57Idre0/NsOOIU80LR5Cc3j+skMjHLz1oTsb
9ykxtmqb8eOIV5h7vZyZuk4JvYnKBctWvkGk3JDDSRjEpunjzw88aYW9r+Bf
umAArSku3JcO7TCqT/Ne4DkA65uqiYeaDihrGVGs0vdQjUvE/A3v8Ghh43Vj
8/coG657Y5TJg9qKbfsxRQEjy/ukQkFAo/X645ZWjvQzrFNFdl2Yn6SNyEiS
47NHpeL0lW6MBs3ZFaYjR5wzh7m4RYCemI8t5zNkkDzh3Oi0EYJXFXy70UwG
bTiRu+ZSL1rieJsFZf1w9Jzz7VSdCLm8vEtR6IdXic2vz8zF+BDFEKfxpYi3
PGbbf0SCu3pfd3pfkGLtSKBht68UCZmNXXYWUpgajxpwJqVoj3Tqv3VZAv3G
3OoVef0IzzukyusU46xLXc9cbxnyEyMcW63FqNwbWtTwWQYzU8ezofF9GFMt
XTBwRw4Daog2TSIC64DXrOydCiSVOlMCPUS4sodeyBxQYLbT1NC9p72w6aMK
SunvcbUgS2pu34utm1OyKc4DaGMvKXmYI8QRq/YJXd4AotPlFcbmQoy9yZBF
0waRpeqY/yWzBzn6R+P87ZR4fUnD7zHtgamYVaLHUaK9aSqfWSDA7N9pAa4x
Q0j/UnHu/AoBdB4erZYtHIaZVWG+pKYbsfeqMxY2D2N5VmFOuns36h2vGZhE
qtCQn/FSyO2CCTV2bbLRCPgPsmvvn+mCyKmDl8AeAcOB6Ws8zcfTAtgpjqoR
Sfg9OFbAR0j1JhPLb2rEzuaa223nI4leTBM90mALd6sFT0rgsdIy18iHxKs2
K3bSNQLX8unHxT+RCF2vqdKmEjjpr175xI+ENJL79gKdgAWb/dQ3iAQjrfSv
iGQCaVmHX6aHkigr4VJDEgmc3vT3h3kJJJzbi/bviiZgm7Joz5wKEqNVe1M3
BxP4tiXxu+4HJC6ee+vw4iCBHrX8XUXljIfWMV+3BBK4GVQTsvsZiWfkvNVu
/gSmHfzP0dkkcjZW5Xj6EBB1ZhXM4pHYd3jP4EEPAi9Sx0/w+CRuDRT8LHQn
kO12bE2pYOZveflkyDYC3uXrmNtnvKe/Lm0K20rgn4ttr2lDJBqoRSfiXQjc
cfohy2+ExNLyR25fnQnEyPICbGa6scTW0YP2PQF7n98kTZ9I1PbEcG+sI6Cv
S5TdnOmMpnlNsIkTASnLLfz4JAm5o5vRXUcC7PDS9RumSGSSBaMWDgTuWhuO
/d+toGHf6RJ7Av8BCgSFhw==
       "]]},
     Annotation[#, "Charting`Private`Tag$14084#1"]& ], 
    TagBox[
     {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
      1.], LineBox[CompressedData["
1:eJwd13k8VO0XAHDbW0qJFlGpLBUSKUsiBwkVLSJ5k7dkKSpCpGQnKY1KIUsK
ZSlbyJZk382YO2PIFmULc/2UpbfyO/f9az7fmXufuc95nnuec6RsXczs+Xh4
eMR5eXioz0P2I4yKUQud0htM/IYEgf3rXPskVOHbKqf1zujdz2Li30oYAO+e
KD42+nBLR16ChDmkCkxpZvKSYGk3+/6hhB0ICI0fOcFPQo/y7f0REh6w+0Ot
9NNFJCStORoaLhEM6edNZ/mWkxAg+HbbHYko+HQ22/aABAmnrJ5nk1MpoBiW
puCiQoLQQoC10cZsKOhKEdA5QMKW45MjVXfzgeOsonn8JAlerZoQ870Y+HQc
ut0dSFibL9rLy/sBGg7e9r7uTkLhwP7mNu1KkBgvf3DfjwS2ccBUhFElHNEy
kShBz2SVi5mYVQJt+lLQV7TGTc1z9Y54/bnHC1r+JBStUp6peFgJQl4lMcPo
YoN1m/NGKmGxj+ApzUASyl6S7lFRVaCVamVZF0xCpVPCeqvxaqj10Mqm3SHh
7aizs81MNWgrJL7PRadc2Ft6nqcG/B8W5jPRIQ4df19ZXQPVe+TPrA0nwdhW
9GmQdg24Wf2MTkC3WYWIZ92rAf0I+7LUuyR0G19ew7+jFizWh8+lRJDwY+u+
FW8u18HPrU4/zj4gQWdAvy78eh34Ftex/NChCcZ+F4LqIP/EioREtNhqc65M
bB303w3s/4RW53Vue1pdB4fTebUtHpJw/VMMLWx9Pdxte2q6/xEJv2jfV9g1
1IOwmsqG5Y9J4JvPFFm/pRE+z9vZWsWQsL5FfxqUGyEufizRFa36vJNlp4kW
Ca+7jbY/uDguy7QRzhnv6ilA18fabtH3bIR5h7F1orEk0PZK7L1Y1wimBgJD
VegNPqHn311sgvt/vxlbF0eC2jFJw273JtjkWPJOGX1ENl+O17cJ9qmUXjVA
+zV/njj0sAlaI/NeX0YPbNh3vbekCT5Nq8AHdPr76Xt/LWuGEbZ6t008znfh
bOGJrGYIP/VdJjKBBBPTisADRc2gnGYGL9Dn4zYd1ahsBjsrhYP56EiN3uF1
7GZgVJ2R46BHXU5LDPxuBp9rN9dsSiQhvt/Cx9W0BWaWf8xOR/NWHtKPGG+B
q4tuLM97RoK4SIaw30wLuJZf5q9EK9ks+eTK0wpl7McjDPTfP+vczVe3gvzP
WP8pdP6uA6nrtVvBzUJ0RDmJBIdkEMy42wqH+7Jj09HNwaqttQptMDrWnRX5
nIS9K5r4Hqi1wS+RtdXP0Gmx5zRO67bBwws2tVnooKz7SVyLNpAP2fmwmbqe
M+ImHtAGCg0pRotf4PXbE9Y6dbTBDa0OZW+0/mhgziJ9OvSky245mkyCt1Jr
o7MRHY4JHB09jc5xl/hKN6GDnMbZuAvojX+yJeIs6bAo43hDAHp+ZU+g8mU6
CNLlTd9S12trWJyKoUPcUpefK1NI2BT5bT59kg5dSnXiNejyc37pedN04Puh
9r9WtM3uVValc3Sw/PWkjIOOZ+8tauZjAI+5gew4Wlwy3JMrxoB/7T/BylQS
VmbITasCA7R+XXl9Gv1Xtf34BxoD+o84+w6iUx7Px9VHMSBVk/T7hjZwjDjM
iGXA9BpB92l04NKCjIFkBnToCijxvyThzzGBi38VMWCl6btZKfRcz4uvh/oZ
0DZ6sNca/W22r5e1sx2mLzMl6tGFjrTKQ+rtwFv0oLsV7d+h8/KDVjvoF4jS
WGixdwmX0w3b4WrmlaoBtL7n6V8+1u3gunu/0y/00+9sCdmwdvCiBRcovsL3
xS70d0xEO/TUbvHahd5JqH1e/qgdLioPy+1B176NSptNaIeuwc/W+9FTbmYa
TW9xvLtWi63QxlMt5m597WC49KxzAHrVuVt7hr+0g4VwqUooupeuuMF6rB2W
+T8cCUd75NwdPPCjHaSutGyLQj9zOegmIcQECcOVE6lop745i/siTBCO4Wpk
oFWPpmnyizEBXni6Z6EblRbzTmxmgvPpmLJC9MxENa1CnQliJnXRteiPZzzc
1bSZcOtv2oVG9L0WGcsMPSYof96h0IqWfhO4McqECaX3BfxZaNNLum8cbZlg
7PnWcxCdMlbaKHyfCTmDI1G/0Feij8o4PWLC/peWFxbQGgaDN2timCAj77uD
Lw2fJ2HpDp9kJjz4sShiMXrqmBVttIgJs1+fPBdFl/weHzYoZ4L+DzP+1ejg
DH/dpComBCRyT4qhxQXSpk62MsF6cR9zHVrn3cyJ6kEmZFbJbJFBC9qFv940
ygRJPTexLeh2kY1/3Zxkwr6ihvmtaHunA4Uq8zjes1dPFNBKazuFI/4wYUZk
zzFF9FzVJccRfgLKfb/+uwN9TzJK/JkwASb7MuVV0Ccbt139uYqAq/4tmbvQ
m7xKGywkCEhL2bxZFZ1HH7ixTJaA2LOX+9TRPrc8mY7yBHR+clXYgzZUWKpY
pUSA5kKRoya6M0ilx1uTgK1TCsVa6Bc7a9RYOgR4Rdm0aKMv9Zy6v9OAAJ87
Y8x9aPXw8aG7BwngL2Q266B5NPxh+AgBS/9sLAIqvoOrYvTNCXi3n/FYF/0o
8hWZYEWAtSPXXg+9daz1ubkdAZyKwB59NPnE9mf2RQL0s3hD9lPx3z9jJuRC
AHNkYaMBFX/yTqaDBwGtRoGZlE0TJAUqvQnITIpQOIAWO5RrLelHwMq6rfGU
+2cMCq4HEzB4z4zHEJ2RzFlO3CFgZ+UaS8oexy45KNNw/mrXkijr/F4oD48i
ICjvWjflxRmP1g7FYvwFNggZoeknt7nqPSOg/fslRcpP+Uvr41MIGD54WZey
Xc4Rqbl0AswbpIwoK50Z8D6RTUCuOu2/3+eWeLZn5RPAOFHy3/0fC5dsX1pC
QFn/q//GDz+fEGT/gYCiOOse6v/NRVS6K6oJOKTX85zyxvfVqhsaCdh1T8mK
8sjFUxFebQS4qVnwU84TG//aThBg+N0iiZr/zSo/HaUuAhR81XZSNnBdFX2n
j4D+0Lk8Kn7Ckq+4X74QYF+RLEdZ92RQz+Aorveizjgq/m60f5oGJgmIH8nj
p5xSr1X8eZqAYhW1s9R6sXnFX/XPEeCYeT6XWk9Bre9Rfb8JmJTUn6XWe68H
PbCXjwUGxwgVyolDYTbdy1hQtEQmhNov9E32Jp9EWaArPpxA7Sc+K729XWIs
uPLjcia13xya5tdwNrNAfwMzZS8VzxynFqYqC1Z3nBel9vPZUcPSdk0WyGx6
Raf2+0NpmXSGDgtOrGkK3o2eifoU3GbMArPBqqad6HJvE+0maxYcet5PUO8b
mSen0HiOBdl/IrXk0dLjAuINDix4FA3R29ChNu+na11ZYKfwcocstd/2K2VW
BrNA4cQCewPa12dp7Mc7+LyrBYeo9z+nYCi04j4LbpkqjomjV8s9sy2PYYHa
GxaDyh/dy0TWlbxmgdId0U3LqPgbji8uzmVBsNfpjiVU/P3qf7wrZEFzQ08w
lY9SpvwZBRUsyJmL/UDlq0vsqbBcggWGdPP8OcxniStaPXM6WWCiUSs2g6Yb
Z9hl9+Lvz+5dmabyb6mt7psRFhinb/0zgf71jDmb9gvHH/xfwgCVXy8WOCTJ
suHBGO9gA3pM902YkAIb2kp+m1P52Eg8NcNTmQ1dN7JLKtF8dVGTJnvZcDDc
8Fwp2lvWw3P+KBv8G8rXv0Y79O0KNbvJhgNBuQfvoqsLFdLe+7OxjpWcp84T
6fvSjXKhbCj2C4kPRPdorxReiGRD89PTH7zR5k+nHme+ZIPsg5hrjmg9i5xU
gXY2rEgTT9Ol5quYVufSwYZXySaxWtR8+JNGu7rZYOD10VcdXZRH25E7zAZG
jO9W6nxUEnEpOPObDULC70fF0BuadtQUynWAzeSs/hiepzO6mV8u+HXAETXf
M2HospRvcV7BHXCzgf9IIDpQUPFE6J0OcPlcoeqDFqa//pj8qANUaye/uKC3
/pOV2PuqA3YYXaOfRJ+8lXvKnN4BQzGCHdLoguJ3zSDFgdP1o0VvsX64ITkX
dGQrB8KGMzxfo3UD9mid2c4BmeKl21PRzcbF6TfUOHBM5K3XE/SXjpLQgoMc
KHv6J+k6evXMe93tbhxw5NVR10J77KrOF6viwLvo5QHFWO84qG5OelDPgaPT
tnY56FPqPneXtXLgqp78vldorb2qtnydHDiwRrwtCs2nn7JicpID5LdRDxc0
7XiwU826TtDQy2+SRme4Gmz2cOuEvxYdqqDqtb6s6rsMqS4oOa0eJYX1H31C
YHzXti4QNQnaJoauUDxgEqXYBT23QnKXopMyapZZanRBwkRh+jTWk7YvayO6
TbpAJk9hew16KKGeNuzVBXcea1xzQE/ca370u6ULTja/036B9eu/TkSc/I1P
wOBfZ7KA9fJ2vcV/HEq7QU9Wpy4a63WjF1KOuWt7ISJyhHSOxv5O8h/pz9Z9
sFzST0gS+xHFcQuhDtN+SC7jVIXdx/pmBSlY/bMfnp+yCtuN/ZTAh7hsmfjP
ILZEe9loEAnOqqWdSw4PQPulbYPdt0jIPGibVD4zAP5bOKMvvLB/+rZOZOjJ
IKzfk9ISfRXX94QRf5TBFzC8cH62xQn7C+OQZ/lDXyDachUY2JEg1XOIkxzy
FfpE1YOyz2A+1AiOktg1BMajszQb7EetN7bN8zKHIF36TqvdURy/MWLANWAY
+IcVVbONSIgRsPEwkx2Bt3+v0LPWxefvLXjBV40u6fy+UhPr11sB5ppXR8Hi
4rZzItj/8qTbZA+sHINjTxSj/eQxfz/NjlhZOQYVjCc31aVIeL89TFD0yjeg
ua9axYP9s+ghN8VA4XHIvViuZCSK+WkHneldNg5L+uoyOYKYzxJB9ovNBJx0
djWawP79TLa6qOSfCbgdU9sA/+OCf8jzgO6MSYg0H5nU+cyFNyOSccImXDy/
/lwzY3AhLCHkbO8RLrjwPwIhtJ3ZxJas41xwu6wnWE3nwoayshxTSy6cyuI+
UUOH007X3rPlgl5ierp4GxcuqMdOLfXG++WOpfY2c0E6eLXx4pdcWOKo9+/F
ei782eOzvCONCxYXCtOl0Z0Tg+0vM7kwIX7W8lMdFyIt354xzEU3meeYoBcU
zNxDyvB+w65TyrVc6GbQEvmZXLBaKxTyvQqfO3T2PJPFhaPeitveoKO0/pFP
5nBhuw+t3h59OFUpX7+XC/9GSy7pqORCyfWWhoBRLpwLcA0o/siFJzvUaMfH
uVB7oEDSDX11IN5cisuF3UL6xQpoOZNLfRXfueBdrT4ZV8EFAV4iJXKWi31l
0m1zdH+BltPZn1yQ57XYvBxd5pSsvPM3FybTLYpqPnAhepPQj4UFLmiIJh/1
Rf8fi6kI3g==
       "]]},
     Annotation[#, "Charting`Private`Tag$14084#2"]& ]}, {}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0., 0.},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0, 1}, {0., 1.0410836008637334`}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.7856960473913064`*^9},ExpressionUUID->"7e1c82eb-2910-41a2-a65f-\
9dda4fca9692"]
}, Open  ]],

Cell[BoxData[{
 RowBox[{"Clear", "[", 
  RowBox[{"kx", ",", " ", "Stilde", ",", " ", "W0", ",", " ", "D0"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"d", "[", "\[Tau]_", "]"}], "=", 
   RowBox[{"D0", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "-", " ", "\[Tau]"}], ")"}], 
       RowBox[{"(", 
        RowBox[{"1", " ", "+", " ", "kx"}], ")"}]}], " ", "-", " ", 
      RowBox[{"kx", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"1", "-", " ", "\[Tau]"}], ")"}], "2"]}]}], ")"}]}]}], ";", 
  " ", 
  RowBox[{
   RowBox[{"W", "[", "\[Tau]_", "]"}], "=", 
   RowBox[{"W0", " ", 
    RowBox[{"Sqrt", "[", 
     FractionBox[
      RowBox[{
       RowBox[{"4", 
        RowBox[{"(", 
         RowBox[{"1", " ", "-", " ", "\[Tau]"}], ")"}], 
        RowBox[{"(", 
         RowBox[{"1", "+", " ", "kx"}], ")"}]}], " ", "-", " ", 
       RowBox[{"kx", 
        RowBox[{"(", 
         RowBox[{"1", "-", " ", 
          SuperscriptBox["\[Tau]", "2"]}], ")"}]}]}], 
      RowBox[{"4", " ", "+", " ", 
       RowBox[{"Stilde", " ", "\[Tau]"}]}]], "]"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"c0", "[", "\[Lambda]_", "]"}], ":=", " ", 
  FractionBox[
   RowBox[{
    RowBox[{"4", " ", 
     SuperscriptBox[
      RowBox[{"W", "[", "\[Lambda]", "]"}], 
      RowBox[{"1", "/", "3"}]], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{
        RowBox[{"d", "[", "\[Lambda]", "]"}], " ", 
        RowBox[{"W", "[", "\[Lambda]", "]"}]}], ")"}], 
      RowBox[{"2", "/", "3"}]], " ", 
     RowBox[{
      SuperscriptBox["d", "\[Prime]",
       MultilineFunction->None], "[", "\[Lambda]", "]"}]}], "-", 
    RowBox[{"8", " ", 
     SuperscriptBox[
      RowBox[{"d", "[", "\[Lambda]", "]"}], 
      RowBox[{"5", "/", "3"}]], " ", 
     RowBox[{
      SuperscriptBox["W", "\[Prime]",
       MultilineFunction->None], "[", "\[Lambda]", "]"}]}]}], 
   RowBox[{"32", " ", 
    SuperscriptBox[
     RowBox[{"d", "[", "\[Lambda]", "]"}], 
     RowBox[{"7", "/", "3"}]], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["1", 
       RowBox[{"W", "[", "\[Lambda]", "]"}]], ")"}], 
     RowBox[{"1", "/", "3"}]], " "}]]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"c1", "[", "\[Lambda]_", "]"}], ":=", 
  FractionBox[
   RowBox[{" ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{
       RowBox[{"-", "16"}], " ", 
       SuperscriptBox[
        RowBox[{"d", "[", "\[Lambda]", "]"}], "2"], " ", 
       SuperscriptBox[
        RowBox[{"W", "[", "\[Lambda]", "]"}], 
        RowBox[{"1", "/", "3"}]], " ", 
       RowBox[{
        SuperscriptBox["d", "\[Prime]",
         MultilineFunction->None], "[", "\[Lambda]", "]"}]}], "-", 
      RowBox[{
       SuperscriptBox[
        RowBox[{"W", "[", "\[Lambda]", "]"}], 
        RowBox[{"7", "/", "3"}]], " ", 
       RowBox[{
        SuperscriptBox["d", "\[Prime]",
         MultilineFunction->None], "[", "\[Lambda]", "]"}]}], "+", 
      RowBox[{"2", " ", 
       RowBox[{"d", "[", "\[Lambda]", "]"}], " ", 
       SuperscriptBox[
        RowBox[{"W", "[", "\[Lambda]", "]"}], 
        RowBox[{"4", "/", "3"}]], " ", 
       RowBox[{
        SuperscriptBox["W", "\[Prime]",
         MultilineFunction->None], "[", "\[Lambda]", "]"}]}]}], ")"}]}], 
   RowBox[{"32", " ", 
    SuperscriptBox[
     RowBox[{"d", "[", "\[Lambda]", "]"}], 
     RowBox[{"7", "/", "3"}]], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["1", 
       RowBox[{"W", "[", "\[Lambda]", "]"}]], ")"}], 
     RowBox[{"1", "/", "3"}]]}]]}]}], "Input",
 CellChangeTimes->{{3.796390372665694*^9, 3.7963903730496664`*^9}, 
   3.796390456673031*^9, {3.796390799713029*^9, 3.796390830024951*^9}, {
   3.796390863960189*^9, 3.796390966808469*^9}},
 CellLabel->"In[90]:=",ExpressionUUID->"029d7bbb-24c4-4f91-926a-935a6fdbef8b"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"c0", "[", "\[Lambda]", "]"}], "//", "FullSimplify"}]], "Input",
 CellChangeTimes->{{3.7963909703131237`*^9, 3.7963909830814734`*^9}},
 CellLabel->"In[96]:=",ExpressionUUID->"26461d43-348b-4040-8c30-6fb13e2861e9"],

Cell[BoxData[
 RowBox[{
  RowBox[{"(", 
   RowBox[{
    RowBox[{
     RowBox[{"-", "4"}], " ", "D0", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"W0", " ", 
        SqrtBox[
         FractionBox[
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "4"}], "+", 
             RowBox[{"kx", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "3"}], "+", "\[Lambda]"}], ")"}]}]}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Lambda]"}], ")"}]}], 
          RowBox[{"4", "+", 
           RowBox[{"Stilde", " ", "\[Lambda]"}]}]]]}], ")"}], 
      RowBox[{"1", "/", "3"}]], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "D0"}], " ", "W0", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "\[Lambda]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"kx", " ", "\[Lambda]"}]}], ")"}], " ", 
        SqrtBox[
         FractionBox[
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "4"}], "+", 
             RowBox[{"kx", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "3"}], "+", "\[Lambda]"}], ")"}]}]}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Lambda]"}], ")"}]}], 
          RowBox[{"4", "+", 
           RowBox[{"Stilde", " ", "\[Lambda]"}]}]]]}], ")"}], 
      RowBox[{"2", "/", "3"}]], " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"kx", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", 
          RowBox[{"2", " ", "\[Lambda]"}]}], ")"}]}]}], ")"}]}], "-", 
    FractionBox[
     RowBox[{"4", " ", "W0", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "D0"}], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "\[Lambda]"}], ")"}], " ", 
         RowBox[{"(", 
          RowBox[{"1", "+", 
           RowBox[{"kx", " ", "\[Lambda]"}]}], ")"}]}], ")"}], 
       RowBox[{"5", "/", "3"}]], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"-", "4"}], " ", 
         RowBox[{"(", 
          RowBox[{"4", "+", "Stilde"}], ")"}]}], "+", 
        RowBox[{"8", " ", "kx", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "2"}], "+", "\[Lambda]"}], ")"}]}], "+", 
        RowBox[{"kx", " ", "Stilde", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "3"}], "+", 
           SuperscriptBox["\[Lambda]", "2"]}], ")"}]}]}], ")"}]}], 
     RowBox[{
      SqrtBox[
       FractionBox[
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "4"}], "+", 
           RowBox[{"kx", " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "3"}], "+", "\[Lambda]"}], ")"}]}]}], ")"}], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "\[Lambda]"}], ")"}]}], 
        RowBox[{"4", "+", 
         RowBox[{"Stilde", " ", "\[Lambda]"}]}]]], " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"4", "+", 
         RowBox[{"Stilde", " ", "\[Lambda]"}]}], ")"}], "2"]}]]}], ")"}], "/", 
  RowBox[{"(", 
   RowBox[{"32", " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "D0"}], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "\[Lambda]"}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{"1", "+", 
         RowBox[{"kx", " ", "\[Lambda]"}]}], ")"}]}], ")"}], 
     RowBox[{"7", "/", "3"}]], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      FractionBox["1", 
       RowBox[{"W0", " ", 
        SqrtBox[
         FractionBox[
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "4"}], "+", 
             RowBox[{"kx", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "3"}], "+", "\[Lambda]"}], ")"}]}]}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Lambda]"}], ")"}]}], 
          RowBox[{"4", "+", 
           RowBox[{"Stilde", " ", "\[Lambda]"}]}]]]}]], ")"}], 
     RowBox[{"1", "/", "3"}]]}], ")"}]}]], "Output",
 CellChangeTimes->{{3.7963909722973175`*^9, 3.7963909914510603`*^9}},
 CellLabel->"Out[96]=",ExpressionUUID->"3d7f2552-bdd6-4966-ab47-7447ab79cfa5"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["W0"], "Input",
 CellChangeTimes->{{3.7963904433945227`*^9, 3.796390443577035*^9}},
 CellLabel->"In[87]:=",ExpressionUUID->"382c80a6-a11a-4f44-a521-7fb493cc3d15"],

Cell[BoxData["3.991499900817871094`18.601136122815575"], "Output",
 CellChangeTimes->{3.796390444009905*^9},
 CellLabel->"Out[87]=",ExpressionUUID->"27e0082b-0da4-4ff6-a1b2-0daab23ea4cb"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["D0"], "Input",
 CellChangeTimes->{{3.796390448922737*^9, 3.7963904539443054`*^9}},
 CellLabel->"In[88]:=",ExpressionUUID->"8fea376e-5235-4b5c-9a2e-fcb54b97550a"],

Cell[BoxData["1.681599974632263184`18.225722692132628"], "Output",
 CellChangeTimes->{3.7963904544848833`*^9},
 CellLabel->"Out[88]=",ExpressionUUID->"c0e39bec-e2a4-4fed-b74c-b7d398f3775f"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["kx"], "Input",
 CellChangeTimes->{{3.7963909216731873`*^9, 3.7963909217679605`*^9}},
 CellLabel->"In[89]:=",ExpressionUUID->"5eebf165-2693-481c-8d58-1f6d306fa946"],

Cell[BoxData["0.5368254903731748`"], "Output",
 CellChangeTimes->{3.796390922028264*^9},
 CellLabel->"Out[89]=",ExpressionUUID->"d095b8f9-d147-4a01-90ac-296006b06cde"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"Solve", "[", 
   RowBox[{
    RowBox[{"{", " ", 
     RowBox[{
      RowBox[{
       FractionBox[
        RowBox[{
         RowBox[{"4", " ", 
          SuperscriptBox[
           RowBox[{"W", "[", "\[Lambda]", "]"}], 
           RowBox[{"1", "/", "3"}]], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"d", "[", "\[Lambda]", "]"}], " ", 
             RowBox[{"W", "[", "\[Lambda]", "]"}]}], ")"}], 
           RowBox[{"2", "/", "3"}]], " ", 
          RowBox[{
           SuperscriptBox["d", "\[Prime]",
            MultilineFunction->None], "[", "\[Lambda]", "]"}]}], "-", 
         RowBox[{"8", " ", 
          SuperscriptBox[
           RowBox[{"d", "[", "\[Lambda]", "]"}], 
           RowBox[{"5", "/", "3"}]], " ", 
          RowBox[{
           SuperscriptBox["W", "\[Prime]",
            MultilineFunction->None], "[", "\[Lambda]", "]"}]}]}], 
        RowBox[{"32", " ", 
         SuperscriptBox[
          RowBox[{"d", "[", "\[Lambda]", "]"}], 
          RowBox[{"7", "/", "3"}]], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           FractionBox["1", 
            RowBox[{"W", "[", "\[Lambda]", "]"}]], ")"}], 
          RowBox[{"1", "/", "3"}]], " "}]], " ", "\[Equal]", 
       RowBox[{"c0", "[", "\[Lambda]", "]"}]}], ",", 
      RowBox[{
       FractionBox[
        RowBox[{" ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{
            RowBox[{"-", "16"}], " ", 
            SuperscriptBox[
             RowBox[{"d", "[", "\[Lambda]", "]"}], "2"], " ", 
            SuperscriptBox[
             RowBox[{"W", "[", "\[Lambda]", "]"}], 
             RowBox[{"1", "/", "3"}]], " ", 
            RowBox[{
             SuperscriptBox["d", "\[Prime]",
              MultilineFunction->None], "[", "\[Lambda]", "]"}]}], "-", 
           RowBox[{
            SuperscriptBox[
             RowBox[{"W", "[", "\[Lambda]", "]"}], 
             RowBox[{"7", "/", "3"}]], " ", 
            RowBox[{
             SuperscriptBox["d", "\[Prime]",
              MultilineFunction->None], "[", "\[Lambda]", "]"}]}], "+", 
           RowBox[{"2", " ", 
            RowBox[{"d", "[", "\[Lambda]", "]"}], " ", 
            SuperscriptBox[
             RowBox[{"W", "[", "\[Lambda]", "]"}], 
             RowBox[{"4", "/", "3"}]], " ", 
            RowBox[{
             SuperscriptBox["W", "\[Prime]",
              MultilineFunction->None], "[", "\[Lambda]", "]"}]}]}], ")"}]}], 
        RowBox[{"32", " ", 
         SuperscriptBox[
          RowBox[{"d", "[", "\[Lambda]", "]"}], 
          RowBox[{"7", "/", "3"}]], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           FractionBox["1", 
            RowBox[{"W", "[", "\[Lambda]", "]"}]], ")"}], 
          RowBox[{"1", "/", "3"}]]}]], "\[Equal]", 
       RowBox[{"c1", "[", "\[Lambda]", "]"}]}]}], "}"}], ",", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       RowBox[{"d", "'"}], "[", "\[Lambda]", "]"}], ",", " ", 
      RowBox[{
       RowBox[{"W", "'"}], "[", "\[Lambda]", "]"}]}], "}"}]}], "]"}], "//", 
  "FullSimplify"}]], "Input",
 CellChangeTimes->{{3.7974906177653875`*^9, 3.797490648484236*^9}, {
  3.797490742188615*^9, 3.7974907842839985`*^9}, {3.797490893741276*^9, 
  3.7974909052993326`*^9}, {3.797491236780778*^9, 3.7974912398904667`*^9}, {
  3.797491412468892*^9, 3.797491428553871*^9}, {3.7974918273025255`*^9, 
  3.797491914284949*^9}},
 CellLabel->"In[22]:=",ExpressionUUID->"05ee9937-c139-4429-bfe4-19d77048864a"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{
     RowBox[{
      SuperscriptBox["d", "\[Prime]",
       MultilineFunction->None], "[", "\[Lambda]", "]"}], "\[Rule]", 
     RowBox[{"-", 
      FractionBox[
       RowBox[{"8", " ", 
        SuperscriptBox[
         RowBox[{"(", 
          FractionBox["1", 
           RowBox[{"W", "[", "\[Lambda]", "]"}]], ")"}], 
         RowBox[{"1", "/", "3"}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"4", " ", 
           RowBox[{"c1", "[", "\[Lambda]", "]"}], " ", 
           SuperscriptBox[
            RowBox[{"d", "[", "\[Lambda]", "]"}], "3"]}], "+", 
          RowBox[{
           RowBox[{"c0", "[", "\[Lambda]", "]"}], " ", 
           SuperscriptBox[
            RowBox[{"d", "[", "\[Lambda]", "]"}], 
            RowBox[{"7", "/", "3"}]], " ", 
           SuperscriptBox[
            RowBox[{"W", "[", "\[Lambda]", "]"}], 
            RowBox[{"4", "/", "3"}]]}]}], ")"}]}], 
       RowBox[{
        SuperscriptBox[
         RowBox[{"W", "[", "\[Lambda]", "]"}], 
         RowBox[{"1", "/", "3"}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"16", " ", 
           SuperscriptBox[
            RowBox[{"d", "[", "\[Lambda]", "]"}], 
            RowBox[{"8", "/", "3"}]]}], "+", 
          RowBox[{
           SuperscriptBox[
            RowBox[{"d", "[", "\[Lambda]", "]"}], 
            RowBox[{"2", "/", "3"}]], " ", 
           SuperscriptBox[
            RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]}], "-", 
          RowBox[{
           SuperscriptBox[
            RowBox[{"W", "[", "\[Lambda]", "]"}], 
            RowBox[{"4", "/", "3"}]], " ", 
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{
              RowBox[{"d", "[", "\[Lambda]", "]"}], " ", 
              RowBox[{"W", "[", "\[Lambda]", "]"}]}], ")"}], 
            RowBox[{"2", "/", "3"}]]}]}], ")"}]}]]}]}], ",", 
    RowBox[{
     RowBox[{
      SuperscriptBox["W", "\[Prime]",
       MultilineFunction->None], "[", "\[Lambda]", "]"}], "\[Rule]", 
     RowBox[{"-", 
      FractionBox[
       RowBox[{"4", " ", 
        SuperscriptBox[
         RowBox[{"d", "[", "\[Lambda]", "]"}], 
         RowBox[{"4", "/", "3"}]], " ", 
        SuperscriptBox[
         RowBox[{"(", 
          FractionBox["1", 
           RowBox[{"W", "[", "\[Lambda]", "]"}]], ")"}], 
         RowBox[{"1", "/", "3"}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"4", " ", 
           RowBox[{"c1", "[", "\[Lambda]", "]"}], " ", 
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{
              RowBox[{"d", "[", "\[Lambda]", "]"}], " ", 
              RowBox[{"W", "[", "\[Lambda]", "]"}]}], ")"}], 
            RowBox[{"2", "/", "3"}]]}], "+", 
          RowBox[{
           RowBox[{"c0", "[", "\[Lambda]", "]"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"16", " ", 
              SuperscriptBox[
               RowBox[{"d", "[", "\[Lambda]", "]"}], "2"]}], "+", 
             SuperscriptBox[
              RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]}], ")"}]}]}], 
         ")"}]}], 
       RowBox[{
        RowBox[{"16", " ", 
         SuperscriptBox[
          RowBox[{"d", "[", "\[Lambda]", "]"}], 
          RowBox[{"8", "/", "3"}]]}], "+", 
        RowBox[{
         SuperscriptBox[
          RowBox[{"d", "[", "\[Lambda]", "]"}], 
          RowBox[{"2", "/", "3"}]], " ", 
         SuperscriptBox[
          RowBox[{"W", "[", "\[Lambda]", "]"}], "2"]}], "-", 
        RowBox[{
         SuperscriptBox[
          RowBox[{"W", "[", "\[Lambda]", "]"}], 
          RowBox[{"4", "/", "3"}]], " ", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            RowBox[{"d", "[", "\[Lambda]", "]"}], " ", 
            RowBox[{"W", "[", "\[Lambda]", "]"}]}], ")"}], 
          RowBox[{"2", "/", "3"}]]}]}]]}]}]}], "}"}], "}"}]], "Output",
 CellChangeTimes->{{3.797491911032675*^9, 3.7974919151685853`*^9}},
 CellLabel->"Out[22]=",ExpressionUUID->"95aacae5-6de4-4d8c-bfae-d856f71fe113"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.797491891793105*^9, 
  3.797491891806071*^9}},ExpressionUUID->"11703a7f-cee8-4c33-a993-\
2b6126cee5fb"]
},
WindowSize->{1904, 989},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
Magnification:>1.8 Inherited,
FrontEndVersion->"12.0 for Microsoft Windows (64-bit) (April 8, 2019)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[558, 20, 437, 9, 50, "Input",ExpressionUUID->"4dea62b0-7482-4d39-b0d9-9de01536aa29"],
Cell[CellGroupData[{
Cell[1020, 33, 24051, 609, 2740, "Input",ExpressionUUID->"783f9359-f753-4322-a56c-b680545facc4"],
Cell[25074, 644, 490, 8, 58, "Output",ExpressionUUID->"be63d392-d26f-4be2-90ee-a1bd4541a1f3"]
}, Open  ]],
Cell[25579, 655, 447, 8, 149, "Input",ExpressionUUID->"4d20b53d-e84b-437c-bc9a-97a5e8c0cfb0"],
Cell[CellGroupData[{
Cell[26051, 667, 57190, 1344, 5263, "Input",ExpressionUUID->"e6ebda8a-55ec-42df-95e7-e243e7d97eab"],
Cell[83244, 2013, 6031, 82, 58, "Output",ExpressionUUID->"e38ca0ac-4b95-4b3b-8ebd-c7a241927d47"],
Cell[89278, 2097, 28610, 534, 466, "Output",ExpressionUUID->"b0a06853-09cc-4a8f-976e-313685f494dc"],
Cell[117891, 2633, 28812, 517, 466, "Output",ExpressionUUID->"5e47f684-bde1-42f6-86ca-75c1152fa567"],
Cell[146706, 3152, 8917, 146, 686, "Output",ExpressionUUID->"c4c4ec94-5177-411b-be14-c8b9aa38aeda"],
Cell[155626, 3300, 37596, 678, 466, "Output",ExpressionUUID->"3ac6c72b-75f5-4092-9309-e26a6c6c9bf3"],
Cell[193225, 3980, 29573, 528, 433, "Output",ExpressionUUID->"c7d8b2c9-d779-4b5d-a213-94b0765a6593"],
Cell[222801, 4510, 36174, 654, 442, "Output",ExpressionUUID->"94283e73-97fa-40c7-a9d2-e018614b5e53"],
Cell[258978, 5166, 21613, 395, 438, "Output",ExpressionUUID->"9a43f60f-5e96-4cde-b0db-c1d0f6ee208a"],
Cell[280594, 5563, 22578, 411, 451, "Output",ExpressionUUID->"ec972c9b-0fee-435d-91f2-4679034ffa99"]
}, Open  ]],
Cell[CellGroupData[{
Cell[303209, 5979, 2686, 74, 357, "Input",ExpressionUUID->"b6b3df82-bb04-4b75-90c2-4822cb97152f"],
Cell[305898, 6055, 494, 10, 58, "Output",ExpressionUUID->"2b6f0152-833a-45ac-a6bf-9c213a4cb9b1"],
Cell[306395, 6067, 489, 10, 58, "Output",ExpressionUUID->"f884e0bc-1e3a-41d5-a928-6c3c88668dc4"],
Cell[306887, 6079, 6233, 123, 428, "Output",ExpressionUUID->"e79edc4d-bcb2-48a1-a9cd-318735c1195a"],
Cell[313123, 6204, 6224, 123, 422, "Output",ExpressionUUID->"51e7946d-1814-4894-9169-e98aa477985e"]
}, Open  ]],
Cell[319362, 6330, 624, 15, 85, "Input",ExpressionUUID->"1d585772-a2c5-46bf-930a-49ed015e1b39"],
Cell[CellGroupData[{
Cell[320011, 6349, 2364, 64, 221, "Input",ExpressionUUID->"873b05c5-a2e4-433b-ad63-163b54f96abc"],
Cell[322378, 6415, 537, 12, 82, "Output",ExpressionUUID->"5a3f1394-96c9-4cf2-b40a-49eca152e9a4"],
Cell[322918, 6429, 16309, 330, 432, "Output",ExpressionUUID->"bb414af2-c21c-4dd1-b7bd-17bfbe15e303"]
}, Open  ]],
Cell[339242, 6762, 2315, 56, 341, "Input",ExpressionUUID->"0bb446de-aece-40ec-b255-dfa62df76193"],
Cell[CellGroupData[{
Cell[341582, 6822, 612, 10, 50, "Input",ExpressionUUID->"909c9ec3-14ac-4d91-ad27-62b3d29842bf"],
Cell[342197, 6834, 298, 5, 58, "Output",ExpressionUUID->"fe83ab12-1e56-4405-a116-f7b943c677fd"]
}, Open  ]],
Cell[CellGroupData[{
Cell[342532, 6844, 6275, 154, 510, "Input",ExpressionUUID->"73bc39b9-2d5c-4280-9d50-f3c18b724be2"],
Cell[348810, 7000, 58202, 983, 703, "Output",ExpressionUUID->"65502718-1474-47e1-8c3f-fe471b94e016"]
}, Open  ]],
Cell[407027, 7986, 2828, 74, 391, "Input",ExpressionUUID->"aec0ff36-d81d-4471-9fc1-1ebff33d16e0"],
Cell[409858, 8062, 147, 3, 85, "Input",ExpressionUUID->"16415a75-f23f-4528-ab8d-003d51c40469"],
Cell[410008, 8067, 3988, 108, 545, "Input",ExpressionUUID->"98686bd8-0402-4501-b0a9-37e39b05243b"],
Cell[CellGroupData[{
Cell[414021, 8179, 456, 11, 50, "Input",ExpressionUUID->"5fd9e57b-0a0a-423f-9839-6c1d0e4d1993"],
Cell[414480, 8192, 458874, 8773, 2147483647, "Output",ExpressionUUID->"de62fba7-8e06-4f32-b080-69405bc2284c"]
}, Closed]],
Cell[CellGroupData[{
Cell[873391, 16970, 1219, 31, 143, "Input",ExpressionUUID->"69df1f1b-c55c-44f6-ac38-933ce7f83cb9"],
Cell[874613, 17003, 622, 11, 58, "Output",ExpressionUUID->"320c43f5-5be9-4671-bd7c-5a83e3117fca"]
}, Open  ]],
Cell[875250, 17017, 223, 5, 50, "Input",ExpressionUUID->"8dcc8bc0-8a0d-49fe-9277-ad60224a730b"],
Cell[CellGroupData[{
Cell[875498, 17026, 3338, 88, 352, "Input",ExpressionUUID->"a58de90f-c245-4831-b428-f5c023ab3817"],
Cell[878839, 17116, 8168, 157, 432, "Output",ExpressionUUID->"739a0ab2-01c9-482b-881e-f10d7550d4cc"]
}, Open  ]],
Cell[CellGroupData[{
Cell[887044, 17278, 10206, 252, 1018, "Input",ExpressionUUID->"3703ee60-f01c-4d8e-9b03-7007f78620b9"],
Cell[897253, 17532, 16677, 332, 451, "Output",ExpressionUUID->"2efd1e8f-9e9c-427a-a989-87fe8295a0c5"],
Cell[913933, 17866, 15707, 315, 438, "Output",ExpressionUUID->"9cf3e58f-da72-4868-982b-cbd9359d0afb"]
}, Open  ]],
Cell[CellGroupData[{
Cell[929677, 18186, 1537, 36, 130, "Input",ExpressionUUID->"3cae6623-e303-42ae-83ea-c6b9edf5f03b"],
Cell[931217, 18224, 3617, 79, 449, "Output",ExpressionUUID->"75b5f56e-86a6-4c27-9ebd-381e384f85c3"]
}, Open  ]],
Cell[CellGroupData[{
Cell[934871, 18308, 3296, 76, 391, "Input",ExpressionUUID->"dc87b991-ee15-4613-a9ec-36bae0fa0120"],
Cell[938170, 18386, 19939, 552, 58, "Output",ExpressionUUID->"31b081a4-7111-4db6-8e20-41bb81b4fc2c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[958146, 18943, 3243, 74, 408, "Input",ExpressionUUID->"c7faa310-3a54-449f-b329-98f87214edb5"],
Cell[961392, 19019, 64716, 1288, 895, "Output",ExpressionUUID->"392bcdde-f93c-4420-9087-1b0af12af8e0"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1026145, 20312, 32711, 813, 1225, "Input",ExpressionUUID->"b01b2d71-d03d-4045-a1ba-22689d27a6a8"],
Cell[1058859, 21127, 61543, 1246, 873, "Output",ExpressionUUID->"bcc0702c-b682-4503-9245-f8e1ff6803c0"],
Cell[1120405, 22375, 1889, 35, 448, "Output",ExpressionUUID->"4747435c-9d8b-498a-ae62-fcf4c52ef45a"]
}, Open  ]],
Cell[1122309, 22413, 130, 3, 50, "Input",ExpressionUUID->"563aaf13-7cf0-4846-b93d-d641940bc946"],
Cell[CellGroupData[{
Cell[1122464, 22420, 193, 4, 50, "Input",ExpressionUUID->"9793deeb-7395-4511-af6c-e0a341f81549"],
Cell[1122660, 22426, 45170, 794, 471, "Output",ExpressionUUID->"98a4aaa2-13f8-458a-bc90-77221b3f4ad4"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1167867, 23225, 779, 19, 153, "Input",ExpressionUUID->"58388c1e-6077-4a9a-ab9f-190ed0c2c4a1"],
Cell[1168649, 23246, 648, 13, 58, "Output",ExpressionUUID->"4b559050-4ad2-4115-929d-10ebf46dd533"],
Cell[1169300, 23261, 649, 13, 58, "Output",ExpressionUUID->"d931f218-1295-4a9b-b8a3-35ce6fa07d3e"]
}, Open  ]],
Cell[1169964, 23277, 274, 6, 99, "Input",ExpressionUUID->"107e1d31-8a08-4cb4-969d-46c7f96dc046"],
Cell[1170241, 23285, 6352, 172, 712, "Input",ExpressionUUID->"3c670706-5dc4-449f-86ab-ff0b31cb099e"],
Cell[CellGroupData[{
Cell[1176618, 23461, 2821, 79, 284, "Input",ExpressionUUID->"21f9d609-be43-4f0d-8568-fd34bd167822"],
Cell[1179442, 23542, 2450, 67, 108, "Output",ExpressionUUID->"8651ada7-bcb2-4bf8-acf9-7fa997530c06"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1181929, 23614, 2398, 68, 295, "Input",ExpressionUUID->"1ef8a2c3-c23c-4722-bb24-67d3b8d68b55"],
Cell[1184330, 23684, 8808, 166, 429, "Output",ExpressionUUID->"7e1c82eb-2910-41a2-a65f-9dda4fca9692"]
}, Open  ]],
Cell[1193153, 23853, 3870, 114, 347, "Input",ExpressionUUID->"029d7bbb-24c4-4f91-926a-935a6fdbef8b"],
Cell[CellGroupData[{
Cell[1197048, 23971, 247, 4, 50, "Input",ExpressionUUID->"26461d43-348b-4040-8c30-6fb13e2861e9"],
Cell[1197298, 23977, 4527, 140, 377, "Output",ExpressionUUID->"3d7f2552-bdd6-4966-ab47-7447ab79cfa5"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1201862, 24122, 175, 2, 50, "Input",ExpressionUUID->"382c80a6-a11a-4f44-a521-7fb493cc3d15"],
Cell[1202040, 24126, 187, 2, 58, "Output",ExpressionUUID->"27e0082b-0da4-4ff6-a1b2-0daab23ea4cb"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1202264, 24133, 175, 2, 50, "Input",ExpressionUUID->"8fea376e-5235-4b5c-9a2e-fcb54b97550a"],
Cell[1202442, 24137, 189, 2, 58, "Output",ExpressionUUID->"c0e39bec-e2a4-4fed-b74c-b7d398f3775f"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1202668, 24144, 177, 2, 50, "Input",ExpressionUUID->"5eebf165-2693-481c-8d58-1f6d306fa946"],
Cell[1202848, 24148, 167, 2, 58, "Output",ExpressionUUID->"d095b8f9-d147-4a01-90ac-296006b06cde"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1203052, 24155, 3519, 91, 176, "Input",ExpressionUUID->"05ee9937-c139-4429-bfe4-19d77048864a"],
Cell[1206574, 24248, 4067, 113, 209, "Output",ExpressionUUID->"95aacae5-6de4-4d8c-bfae-d856f71fe113"]
}, Open  ]],
Cell[1210656, 24364, 152, 3, 50, "Input",ExpressionUUID->"11703a7f-cee8-4c33-a993-2b6126cee5fb"]
}
]
*)

